1С 8.3

Как получить дату последней записи

Функция ПолучитьДатуПоследнейЗаписиБухгалтерскогоРегистра()

 ЗапросРегистра = Новый Запрос("
 |ВЫБРАТЬ ПЕРВЫЕ 1
 | Хозрасчетный.Период КАК Период,
 | Хозрасчетный.МоментВремени
 |ИЗ
 | РегистрБухгалтерии.Хозрасчетный КАК Хозрасчетный
        |УПОРЯДОЧИТЬ ПО
 | Период УБЫВ
 |");
 РезультатЗапроса = ЗапросРегистра.Выполнить();
 Если РезультатЗапроса.Пустой() Тогда
  Возврат НачалоДня(Дата(1, 1, 1));
 КонецЕсли;
 
 Выборка = РезультатЗапроса.Выбрать();
  Выборка.Следующий();
 Возврат Выборка.Период;

КонецФункции // ПолучитьДатуПоследнейЗаписиБухгалтерскогоРегистра()

Как получить дату первой записи

Функция ПолучитьДатуНачалаВеденияБухгалтерскогоРегистра()

    ЗапросРегистра = Новый Запрос("
    |ВЫБРАТЬ ПЕРВЫЕ 1
    | Хозрасчетный.Период КАК Период,
    | Хозрасчетный.МоментВремени
    |ИЗ
    | РегистрБухгалтерии.Хозрасчетный КАК Хозрасчетный
     |УПОРЯДОЧИТЬ ПО
    | Период ВОЗР
    |");
    РезультатЗапроса = ЗапросРегистра.Выполнить();
    Если РезультатЗапроса.Пустой() Тогда
        Возврат НачалоДня(Дата(1, 1, 1));
    КонецЕсли;

    Выборка = РезультатЗапроса.Выбрать();
    Выборка.Следующий();
    Возврат Выборка.Период;

КонецФункции // ПолучитьДатуНачалаВеденияБухгалтерскогоРегистра()