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

Не выдает номер ГТД в Счет-фактуре

Автор ximec, 18 апр 2011, 19:23

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

ximec

Здравствуйте. Подскажите пожалуйста в чем причина моей проблемы. При оформлении расходной накладной добавляю товар (иностранного завода изготовителя). В счет-фактуре выдает товар страну и тп но поле ГТД остается пустым. хотя оно должно заполняться как я понимаю на основе выбранного товара. В сведениях о номенклатуре  ГТД выбранного товара прописано. Приходиться каждый раз в счет-фактуре вставлять вручную номер ГТД. Помогите пожалуйста решить проблему :dfbbdrfb:


chuevsf

ГТД  = Справочники.Номенклатура.ГТД;
Это самый простой способ в Вашем случае. Я думаю, что Вы догадаетесь, где это надо дописать?

ximec

в конфигураторе модуль документа Документ.Счет_фактура? Очень хороший вопрос, ибо мои знания в 1С на уровне чайника, хотя дружу с PHP и object pascal.

prog1c7.7

Тут примерно так:
В печатной форме ГТД - есть -
МнЧ.НомерГТД  - его родил - РаспредГТД.Номер -
его родил - ТаблицаГТД.ГТД - а эта тз
пополняется если есть по этой
номенклатуре движения
в  регистре РегПартии,
причем  - если в партии - идентифицируется, плюс
в "расход" - учитывается в этом движении -
в общем он нормально в движениях должен актуальным быть
(ну это если совсем просто - на русском)

ximec

