|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 |
1C Процедура УдалениеЧекККМЗаПрошлыйГод() Экспорт // Устанавливаем привилегированный режим УстановитьПривилегированныйРежим(Истина); // Определяем дату начала и конца прошлого года Год = Год(ТекущаяДата()) - 1; ДатаНачала = Дата(1, 1, Год); ДатаКонца = Дата(31, 12, Год); // Создаем выборку документов ЧекККМ за прошлый год ВыборкаДокументов = Документ.ЧекККМ.Выбрать(); ВыборкаДокументов.Отбор.Дата.Установить(ДатаНачала, ДатаКонца); // Перебираем документы и удаляем их Пока ВыборкаДокументов.Следующий() Цикл Попытка ДокументЧекККМ = ВыборкаДокументов.Ссылка.ПолучитьОбъект(); ДокументЧекККМ.Удалить(); Исключение ЗаписьЖурналаРегистрации("Ошибка при удалении документа ЧекККМ: " + ОписаниеОшибки(), УровеньЖурналаРегистрации.Ошибка); КонецПопытки; КонецЦикла; // Записываем информацию о завершении операции ЗаписьЖурналаРегистрации("Удаление документов ЧекККМ за " + Год + " год завершено.", УровеньЖурналаРегистрации.Информация); КонецПроцедуры |
### Настройка регламентного задания
1. Откройте конфигуратор 1С.
2. Перейдите в раздел «Регламентные задания».
3. Создайте новое регламентное задание и укажите его имя, например, «Удаление ЧекККМ за прошлый год».
4. В поле «Код» вставьте приведенный выше код.
5. Установите расписание выполнения, например, раз в месяц в начале года.
6. Сохраните и закройте регламентное задание.
Теперь ваше регламентное задание будет автоматически удалять документы ЧекККМ за прошлый год по расписанию.
