GlobalEndPeriodDate

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

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

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

Синтаксис

GlobalEndPeriodDate(<Дата окончания периода изменения периодических значений (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;