Книга знаний

1С:Предприятие / v8

v8: Забавный код 80

Собираю коллекцию самых ужасных и смешных кодов.Автор статьи:
Последняя редакция №1 от 20.07.06
URL: http://kb.mista.ru/article.php?id=301

Групповая обработка документов


Автор написал этот текст в октябре 2005 года.
Код предназначен для групповой обработки документов. ТипДокумента - некоторый Тип.
ВыбраныйДокумент=СтрЗаменить(СтрЗаменить(ТипДокумента,"Документ ссылка:","")," ","");
        
Запрос=Новый Запрос;
Запрос.Текст="ВЫБРАТЬ
             |    ВыбраныйДокумент.Номер,
             |    ВыбраныйДокумент.Дата
             |ИЗ
             |    Документ."+ВыбраныйДокумент+" КАК ВыбраныйДокумент
             |ГДЕ
             |    ВыбраныйДокумент.Дата МЕЖДУ &ДатаНачала И &ДатаОкончания";
...             
ВыборкаДокументов=Запрос.Выполнить().Выбрать();    
Пока ВыборкаДокументов.Следующий() Цикл   
    ИскомыйДокумент="";
    СтрокаДляВыполнения="ИскомыйДокумент=Документы."+ВыбраныйДокумент;
    Выполнить(СтрокаДляВыполнения);
                
    ИскомыйДокумент.НайтиПоНомеру(ВыборкаДокументов.Номер,ВыборкаДокументов.Дата).ПолучитьОбъект().Записать(РежимЗаписиДокумента.Запись);
КонецЦикла;

Вместо ссылки автор использует поиск по номеру и дате. С метаданными автор не знаком. И еще много ляпов. :)

Описание | Рубрикатор | Поиск | ТелепатБот | Захваченные статьи | Установки | Форум
© Станислав Митичкин (Волшебник), 2005-2025 | Mista.ru

Яндекс.Метрика