Форум 1С
Программистам, бухгалтерам, администраторам, пользователям
Задай вопрос - получи решение проблемы
02 июн 2024, 22:48

добавление строк в табличный документ

Автор John_Connor, 09 авг 2013, 18:44

0 Пользователей и 1 гость просматривают эту тему.

John_Connor

создается документ и в него добавляются строки , пробую след код, но он добавляет только последнию строку=(
направте на путь истинный



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

GRADUS

Цитата: John_Connor от 09 авг 2013, 18:44
создается документ и в него добавляются строки , пробую след код, но он добавляет только последнию строку=(
направте на путь истинный



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

:o :o :o

ТабСч = НовСчет.Товары.Добавить();  один вызов метода добавить() у ТЧ создает одну строку.
Надо две? Делай 2 таких строки.

John_Connor

спасибо, я в начале думал это циклом делать надо:befhbt:
а так действительно работает:zebzdr:

mixqn

Цитата: John_Connor от 09 авг 2013, 19:03я в начале думал это циклом делать надо
ну вообще-то, циклом и надо - сколько строк надо добавить, столько раз цикл должен отработать. или у вас всегда будет ровно 2 строки???

GRADUS

Цитата: mixqn от 11 авг 2013, 10:57
Цитата: John_Connor от 09 авг 2013, 19:03я в начале думал это циклом делать надо
ну вообще-то, циклом и надо - сколько строк надо добавить, столько раз цикл должен отработать. или у вас всегда будет ровно 2 строки???

Я так клиенту делал кстати, сначала он сказал, что у него будет только одна табличная часть в документе, ну сделал, через 3 мес понадобилась еще одна табличная часть, на прошлой неделе он попросил добавить третью табличную часть в документ :bleh:

Теги:

Похожие темы (5)

Рейтинг@Mail.ru

Поиск