GlobalBegPeriodDate

GlobalBegPeriodDate (Системные функции)
Объект: Функции общего назначения Статус разработки: Реализована Тип: Функция Обращение к БД: Нет Исключения: Невозможно превратить в дату Визуальность: Нет

• Начальная страница
• Общее описание
• Объекты
• Функции общего назначения

Функция возвращает или/и изменяет дату начала изменения периодических значений при визуальном сохранении элементов с наличием таких значений. Дата используется системой только для визуальных форм при сохранении элементов или документов, в которых есть периодические реквизиты. Дата, на которую происходит отображение периодических реквизитов задается функцией GlobalEndPeriodDate. При запуске клиента, обе даты указывают на текущий день. При создании новой формы данные глобальные значения копируются в соответствующие переменные, привязанные к форме (доступные с помощью функций Form.BegPeriodDate, Form.EndPeriodDate), изменение глобальных значений не будет изменять даты отображения или записи в уже открытых формах.

Синтаксис

GlobalBegPeriodDate(<Дата начала периода изменения периодических значений (DATE)>):<Предыдущая дата начала периода изменения периодических значений (DATE)>

Аргументы

• <Дата начала периода изменения периодических значений (DATE)> - Установить новую дату начала изменения периодических реквизитов.

Возвращаемое значение

Возвращает текущую (предыдущую) дату начала изменения периодических реквизитов.

Примеры

//Блок текста позволяет выбрать период сохранения (и дату просмотра) периодических реквизитов,
//     и затем применяет выбранный период к текущей форме с элементами в режиме таблицы или в открытом для редактирования элементе.
аДата:=Form.BegPeriodDate();
бДата:=Form.EndPeriodDate();
If not AskPeriod(аДата,бДата,"Введите период изменения реквизитов:") Then
  Exit;
EndIf;

If аДата>бДата Then
  аДата:=бДата;
EndIf;
If бДата-аДата>62 Then
  Box("Запрещено менять значения реквизитов за промежуток, более чем два месяца!",Q_STOP);
  Exit;
EndIf;
Form.BegPeriodDate(аДата);
Form.EndPeriodDate(бДата);
GlobalBegPeriodDate(аДата);
GlobalEndPeriodDate(бДата);
if not isEmpty(Form.Object) Then
  Form.Object.UsePeriod(аДата,бДата,1);
EndIf;