Имя: Пароль:
1C
1С v8
Ввод на основании
,
0 Scandsv
 
26.02.14
12:52
Добрый день.
Подскажите как сделать.
Система 1 С Розница 1.0 базовая
нужно ввести кучу документов "Установка цен номенклатуры в магазине"
на основании документов "Установка цен номенклатуры"

Вот текст обработки:


Процедура КнопкаВыполнитьНажатие(Кнопка)
    // Вставить со    //{{КОНСТРУКТОР_ЗАПРОСА_С_ОБРАБОТКОЙ_РЕЗУЛЬТАТА
    // Данный фрагмент построен конструктором.
    // При повторном использовании конструктора, внесенные вручную изменения будут утеряны!!!

    Запрос = Новый Запрос;
    Запрос.Текст =
        "ВЫБРАТЬ
        |    УстановкаЦенНоменклатуры.Ссылка КАК Док
        |ИЗ
        |    Документ.УстановкаЦенНоменклатуры КАК УстановкаЦенНоменклатуры
        |ГДЕ
        |    УстановкаЦенНоменклатуры.Проведен = ИСТИНА";

    Результат = Запрос.Выполнить();
    ВыборкаДетальныеЗаписи = Результат.Выбрать();

    Пока ВыборкаДетальныеЗаписи.Следующий() Цикл
        Сообщить(ВыборкаДетальныеЗаписи.Док);
        Документ = Документы.УстановкаЦенНоменклатурыВМагазине.СоздатьДокумент();
        Документ.Дата = ВыборкаДетальныеЗаписи.Док.Дата;
        Документ.Заполнить(ВыборкаДетальныеЗаписи.Док);
        Документ.Записать();
    КонецЦикла;

    
КонецПроцедуры

При запуске для каждого документа требует выбрать тип цен и магазин.

как автоматически подставить значения цены и магазина, чтобы каждый раз "Enter" не тыкать?
Независимо от того, куда вы едете — это в гору и против ветра!