Имя: Пароль:
1C
 
Как вывести результат запроса в ТЧ документа из Общего модуля
0 gabd_marat
 
02.06.16
23:24
Народ как вывести результат запроса, который описан в общем модуле, в
ТЧ документа: вот код
Процедура ЗаполнитьДокументТЧ(Ссылка,Форма,Организация,Склад) Экспорт
//текст запроса
//..
                  
     Запрос.УстановитьПараметр("Организация",Организация);
     Запрос.УстановитьПараметр("Склад",Склад);
     РезультатЗапроса = Запрос.Выполнить();
     Выборка = РезультатЗапроса.Выбрать();
     Товары = Ссылка.Товары;
     ЭлементФормыТовары = Форма.ЭлементФормы.Товары;
    
     Пока Выборка.Следующий() Цикл
          ЭлементФормыТовары.НаименованиеМатериал = Выборка.Товар;
          ЭлементФормыТовары.УчетнаяЦена = Выборка.Цена;
          ЭлементФормыТовары.УчетныйОстаток = Выборка.КоличествоОстаток;
      КонецЦикла
На форме документа
&НаКлиенте
Процедура Заполнить(Команда)
    // Вставить содержимое обработчика.
    СтрокаТабличнойЧасти = Элементы.Товары;
    РаботаСоСправочниками.ЗаполнитьДокументТЧ(ЭтотОбъект,ЭтаФорма,Объект.Организация,Объект.Склад);
КонецПроцедуры
1 Fram
 
02.06.16
23:34
НоваяСтрока = Объект.ТЧ.Добавить();
НоваяСтрока.Реквизит = Значение;
...
2 gabd_marat
 
02.06.16
23:42
(1) Прям так и прописать в Экспортной процедуре?
3 Fram
 
02.06.16
23:43
(2) я тебе принцип добавления записей в тч показал. дальше уж сам пжлста
4 gabd_marat
 
02.06.16
23:49
(3) То есть я прописал НоваяСтрока = Объект.ТЧ.Добавить(); в Процедуре формы, и передал в процедуру Общего модуля, но ничего не выходит ошибок то же не показывает?
&НаСервере
Процедура ЗаполнитьДокументТЧ(НоваяСтрока,Организация,Склад) Экспорт
Запрос.УстановитьПараметр("Организация",Организация);
     Запрос.УстановитьПараметр("Склад",Склад);
     РезультатЗапроса = Запрос.Выполнить();
     Выборка = РезультатЗапроса.Выбрать();
     Пока Выборка.Следующий() Цикл
          НоваяСтрока.НаименованиеМатериал = Выборка.Товар;
          НоваяСтрока.УчетнаяЦена = Выборка.Цена;
          НоваяСтрока.УчетныйОстаток = Выборка.КоличествоОстаток;
      КонецЦикла;
      
КонецПроцедуры

&НаКлиенте
Процедура Заполнить(Команда)
    // Вставить содержимое обработчика.
    НоваяСтрока = Объект.ТЧ.Добавить();
    РаботаСоСправочниками.ЗаполнитьДокументТЧ(НоваяСтрока,ЭтаФорма,Объект.Организация,Объект.Склад);
КонецПроцедуры
5 Fram
 
02.06.16
23:52
ты кодишь тыкая пальцем в небо!.. начни с учебников и видео уроков, а не с форума
6 gabd_marat
 
03.06.16
00:05
(1)я бы начал с учебников, только не могу найти.Смотрел - но почти все где есть что-то интересное и полезное платные.Если так то готов и купить, только не знаю какие лучше. Подскажи какие лучше. Делал по Радченко , там не все есть
7 vicof
 
03.06.16
00:07
(6) Гилева базовый и продвинутый курсы по программированию на варезниках лежат
8 gabd_marat
 
03.06.16
00:14
(7)Это все платно я так понимаю. А нет учебников в которых объяснено как и откуда можно обращаться? А то сколько не смотрю все повторение изложения с одного учебника на другой.И излагается то что можно найти в других учебниках, а сам синтаксис 1с не рассматривается.
9 gabd_marat
 
03.06.16
00:16
И как объектно ориентированное программирование не рассматривается, в отличии от языка си( Прата), где все конкретно и ясно объяснено, зная синтаксис остается думать только над алгоритмами
10 Mankubus
 
03.06.16
05:32
(9) весь синтаксис есть в СП. Яизучи и думай над алгоритмами
2 + 2 = 3.9999999999999999999999999999999...