Имя: Пароль:
1C
1С v8
Отбор документов поступления при выборе контрагента
,
0 almaz102
 
20.04.16
09:40
Здравствуйте! Ребята нужна помощь, я начинающий программист, опыта еще нет. Подскажите по-та как реализовать? Делаю внешнею обработку, есть реквезит "Контрагент" и табличная часть, мне нужно при выборе контрагента в таблице выходило список документов (поступление товаров и услуг) связанные только с этим контрагентом и т.д. , именно кого выбираю. Буду очень благодарен. Заранее спасибо!
1 aleks_default
 
20.04.16
09:42
А что дальше будешь делать с этим списком документов? Что должна делать внешняя обработка?
2 salvator
 
20.04.16
09:43
(0) Запросом.
3 Лефмихалыч
 
20.04.16
09:44
Навесь обработчик события ПриИзменении на поле ввода "Контрагент".
В обработчике запросом получай запросом документы, и заполняй табличнуючасть
4 almaz102
 
20.04.16
09:50
Я список документов передаю на переобработку.
обработку уже написано,
&НаСервере
Процедура СоздатьДокументыНаСервере()

    Для Каждого Стр Из Объект.Документы Цикл
        НовыйДокумент = Документы.ПередачаТоваров.СоздатьДокумент();
        НовыйДокумент.Дата =  Объект.Дата;
        НовыйДокумент.ВалютаДокумента = Константы.ВалютаРегламентированногоУчета.Получить();
        НовыйДокумент.ВидОперации = Перечисления.ВидыОперацийПередачаТоваров.ВПереработку;
        НовыйДокумент.Организация = Объект.Организация;
        НовыйДокумент.Контрагент = Объект.Контрагент;
        НовыйДокумент.ДоговорКонтрагента = Объект.Договор;
        НовыйДокумент.Склад = Стр.СсылкаНаДокумент.Склад;
        
        Для Каждого СтрТаб Из Стр.СсылкаНаДокумент.Товары Цикл
            НоваяСтрока = НовыйДокумент.Товары.Добавить();
            НоваяСтрока.Номенклатура = СтрТаб.Номенклатура;
            НоваяСтрока.Количество = СтрТаб.Количество;
            НоваяСтрока.СчетУчета = ПланыСчетов.Хозрасчетный.СырьеИМатериалы;
            НоваяСтрока.СчетПередачи = ПланыСчетов.Хозрасчетный.МатериалыПереданныеВПереработку;
        КонецЦикла;
        
        Попытка
            НовыйДокумент.Записать(РежимЗаписиДокумента.Проведение);
            Сообщить("Создан и проведен документ: " + НовыйДокумент.Ссылка);
        Исключение
            НовыйДокумент.Записать(РежимЗаписиДокумента.Запись);
            Сообщить("Создан документ: " + НовыйДокумент.Ссылка)    
        КонецПопытки;    

        
    КонецЦикла;
    
    
КонецПроцедуры

&НаКлиенте
Процедура СоздатьДокументы(Команда)

единственное хотелось автоматизировать табличную часть
Компьютер — устройство, разработанное для ускорения и автоматизации человеческих ошибок.