Имя: Пароль:
1C
1С v8
Программное заполнение документа ручная операция
0 marty0701
 
29.11.11
14:12
Привет вам!
Как заполнить поле(добавить проводки) в поле на форме документа ручная операция(ОперацияБух) с типом ТабличноеПолеДвиженияБУ?
1 marty0701
 
29.11.11
14:18
В смысле поле с именем ТабличноеПолеДвиженияБУ, с типом РегистрБухгалтерииНаборЗаписей.Хозрасчетный...
2 Ненавижу 1С
 
гуру
29.11.11
14:19
не табличные поля надо заполнять (интерфейс),а движения (данные)
3 marty0701
 
29.11.11
14:20
Движения.Хозрасчетный.Добавить()?
4 DSatan
 
29.11.11
14:21
как-то так

Проводка = ОбъектДокумента.Движения.Хозрасчетный.Добавить();
Проводка.Организация = Организация;
Проводка.Период = ТекСтрокаДокумент.ДатаДокумента;
Проводка.СчетДт = ТекСтрока.СчетДт;
Проводка.ПодразделениеДт = ТекСтрока.ПодразделениеДт;
БухгалтерскийУчет.УстановитьСубконто(Проводка.СчетДт,Проводка.СубконтоДт,1,ТекСтрока.СубконтоДт1);
БухгалтерскийУчет.УстановитьСубконто(Проводка.СчетДт,Проводка.СубконтоДт,2,ТекСтрока.СубконтоДт2);
БухгалтерскийУчет.УстановитьСубконто(Проводка.СчетДт,Проводка.СубконтоДт,3,ТекСтрока.СубконтоДт3);
Проводка.СчетКт = ТекСтрока.СчетКт;
Проводка.ПодразделениеКт = ТекСтрока.ПодразделениеКт;
БухгалтерскийУчет.УстановитьСубконто(Проводка.СчетКт,Проводка.СубконтоКт,1,ТекСтрока.СубконтоКт1);
БухгалтерскийУчет.УстановитьСубконто(Проводка.СчетКт,Проводка.СубконтоКт,2,ТекСтрока.СубконтоКт2);
БухгалтерскийУчет.УстановитьСубконто(Проводка.СчетКт,Проводка.СубконтоКт,3,ТекСтрока.СубконтоКт3);
Проводка.Содержание = ТекСтрока.Содержание;
Проводка.Сумма = ТекСтрока.Сумма;
Проводка.СуммаНУДт = ТекСтрока.Сумма;
Проводка.СуммаНУКт = ТекСтрока.Сумма;
5 marty0701
 
29.11.11
14:22
(4)Спасибо.
Я не хочу быть самым богатым человеком на кладбище. Засыпать с чувством, что за день я сделал какую-нибудь потрясающую вещь — вот что меня интересует. Стив Джобс