[awp]

Фрагмент кода:

Опер.Новая();
Опер.Содержание = "автоматическое заполнение";
Опер.НоваяПроводка();
Опер.Дебет.Счет = СчетПоКоду("КР" + Строка(Число(Прав(Лев(СокрЛП(Таб.Счет),2),1)) + 1));
Опер.Дебет.Субконто(1,Спр.ТекущийЭлемент());
Опер.Дебет.Субконто(2,Таб.НА);
Опер.Сумма = Таб.Сумма;
Опер.ДатаОперации = Таб.Дата;
Опер.Записать();

Проблема в том что дата операции прошлым периодом и при записи кричит номер не уникальный(нумерация в пределах года).

Как обойти?

[Ardi]

РабочаяДата(<?>,)
Синтаксис:
РабочаяДата(<Дата>,<РежимСменыРабДаты>)
Назначение:
Устанавливает значение рабочей даты. Возвращает значение рабочей даты, выбранной в текущем сеансе работы программы.
Рабочая дата может изменяться при помощи главного меню Сервис-Параметры-Общие-РабочаяДата).
Параметры:
<Дата> - Необязательный параметр. Выражение типа дата.
<РежимСменыРабДаты> - Необязательный параметр. Режим автоматической смены рабочей даты в полночь: 0 - не менять; 1 - менять с предупреждением; 2 - менять автоматически без предупреждения. Если параметр не указан, то режим не меняется и действует установка, выбранная в параметрах системы.

[awp]

РабочаяДата(<?>,)
Синтаксис:
РабочаяДата(<Дата>,<РежимСменыРабДаты>)
Назначение:
Устанавливает значение рабочей даты. Возвращает значение рабочей даты, выбранной в текущем сеансе работы программы.
Рабочая дата может изменяться при помощи главного меню Сервис-Параметры-Общие-РабочаяДата).
Параметры:
<Дата> - Необязательный параметр. Выражение типа дата.
<РежимСменыРабДаты> - Необязательный параметр. Режим автоматической смены рабочей даты в полночь: 0 - не менять; 1 - менять с предупреждением; 2 - менять автоматически без предупреждения. Если параметр не указан, то режим не меняется и действует установка, выбранная в параметрах системы.

Да! Спасибо!