О_о честно я не понял. Где находится печатная форма ГТД? Может действительно нужно куда-то воткнуть
ГТД  = Справочники.Номенклатура.ГТД;? На форме "Корректировка остатков по ГТД" когда я выбираю товар - ГТД прописывается само.
А вот на форме счет-фактуры нету( я уже тыркал этот код где "по сути" он мог бы быть, но ничего не изменялось. Подскажите пожалуйста куда именно прописать

prog1c7.7

имеется ввиду печатная форма Счет Фактуры в ней - ГТД - это МнЧ.НомерГТД... дальше по тексту

ximec

Тут либо я дурак либо там что-то нахимичено(((
Просто приходил человек (якобы программист 1С), что-то там начудил(вроде как обновил), а ГТД настроить не смог.
Вот код формы Счет-фактуры:

   Таб.ВывестиСекцию("Шапка");
   ВыбратьСтроки();
   Ном=0;
   ИтогСумма=0;
   ПовторТовара = ПолучитьПустоеЗначение("Справочник.Номенклатура");
   ВывелиСтроку = Нет;
   Пока ПолучитьСтроку() = 1 Цикл
      Ном=Ном+1;
      Если Товар.Выбран()=0 Тогда
         Продолжить;
      КонецЕсли;
      Ном=Ном+1;
      Если (ПовторТовара = Товар) И ((Цена+Сумма+НДС)=0) Тогда
         // если товар тот же, то идет разбивка товара в разрезе ГТД
         ПечЦена=" ----- ";
         ПечСумма=" ----- ";
         ПечСтавкаНДС=" -- ";
         ПечСуммаНДС=" -- ";
         ПечСуммаНП=" -- ";
         ПечВсегоСНДС=" ----- ";
         //СтранаН=" ----- ";
         Если ВывелиСтроку = Нет Тогда
            // Еще не напечатали строку "в том числе", то печатаем ее
            ВывелиСтроку = Да;
             ПечТовар="      в том числе:";
            СтранаН=" ----- ";
            НомерГТД_Н=" ----- ";
            ПечЕдиниц=" ----- ";
            ПечКолич=" ----- ";
            ПечАкцизЦена=" -- ";
            ПечАкцизСумма=" -- ";
      
            Таб.ВывестиСекцию("Строка");
         КонецЕсли;
         // Если несколько строк с одним товаром, то в повторяющихся строках выводим
         // только количество и номер ГТД
         НомерГТД=ГТД;
      Иначе
         // Новый товар
         ВывелиСтроку = Нет;
         
         Если (ДатаДок>Дата("31.12.2000")) и (Товар=Константа.АвансовыйПлатеж) Тогда
            // СФ на авансовые платежи печатаем с указанием суммы с НДС (базы налога)
            // в графе "Стоимость без налога"
            ПечСумма=глФРМ(Сумма,Рубли,0);                               
            ИтогСумма=ИтогСумма+Сумма;
            ПечЦена   =глФРМ(Цена,Рубли,0);
            ПроцентНДС=глПроцентНДС(СтавкаНДС);
            ПечПроцентНДС=Окр(ПроцентНДС/(100+ПроцентНДС)*100,2,1);
            ПечСтавкаНДС=?(СтавкаНДС=Перечисление.ЗначенияНДС.безНДС," -- ",""+ПечПроцентНДС+"%");
         Иначе
            ПечСумма=глФРМ(Сумма-НДС,Рубли,0);
            ИтогСумма=ИтогСумма+Сумма-НДС;
            ПечЦена   =?(Количество=0,0,глФРМ(Цена-НДС/Количество,Рубли,0));
            ПечСтавкаНДС=?(СтавкаНДС=Перечисление.ЗначенияНДС.безНДС," -- ",Строка(СтавкаНДС));
         КонецЕсли;
         
         ПечСуммаНДС=?(СтавкаНДС=Перечисление.ЗначенияНДС.безНДС," -- ",глФРМ(НДС,Рубли,0));
         ПечВсегоСНДС=глФРМ(Сумма,Рубли,0);                                                 
         ПечСуммаНП=глФРМ(СуммаНП,Рубли,0);                                                 
      КонецЕсли;           
      ПечТовар=СокрП(Товар.ПолнНаименование);
      ПечЕдиниц=Единица.ТипЕдиницы;
      ПечКолич=Формат(Количество, ФорматКоличества);
      
      ПечАкцизЦена=" -- ";
      ПечАкцизСумма=" -- ";
      
      Если ПустаяСтрока(СтранаПроисхождения)=1 Тогда
         Если ДатаДок<=Дата("31.12.2000") Тогда
            СтранаН="Россия";
         Иначе
            СтранаН="";
         КонецЕсли;
         
         
         //Если не указал страну, и указал Номер ГТД, то зачем-то это было нужно
         Если ПустаяСтрока(ГТД)=1 Тогда       
            Если ДатаДок<=Дата("31.12.2000") Тогда
               НомерГТД=" ----- ";
            Иначе     
               НомерГТД = Товар.ГТД
            КонецЕсли;
         Иначе
            ;
         КонецЕсли;
      Иначе
         СтранаН=СтранаПроисхождения;
         
         // Если номер пустой, и указана страна, то позволяем потом вписать номер ГТД
         // в напечатанном документе руками
         ГТД  = Номенклатура.ГТД;
      КонецЕсли;
      Таб.ВывестиСекцию("Строка");
      // Запоминаем текущий товар
      ПовторТовара = Товар;
   КонецЦикла;

   ПечИтогСумма=глФРМ(ИтогСумма,Рубли,0);
   ПечИтогАкцизСумма=" -- ";
   ПечИтогСуммаНДС=глФРМ(Итог("НДС"),Рубли,0);
   ПечИтогВсегоСНДС=глФРМ(Итог("Сумма"),Рубли,0);
   ПечИтогСуммаНП=глФРМ(Итог("СуммаНП"),Рубли,0);

   Если УчитыватьНП=1 Тогда
      ПечВсегоНП=?(Итог("СуммаНП")=0,"","Сумма налога с продаж:            "+глФРМ(Итог("СуммаНП"),Рубли,0));
   Иначе
      ПечВсегоНП="";
   КонецЕсли;

Дальше пошла подвальная часть....

Что тут может быть не так? пожалуйста подскажите

Теги:

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

Рейтинг@Mail.ru

Поиск