обработка
Показывать по
10
20
40
сообщений
- 1
- 2
25.11.2008
13:57
#11
я говорила про удаление документов)
просто организация стала по другому называться. .а принцип ведения учета остался тем же.. необходимо было удалить все документы из журнала рассчетов.
простыми стандартными способами 1с этого видимо не сделать.. вот я и думала спросить может есть какая нибудь обработка которая позволит такое сделать.
(ЗЫ... все документы я удалила вручную... правда долго мучалась)
просто организация стала по другому называться. .а принцип ведения учета остался тем же.. необходимо было удалить все документы из журнала рассчетов.
простыми стандартными способами 1с этого видимо не сделать.. вот я и думала спросить может есть какая нибудь обработка которая позволит такое сделать.
(ЗЫ... все документы я удалила вручную... правда долго мучалась)
25.11.2008
14:13
#12
"В журнале расчетов записи.
А удаляли вы документы из журнала документов.
Если бы сразу правильно написали, то сразу бы и ответ получили
Эта процедура для пометки на удаление вообще всех документов в конфигурации
Процедура Сформировать()
Для Инд = 1 По Метаданные.Документ() Цикл
Док = СоздатьОбъект("Документ."+Метаданные.Документ(Инд).Идентификатор);
Док.ВыбратьДокументы(ВыбНачПериода,ВыбКонПериода);
Пока Док.ПолучитьДокумент() = 1 Цикл
Если Док.ПометкаУдаления() = 1 Тогда
Продолжить;
КонецЕсли;
Док.Удалить(0);
Состояние("Документ "+Док.ТекущийДокумент()+" помечен на удаление");
КонецЦикла;
КонецЦикла;
КонецПроцедуры
"
А удаляли вы документы из журнала документов.
Если бы сразу правильно написали, то сразу бы и ответ получили
Эта процедура для пометки на удаление вообще всех документов в конфигурации
Процедура Сформировать()
Для Инд = 1 По Метаданные.Документ() Цикл
Док = СоздатьОбъект("Документ."+Метаданные.Документ(Инд).Идентификатор);
Док.ВыбратьДокументы(ВыбНачПериода,ВыбКонПериода);
Пока Док.ПолучитьДокумент() = 1 Цикл
Если Док.ПометкаУдаления() = 1 Тогда
Продолжить;
КонецЕсли;
Док.Удалить(0);
Состояние("Документ "+Док.ТекущийДокумент()+" помечен на удаление");
КонецЦикла;
КонецЦикла;
КонецПроцедуры
"
- 1
- 2
Читают тему
(гостей: 1)