Имя: Пароль:
1C
1С v8
Задания к расчету себестоимости при групповом перепроведнии
0 saradip
 
30.12.22
23:03
В общем, почему-то не формируются задания к расчету себестоимости на документы при групповом перепроведении ртиу. Я решил сделать иначе, с помощью произвольного алгоритма в групповом изменение реквизитов использовать два куска кода поочередно, предварительно активировав "режим разработчика" и установив истину на булевку "запись в коде":
1)
Если Объект.Дата = КонецДня(Объект.Дата) Тогда
      Объект.Дата = Объект.Дата - 1
Иначе
      Объект.Дата = Объект.Дата + 1
КонецЕсли;
Объект.Записать(РежимЗаписиДокумента.Проведение)

2)
Если Объект.Дата = (КонецДня(Объект.Дата)-1) Тогда
      Объект.Дата = Объект.Дата + 1
Иначе
      Объект.Дата = Объект.Дата - 1
КонецЕсли;
Объект.Записать(РежимЗаписиДокумента.Проведение)

Могут быть доки изначально со временем 23:59:58 ну и черт бы с ними...
Цель: перерасчет себестоимости по продажам
1 Naumov
 
01.01.23
19:51
Нужно отменить проведение и провести