Difference between revisions of "Form.BegPeriodDate"

From SunFlurry wiki
Jump to: navigation, search
(Created page with "{{infobox function |name=BegPeriodDate |object=Форма |caption=Периодические реквизиты формы |type=1 |status=2 |db=0 |exception=Невозм...")
 
m (1 revision imported)
 
(No difference)

Latest revision as of 08:50, 7 February 2021

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

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

Синтаксис

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

Аргументы

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

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

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

Примеры

//Фрагмент обновляет текст на кнопках для задания периода изменения (и просмотра) периодических реквизитов формы
//Если форма открыта в режиме редактирования объекта, получим даты периода из объекта,
//     иначе из свойств формы
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;