Имя: Пароль:
1C
1C 7.7
v7: Операции
0 bserge001
 
04.03.13
10:13
При помощи обработки Wrap были свернуты итоги, после чего появилось множество операций на начало 2012 года (свертка делалась на конец 2011). Бухгалтерии не понравилось и они попросили эти операции перебросить на конец 2011. Я написал обработку, но видимо лыжи не едут! Пишет что невозможно изменять дату проведенного документа. Вручную дата меняется. Но вручную трудоемко менять, что посоветуете?
Код обработки:

Процедура Сформировать()
   Опр = СоздатьОбъект("Операция");
   Опр.ВыбратьОперации(ДатаС,ДатаПО);
   Номер = 0;
   Пока Опр.ПолучитьОперацию()=1 Цикл
       Номер = Номер + 1;
       Попытка
           Опр.ВключитьПроводки(0);
           Опр.ДатаОперации = ДатаОп;
           Опр.ВключитьПроводки(1);
           Опр.Записать();
       Исключение
           Сообщить(ОписаниеОшибки() + " "+ Опр.Содержание);
           Продолжить;
       КонецПопытки;
   КонецЦикла;
   Сообщить("Количество операций "+Номер);
КонецПроцедуры
1 Бирюк
 
04.03.13
10:21
OPERSTRN.ert из комплекта Uniprocs с диска ИТС
2 miki
 
04.03.13
10:23
Объект "Операция" и документ "Операция" - вещи разные.
Попробуй вместо СоздатьОбъект("Операция");  СоздатьОбъект("Документ.Операция");
3 bserge001
 
04.03.13
10:51
(2) Сработало. Но теперь цикл странно работает, а точнее вообще не работает. Приходится нажимать каждый раз на кнопку. С каждым нажатием преносится одна операциия.
4 bserge001
 
04.03.13
10:53
Процедура Сформировать()
   Опр = СоздатьОбъект("Документ.Операция");
   Опр.ВыбратьДокументы(ДатаС,ДатаПО);
   Номер = 0;
   Пока Опр.ПолучитьДокумент()=1 Цикл
       Номер = Номер + 1;
       СписокОпер.НоваяСтрока();
       СписокОпер.ДатаОперации = Опр.ДатаДок;
       Опр.ДатаДок = ДатаОп;
       Опр.УстановитьНовыйНомер();
       Опр.Записать();
   КонецЦикла;
   Сообщить("Количество операций "+Номер);
КонецПроцедуры
5 miki
 
04.03.13
10:56
так выборку сбиваешь-то...
6 miki
 
04.03.13
10:57
отбирай ч0рным запросом или сначала в ТЗ/СЗ, а из ТЗ - меняй дату.
7 bserge001
 
04.03.13
11:01
Спасибо большое за помощь!