Помощь - Поиск - Пользователи - Календарь
Полная версия этой страницы: Обход списка документов
Украинский 1С форум: всё про 1С 8.3, 1С 8.2, 1С 8.1, 1С 8.0, 1С 7.7 > Программисту > Программирование в 1С Предприятие 8.2 > Программирование управляемых форм 1С 8.2
MH.z
Пробую еще раз smile.gif
УПП редакция 1.3
Делаю обработку которая позволяет перезаписывать данные в регистр сведений.
Как можно сделать программно обход списка документов для получения ссылки на каждый документ. Документ ПлатежноеПоручениеИсходящее.
Вот сам код:
        Запрос = Новый Запрос;
        Запрос.Текст =
        "ВЫБРАТЬ
        |    ПлатежноеПоручениеИсходящееРасшифровкаПлатежа.Ссылка.Контрагент КАК Контрагент,
        |    ПлатежноеПоручениеИсходящееРасшифровкаПлатежа.СтавкаНДС,
        |    КонтрагентыОрганизаций.СтавкаНДСПриобретений
        |ИЗ
        |    Документ.ПлатежноеПоручениеИсходящее.РасшифровкаПлатежа КАК ПлатежноеПоручениеИсходящееРасшифровкаПлатежа
        |        ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.КонтрагентыОрганизаций КАК КонтрагентыОрганизаций
        |        ПО ПлатежноеПоручениеИсходящееРасшифровкаПлатежа.Ссылка.Контрагент = КонтрагентыОрганизаций.Контрагент
        |ГДЕ
        |    ПлатежноеПоручениеИсходящееРасшифровкаПлатежа.Ссылка.ВидОперации = &ВидОперации
        |    И ПлатежноеПоручениеИсходящееРасшифровкаПлатежа.Ссылка = &Ссылка";
        Запрос.УстановитьПараметр("ВидОперации", Перечисления.ВидыОперацийППИсходящее.ОплатаПоставщику);
        Запрос.УстановитьПараметр("Ссылка", Ссылка);
        РегистрыСведений.КонтрагентыОрганизаций.ВыбратьПоРегистратору(Ссылка).СтавкаНДСПриобретений = Выборка.СтавкаНДС;
        Результат = Запрос.Выполнить().Выгрузить();
        Для каждого Строка из Результат Цикл
            РегистрыСведений.КонтрагентыОрганизаций.ВыбратьПоРегистратору(Ссылка).СтавкаНДСПриобретений = Строка.СтавкаНДС;
        КонецЦикла;
    КонецЦикла;
logist
Убрать эту строку, тогда будут выбраны все документы удовлетворяющие оставшемуся условию.
        |    И ПлатежноеПоручениеИсходящееРасшифровкаПлатежа.Ссылка = &Ссылка";

Для просмотра полной версии этой страницы, пожалуйста, пройдите по ссылке.