Имя: Пароль:
1C
1С v8
Передача данных из справочника в табличную часть документа
0 Riko669
 
22.12.16
09:33
Утро добрый! Подскажите, пожалуйста, как правильно сделать?
У меня есть справочник "Процедуры" в нем реквизиты (Количество и Цена. Тип: Число)
Есть документ "Прием" с таб частью. "ПроцедурыПриема" (с реквизитами: цена, количество и т.д.). Также в самом документе есть реквизит "Детский прием" он с галочкой.
При заполнении тч у меня автоматически считается сумма, а мне нужно чтобы при установлении этой галочки сумма изменялась. Как вытащить данные из справочника?

Код вот такой, но естественно не рабочий. Я делаю вообще не так или что-то упустила?

&НаКлиенте
Процедура ДетскийПрПриИзменении(Элемент)
    
    Если Объект.ДетскийПр = Истина Тогда
        РассчитатьДетскийПр();
    ИначеЕсли Объект.ДетскийПр = Ложь Тогда
        РассчитатьДетскийПр1();
    КонецЕсли;
      
КонецПроцедуры

&НаСервере
Функция РассчитатьДетскийПр()
    
    Запрос = Новый Запрос;
    Запрос.Текст = "ВЫБРАТЬ
    |Процедуры.К_воУЕТДетск КАК Количество,
    |Процедуры.ЦенаДетская КАК Цена,
    |Процедуры.К_воУЕТДетск * Процедуры.ЦенаДетская КАК Сумма
    |ИЗ
    |Справочник.Процедуры КАК Процедуры
    |ГДЕ
    |Процедуры.Ссылка = &Ссылка";

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

    
    
КонецФункции
1 FIXXXL
 
22.12.16
09:38
НоваяСтрока.Объект.ПроцедурыПриема.Номенклатура.К_воУЕТ

1. не надо на лету пытаться писать в справочник
2. Объект.ПроцедурыПриема.Номенклатура - это что?
по ходу тебе надо

НоваяСтрока.Объект.ПроцедурыПриема.Номенклатура = Выборка.Ссылка
и дальше Колво, Цена, Сумма
НоваяСтрока.Объект.ПроцедурыПриема.К_воУЕТ = Выборка.Количество

или как там у тебя реквизиты ТЧ называются
2 Riko669
 
22.12.16
09:39
(1) аа, хорошо, поняла. Пока буду переделывать
Компьютеры — это как велосипед. Только для нашего сознания. Стив Джобс