Полная версия: Как удалить?
1C-PRO - Форум по 1С > Форумы по платформе "1С:Предприятие 7.7" > (7.7) Форум по общим вопросам "1С:Предприятие 7.7"
Привет всем! Меня интересует вопрос: как удалить накладные, цены, контрагентов, но чтобы наименования в номенклатуре остались? (Меня интересует массовое удаление по заданному критерию, а не удаление поштучно)
посмотри на диске ИТС или на инфостарте.
или вот, тоже работает
или вот, тоже работает
Код
Процедура Сформировать()
Докум=СоздатьОбъект("Документ"); //здесь указываем конкретный докум, например "Документ.РасходнаяНакладная"
ПодчиненныйДокум=СоздатьОбъект("Документ");
Докум.ВыбратьДокументы(НачДата,КонДата);
Пока Докум.ПолучитьДокумент() = 1 Цикл
Докум.СделатьНеПроведенным();
ПодчиненныйДокум.ВыбратьПодчиненныеДокументы(,,Докум);
Пока ПодчиненныйДокум.ПолучитьДокумент()=1 Цикл
Сообщить("Помечен на удаление "+ПодчиненныйДокум.ТекущийДокумент()+" Дата "+ПодчиненныйДокум.ДатаДок);
ПодчиненныйДокум.СделатьНеПроведенным();
ПодчиненныйДокум.Удалить(0);
КонецЦикла;
Сообщить("Помечен на удаление "+Докум.ТекущийДокумент()+" Дата "+Докум.ДатаДок);
Докум.Удалить(0);
КонецЦикла;
КонецПроцедуры
Спасибо, попробую разобраться. А этот код который ты написал это где надо размещать? :)
например как внешнюю обработку
Цитата(bob @ 13.11.2008, 21:32) 
например как внешнюю обработку
Ок, спасибо
Это текстовая версия — только основной контент. Для просмотра полной версии этой страницы, пожалуйста, нажмите сюда.