|
Как в товарах заполнить счета в табличной части? | ☑ | ||
---|---|---|---|---|
0
DDD2005NEW
30.08.12
✎
11:52
|
В КА делаю заполнения документа реализации
Записать(); //Попытка ДокОтгрузка =Документы.РеализацияТоваровУслуг.СоздатьДокумент(); // // Заполнение шапки ДокОтгрузка.Дата = Дата; ДокОтгрузка.Грузополучатель = Грузополучатель; ДокОтгрузка.АдресДоставки = АдресДоставки; ДокОтгрузка.ВалютаДокумента = ВалютаДокумента; ДокОтгрузка.ДоговорКонтрагента = ДоговорКонтрагента; ДокОтгрузка.Комментарий = Комментарий; ДокОтгрузка.Контрагент = Контрагент; ДокОтгрузка.КратностьВзаиморасчетов = КратностьВзаиморасчетов; ДокОтгрузка.КурсВзаиморасчетов = КурсВзаиморасчетов; ДокОтгрузка.Организация = Организация; ДокОтгрузка.Ответственный = Ответственный; ДокОтгрузка.Склад = Склад; ДокОтгрузка.СуммаВключаетНДС = СуммаВключаетНДС; ДокОтгрузка.СуммаДокумента = СуммаДокумента; ДокОтгрузка.ТипЦен = ТипЦен; ДокОтгрузка.УчитыватьНДС = УчитыватьНДС; ДокОтгрузка.БанковскийСчетОрганизации = СтруктурнаяЕдиница; ДокОтгрузка.ВидОперации = Перечисления.ВидыОперацийРеализацияТоваров.ПродажаКомиссия; ДокОтгрузка.СчетУчетаРасчетовСКонтрагентом = Планысчетов.Хозрасчетный.РасчетыСПокупателями; ДокОтгрузка.СчетУчетаРасчетовПоАвансам = Планысчетов.Хозрасчетный.РасчетыПоАвансамПолученным; ДокОтгрузка.НН_НомерЗаказа = СокрЛП(НомерЗаявки); ДокОтгрузка.КоличествоПалетов = КоличествоПалетов; ДокОтгрузка.ВидПередачи = Перечисления.ВидыПередачиТоваров.СоСклада; ДокОтгрузка.ОтражатьВБухгалтерскомУчете =True; ДокОтгрузка.ОтражатьВНалоговомУчете =True; ДокОтгрузка.ОтражатьВУправленческомУчете =True; Для Каждого ТекСтрокаТовары Из Товары Цикл НоваяСтрока = ДокОтгрузка.Товары.Добавить(); НоваяСтрока.ЕдиницаИзмеренияМест = ТекСтрокаТовары.ЕдиницаИзмеренияМест; НоваяСтрока.ЗначениеУсловияАвтоматическойСкидки = ТекСтрокаТовары.ЗначениеУсловияАвтоматическойСкидки; НоваяСтрока.ЕдиницаИзмерения = ТекСтрокаТовары.ЕдиницаИзмерения; НоваяСтрока.КоличествоМест = ТекСтрокаТовары.КоличествоМест; НоваяСтрока.Коэффициент = ТекСтрокаТовары.Коэффициент; НоваяСтрока.Количество = ТекСтрокаТовары.Количество; НоваяСтрока.Номенклатура = ТекСтрокаТовары.Номенклатура; НоваяСтрока.ПроцентАвтоматическихСкидок = ТекСтрокаТовары.ПроцентАвтоматическихСкидок; НоваяСтрока.ПроцентСкидкиНаценки = ТекСтрокаТовары.ПроцентСкидкиНаценки; НоваяСтрока.Цена = ТекСтрокаТовары.Цена; НоваяСтрока.СтавкаНДС = ТекСтрокаТовары.СтавкаНДС; НоваяСтрока.Сумма = ТекСтрокаТовары.Сумма; НоваяСтрока.СуммаНДС = ТекСтрокаТовары.СуммаНДС; //ДокОтгрузка.ЗаполнитьСчетаУчетаВСтрокеТабЧастиРегл(ДокОтгрузка.СтрокаТабличнойЧасти, "Товары", ДокОтгрузка.ОтражатьВБухгалтерскомУчете, ДокОтгрузка.ОтражатьВНалоговомУчете); //ДокОтгрузка.ПриИзмененииНоменклатурыТовары(ТекСтрокаТовары.Номенклатура); КонецЦикла; ДокОтгрузка.УстановитьНовыйНомер(); ДокОтгрузка.Записать(); ДокОтгрузка.УстановитьВремя(РежимАвтоВремя.ТекущееИлиПоследним); ДокОтгрузка.Записать(РежимЗаписиДокумента.Проведение); НН_РеализацияТоваровУслуг = ДокОтгрузка.Ссылка; НомерНакладной = ДокОтгрузка.Номер; ДатаНакладной = ДокОтгрузка.Дата; Записать(); КонецЕсли; |
|||
1
Пуд
30.08.12
✎
11:54
|
И?
|
|||
2
del123
30.08.12
✎
11:56
|
все не читал но в типовой КА в реализацииТиУ счета заполняются так
СчетаУчетаВДокументах.ЗаполнитьСчетаУчетаТабличнойЧасти(ИмяТабЧасти, ТабличнаяЧасть, ЭтотОбъект, ЗаполнятьБУ, ЗаполнятьНУ); |
|||
3
DDD2005NEW
30.08.12
✎
11:57
|
(2) пытался выдернуть
//ДокОтгрузка.ЗаполнитьСчетаУчетаВСтрокеТабЧастиРегл(ДокОтгрузка.СтрокаТабличнойЧасти, "Товары", ДокОтгрузка.ОтражатьВБухгалтерскомУчете, ДокОтгрузка.ОтражатьВНалоговомУчете); но ругается что нет СтрокаТабличнойЧасти |
|||
4
Kuein
30.08.12
✎
12:02
|
О_о?
СтрокаТабличнойЧасти может быть получена как Для каждого СтрокаТабличнойЧасти из ДокОтгрузка.Какая-то-Заполняемая-Табчасть цикл <что-то делаем> конеццикла |
|||
5
del123
30.08.12
✎
12:04
|
(3) пиши
ДокОтгрузка.ЗаполнитьСчетаУчетаВСтрокеТабЧастиРегл(НоваяСтрока, "Товары", ДокОтгрузка.ОтражатьВБухгалтерскомУчете, ДокОтгрузка.ОтражатьВНалоговомУчете); |
|||
6
Kuein
30.08.12
✎
12:06
|
Да, (5) прав. Я не вчитался в код в (0).
|
|||
7
DDD2005NEW
30.08.12
✎
12:07
|
(5) спасибо то что надо
|
|||
8
del123
30.08.12
✎
12:09
|
и можно было бы сократить количество строк кода используя процедуру ЗаполнитьЗначенияСвойств()
Почитай в СП что она делает) |
Форум | Правила | Описание | Объявления | Секции | Поиск | Книга знаний | Вики-миста |