Имя: Пароль:
1C
1C 7.7
v7: Удалить все документы формирующие проводки
0 asa
 
11.10.12
23:17
Уже сто лет не программировал в 7.7 поэтому не пинать.
Задача удалить все документы по движению материалов
Что делаю

...
   Ит.ВыполнитьЗапрос(ВыбНачПериода, ВыбКонПериода, "10.1",,, 1, "Проводка", "СК");
   Ит.ВыбратьПериоды();
   Пока Ит.ПолучитьПериод() = 1 Цикл

       Опер = Ит.Операция;  
       Сообщить(Опер.Документ);  //выводится все правильно

Вот тут вопрос, как пометить на удаление эту операцию, попробовал так

       Док = СоздатьОбъект("Документ");
       Док = Опер.Документ;
       Док.удалить(0);
выдает ошибку Не выбран документ!

   КонецЦикла;
1 Тьма
 
11.10.12
23:19
Док = СоздатьОбъект("Документ");
       Док.найтидокумент(Опер.Документ);
       Док.удалить(0);
2 JustBeFree
 
11.10.12
23:23
В бух 7.7 есть стандартная обработка. Используй ее.
3 Злопчинский
 
11.10.12
23:29
ВыбратьОперацииСПроводками()
по выбранным операциям - ссылка на документ. получим список документов, который успешно прибиваем
4 Злопчинский
 
11.10.12
23:29
Другое дело, что например вместе сматериалами могут и товары удалиться... пот ому как тупо может быть проводка
Дт41.1 Кт10.1
5 asa
 
11.10.12
23:44
(1)Спасибо, коротко и точно, все получилось
(2)Напомни, не знаю какая может удалять документы по оборотам
(4)Задача более широкая просто я свел к простому, тупо нужно удалить документы
6 Эльниньо
 
12.10.12
00:35
// Ит.ВыполнитьЗапрос(ВыбНачПериода, ВыбКонПериода, "10.1",,, 1, "Проводка", "СК");
Ит.ВыполнитьЗапрос(ВыбНачПериода, ВыбКонПериода, "10.1",,, 1, "Операция", "СК");

иначе будешь один док по 20 раз удалять.
7 vah1
 
12.10.12
02:34
а я бы пометил на удаление, сначала. потом посмотрел шозанах там остался и пачему! и назвал бы это тестированием бэта версии обработки, прежде чем в рабочей базе начинать, лучше знать что тебя ожидает
Выдавать глобальные идеи — это удовольствие; искать сволочные маленькие ошибки — вот настоящая работа. Фредерик Брукс-младший