Form.EndPeriodDate

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

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

Функция получает или изменяет конечную дату сохранения периодических реквизитов формы, также используемую как дату отображения реквизитов. Данная дата присутствует для любой формы, однако, используется только для форм, выводящих таблицы с объектами базы данных. Для форм с редактируемыми объектами базы данных используется дата, хранящаяся в свойствах объекта (см. DB.UsePeriod). См. также описание функций GlobalBegPeriodDate и GlobalEndPeriodDate. Функция может использоваться до инициализации формы и в консольном клиенте.

Синтаксис

Form.EndPeriodDate(<Дата окончания периода и отображения периодических реквизитов формы (DATE)>):<Текущая дата окончания периода и отображения периодических реквизитов формы (DATE)>

Аргументы

• <Дата окончания периода и отображения периодических реквизитов формы (DATE)> - (необязательный аргумент) Задает дату окончания периода сохранения периодических реквизитов, также на эту дату производится отображение объектов формы. Если аргумент не задан, конечная дата периода изменена не будет.

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

Возвращает значение типа дата и время -- текущую конечную дату периода сохранения и отображения периодических реквизитов.

Примеры

//Фрагмент обновляет текст на кнопках для задания периода изменения (и просмотра) периодических реквизитов формы
//Если форма открыта в режиме редактирования объекта, получим даты периода из объекта,
//     иначе из свойств формы
If not isEmpty(Form.Object) Then
  НачДата:=Form.Object.BegPeriodDate();
  КонДата:=Form.Object.EndPeriodDate();
Else
  НачДата:=Form.BegPeriodDate();
  КонДата:=Form.EndPeriodDate();
EndIf;  
Form.bPeriodBeg.Caption:="c "+НачДата+" по";
Form.bPeriodEnd.Caption:=""+КонДата;
If BegOfDay(Date)<>BegOfDay(НачДата) Then
  Form.bPeriodBeg.FontColor:=_CLR_RED;
Else
  Form.bPeriodBeg.FontColor:=_CLR_WINDOWTEXT;
EndIf;
If BegOfDay(Date)<>BegOfDay(КонДата) Then
  Form.bPeriodEnd.FontColor:=_CLR_RED;
Else
  Form.bPeriodEnd.FontColor:=_CLR_WINDOWTEXT;
EndIf;