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

Внешняя печатная форма документа поступление товаровуслуг в УТ11

Автор Jalib, 12 сен 2016, 19:50

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

Jalib

Здравствуйте!вопрос, как отлаживать внешние печатные формы? ведь стандартный отладчик здесь не работает пишет, "в обработчике печати не был сформирован табличный документ для ПоступлениеТоваровиУслуг" и как тут понять где ошибка?

Анатолий Анпилогов

Цитата: Jalib от 12 сен 2016, 19:50
Здравствуйте!вопрос, как отлаживать внешние печатные формы? ведь стандартный отладчик здесь не работает пишет, "в обработчике печати не был сформирован табличный документ для ПоступлениеТоваровиУслуг" и как тут понять где ошибка?
Все просто!
В конфигураторе создаем "Внешняя обработка", В реквизит добавляем всего одно значение СсылкаНаОбъект, думаю понятно что это, в модуле формы для теста будет всего одна процедура
Процедура ВыполнитьНажатие()
    ТабДок = Печать();
    ТабДок.Показать();
КонецПроцедуры


В модуле объекта Экспортная функция печать и все вперед на отладку

Jalib

не могу понять где тут ошибка?игнорируются циклы заполнения областей макета"строкатаблицысоскидкой"и"строкатаблицы"
Запрос = Новый Запрос("ВЫБРАТЬ
|   ПоступлениеТоваровУслуг.Ссылка КАК Ссылка,
|   ПоступлениеТоваровУслуг.ВерсияДанных,
|   ПоступлениеТоваровУслуг.ПометкаУдаления,
|   ПоступлениеТоваровУслуг.Номер,
|   ПоступлениеТоваровУслуг.Дата,
|   ПоступлениеТоваровУслуг.Проведен,
|   ПоступлениеТоваровУслуг.Валюта,
|   ПоступлениеТоваровУслуг.Партнер как ПредставлениеПоставщика,
|   ПоступлениеТоваровУслуг.Соглашение,
|   ПоступлениеТоваровУслуг.ХозяйственнаяОперация,
|   ПоступлениеТоваровУслуг.Организация ПредставлениеПолучателя,
|   ПоступлениеТоваровУслуг.Подразделение,
|   ПоступлениеТоваровУслуг.Склад,
|   ПоступлениеТоваровУслуг.Контрагент ,
|   ПоступлениеТоваровУслуг.СуммаДокумента,
|   ПоступлениеТоваровУслуг.СуммаВзаиморасчетовПоЗаказу,
|   ПоступлениеТоваровУслуг.Менеджер,
|   ПоступлениеТоваровУслуг.ЗаказПоставщику,
|   ПоступлениеТоваровУслуг.ПодотчетноеЛицо,
|   ПоступлениеТоваровУслуг.ЦенаВключаетНДС,
|   ПоступлениеТоваровУслуг.ВалютаВзаиморасчетов,
|   ПоступлениеТоваровУслуг.Комментарий,
|   ПоступлениеТоваровУслуг.ДатаПлатежа,
|   ПоступлениеТоваровУслуг.ЗакупкаПодДеятельность,
|   ПоступлениеТоваровУслуг.ФормаОплаты,
|   ПоступлениеТоваровУслуг.Согласован,
|   ПоступлениеТоваровУслуг.НалогообложениеНДС,
|   ПоступлениеТоваровУслуг.ПредъявленСчетФактура,
|   ПоступлениеТоваровУслуг.НомерСчетаФактуры,
|   ПоступлениеТоваровУслуг.ДатаСчетаФактуры,
|   ПоступлениеТоваровУслуг.ВалютаСчетаФактуры,
|   ПоступлениеТоваровУслуг.СуммаВзаиморасчетов,
|   ПоступлениеТоваровУслуг.БанковскийСчетОрганизации,
|   ПоступлениеТоваровУслуг.НомерВходящегоДокумента,
|   ПоступлениеТоваровУслуг.ДатаВходящегоДокумента,
|   ПоступлениеТоваровУслуг.Грузоотправитель,
|   ПоступлениеТоваровУслуг.БанковскийСчетКонтрагента,
|   ПоступлениеТоваровУслуг.БанковскийСчетГрузоотправителя,
|   ПоступлениеТоваровУслуг.Сделка,
|   ПоступлениеТоваровУслуг.СуммаРасхождений,
|   ПоступлениеТоваровУслуг.СуммаИзлишков,
|   ПоступлениеТоваровУслуг.СуммаНедостачи,
|   ПоступлениеТоваровУслуг.СторонняяКомпания,
|   ПоступлениеТоваровУслуг.КонтрагентСтороннейКомпании,
|   ПоступлениеТоваровУслуг.ВалютаВзаиморасчетовСоСтороннейКомпанией,
|   ПоступлениеТоваровУслуг.СуммаРасчетовСоСтороннейКомпаниейПоРасхождениям,
|   ПоступлениеТоваровУслуг.СтатьяРасходовПоРасхождениям,
|   ПоступлениеТоваровУслуг.АналитикаРасходовПоРасхождениям,
|   ПоступлениеТоваровУслуг.СтатьяДоходовПоРасхождениям,
|   ПоступлениеТоваровУслуг.АналитикаДоходовПоРасхождениям,
|   ПоступлениеТоваровУслуг.ЕстьРасхождения,
|   ПоступлениеТоваровУслуг.Принял,
|   ПоступлениеТоваровУслуг.ПринялДолжность,
|   ПоступлениеТоваровУслуг.ПоступлениеПоЗаказам,
|   ПоступлениеТоваровУслуг.УдалитьЗакупкаПодДеятельностьОблагаемуюЕНВД,
|   ПоступлениеТоваровУслуг.ГруппаФинансовогоУчета,
|   ПоступлениеТоваровУслуг.РегистрироватьЦеныПоставщика,
|   ПоступлениеТоваровУслуг.Договор,
|   ПоступлениеТоваровУслуг.Автор,
|   ПоступлениеТоваровУслуг.Руководитель,
|   ПоступлениеТоваровУслуг.ПорядокРасчетов,
|   ПоступлениеТоваровУслуг.ВернутьМногооборотнуюТару,
|   ПоступлениеТоваровУслуг.ДатаВозвратаМногооборотнойТары,
|   ПоступлениеТоваровУслуг.СостояниеЗаполненияМногооборотнойТары,
|   ПоступлениеТоваровУслуг.ИспользуетсяОбособленноеОбеспечение,
|   ПоступлениеТоваровУслуг.СтаршийМенеджерПоЗакупкам,
|   ПоступлениеТоваровУслуг.Товары.(
|      Ссылка,
|      НомерСтроки,
|      Номенклатура,
|      НоменклатураПоставщика как Артикул,
|      Характеристика,
|      Упаковка,
|      КоличествоУпаковок,
|      Количество,
|      Цена,
|      УсловиеЦеныПоставщика,
|      ПроцентРучнойСкидки,
|      СуммаРучнойСкидки,
|      Сумма,
|      СтавкаНДС,
|      СуммаНДС,
|      СуммаСНДС,
|      СтатьяРасходов,
|      АналитикаРасходов,
|      КодСтроки,
|      НомерГТД,
|      Склад,
|      ЗаказПоставщику,
|      НомерСтрокиДокументаПоставщика,
|      Сертификат,
|      НомерПаспорта,
|      СтатусУказанияСерий,
|      Сделка,
|      СуммаВзаиморасчетов,
|      СуммаНДСВзаиморасчетов,
|      ВидЗапасов,
|      ИдентификаторСтроки,
|      АналитикаУчетаПартий,
|      Назначение
|   ),
|   ПоступлениеТоваровУслуг.ТоварыПоДаннымПоставщика.(
|      Ссылка,
|      НомерСтроки,
|      НоменклатураПоставщика,
|      Номенклатура,
|      Характеристика,
|      Упаковка,
|      КоличествоУпаковок,
|      Количество,
|      Цена,
|      УсловиеЦеныПоставщика,
|      Сумма,
|      СтавкаНДС,
|      СуммаНДС,
|      СуммаСНДС,
|      НомерГТД
|   ),
|   ПоступлениеТоваровУслуг.Расхождения.(
|      Ссылка,
|      НомерСтроки,
|      НоменклатураПоставщика,
|      Номенклатура,
|      Характеристика,
|      Упаковка,
|      КоличествоУпаковок,
|      Количество,
|      УсловиеЦеныПоставщика,
|      Цена,
|      Сумма,
|      СтавкаНДС,
|      СуммаНДС,
|      СуммаСНДС,
|      КодСтроки,
|      Склад,
|      ЗаказПоставщику,
|      ВариантРасхождений,
|      ВариантОтраженияРасхождений,
|      СуммаВзаиморасчетов,
|      СуммаНДСВзаиморасчетов,
|      АналитикаУчетаПартий,
|      ИдентификаторСтроки
|   ),
|   ПоступлениеТоваровУслуг.ДополнительныеРеквизиты.(
|      Ссылка,
|      НомерСтроки,
|      Свойство,
|      Значение,
|      ТекстоваяСтрока
|   ),
|   ПоступлениеТоваровУслуг.РасшифровкаПлатежа.(
|      Ссылка,
|      НомерСтроки,
|      Заказ,
|      Сумма,
|      ВалютаВзаиморасчетов,
|      СуммаВзаиморасчетов
|   ),
|   ПоступлениеТоваровУслуг.Серии.(
|      Ссылка,
|      НомерСтроки,
|      Серия,
|      Количество,
|      Номенклатура,
|      Характеристика,
|      Склад
|   ),
|   ПоступлениеТоваровУслуг.Представление,
|   ПоступлениеТоваровУслуг.МоментВремени
|ИЗ
|   Документ.ПоступлениеТоваровУслуг КАК ПоступлениеТоваровУслуг
|ГДЕ
|   ПоступлениеТоваровУслуг.Ссылка В(&МассивДокументов)
|
|УПОРЯДОЧИТЬ ПО
|   Ссылка
|;
|
|////////////////////////////////////////////////////////////////////////////////
|ВЫБРАТЬ
|   ВложенныйЗапрос.Ссылка КАК Ссылка,
|   ВложенныйЗапрос.НомерСтроки КАК НомерСтроки,
|   ВложенныйЗапрос.Номенклатура,
|   ВложенныйЗапрос.НоменклатураПоставщика,
|   ВложенныйЗапрос.Характеристика,
|   ВложенныйЗапрос.Упаковка,
|   ВложенныйЗапрос.КоличествоУпаковок,
|   ВложенныйЗапрос.Количество,
|   ВложенныйЗапрос.Цена,
|   ВложенныйЗапрос.УсловиеЦеныПоставщика,
|   ВложенныйЗапрос.ПроцентРучнойСкидки,
|   ВложенныйЗапрос.СуммаРучнойСкидки,
|   ВложенныйЗапрос.Сумма,
|   ВложенныйЗапрос.СтавкаНДС,
|   ВложенныйЗапрос.СуммаНДС,
|   ВложенныйЗапрос.СуммаСНДС,
|   ВложенныйЗапрос.СтатьяРасходов,
|   ВложенныйЗапрос.АналитикаРасходов,
|   ВложенныйЗапрос.КодСтроки,
|   ВложенныйЗапрос.НомерГТД,
|   ВложенныйЗапрос.Склад,
|   ВложенныйЗапрос.ЗаказПоставщику,
|   ВложенныйЗапрос.НомерСтрокиДокументаПоставщика,
|   ВложенныйЗапрос.Сертификат,
|   ВложенныйЗапрос.НомерПаспорта,
|   ВложенныйЗапрос.СтатусУказанияСерий,
|   ВложенныйЗапрос.Сделка,
|   ВложенныйЗапрос.СуммаВзаиморасчетов,
|   ВложенныйЗапрос.СуммаНДСВзаиморасчетов,
|   ВложенныйЗапрос.ВидЗапасов,
|   ВложенныйЗапрос.ИдентификаторСтроки,
|   ВложенныйЗапрос.АналитикаУчетаПартий,
|   ВложенныйЗапрос.Назначение
|ИЗ
|   (ВЫБРАТЬ
|      ПоступлениеТоваровУслугТовары.Ссылка КАК Ссылка,
|      ПоступлениеТоваровУслугТовары.НомерСтроки КАК НомерСтроки,
|      ПоступлениеТоваровУслугТовары.Номенклатура КАК Номенклатура,
|      ПоступлениеТоваровУслугТовары.НоменклатураПоставщика КАК НоменклатураПоставщика,
|      ПоступлениеТоваровУслугТовары.Характеристика КАК Характеристика,
|      ПоступлениеТоваровУслугТовары.Упаковка КАК Упаковка,
|      ПоступлениеТоваровУслугТовары.КоличествоУпаковок КАК КоличествоУпаковок,
|      ПоступлениеТоваровУслугТовары.Количество КАК Количество,
|      ПоступлениеТоваровУслугТовары.Цена КАК Цена,
|      ПоступлениеТоваровУслугТовары.УсловиеЦеныПоставщика КАК УсловиеЦеныПоставщика,
|      ПоступлениеТоваровУслугТовары.ПроцентРучнойСкидки КАК ПроцентРучнойСкидки,
|      ПоступлениеТоваровУслугТовары.СуммаРучнойСкидки КАК СуммаРучнойСкидки,
|      ПоступлениеТоваровУслугТовары.Сумма КАК Сумма,
|      ПоступлениеТоваровУслугТовары.СтавкаНДС КАК СтавкаНДС,
|      ПоступлениеТоваровУслугТовары.СуммаНДС КАК СуммаНДС,
|      ПоступлениеТоваровУслугТовары.СуммаСНДС КАК СуммаСНДС,
|      ПоступлениеТоваровУслугТовары.СтатьяРасходов КАК СтатьяРасходов,
|      ПоступлениеТоваровУслугТовары.АналитикаРасходов КАК АналитикаРасходов,
|      ПоступлениеТоваровУслугТовары.КодСтроки КАК КодСтроки,
|      ПоступлениеТоваровУслугТовары.НомерГТД КАК НомерГТД,
|      ПоступлениеТоваровУслугТовары.Склад КАК Склад,
|      ПоступлениеТоваровУслугТовары.ЗаказПоставщику КАК ЗаказПоставщику,
|      ПоступлениеТоваровУслугТовары.НомерСтрокиДокументаПоставщика КАК НомерСтрокиДокументаПоставщика,
|      ПоступлениеТоваровУслугТовары.Сертификат КАК Сертификат,
|      ПоступлениеТоваровУслугТовары.НомерПаспорта КАК НомерПаспорта,
|      ПоступлениеТоваровУслугТовары.СтатусУказанияСерий КАК СтатусУказанияСерий,
|      ПоступлениеТоваровУслугТовары.Сделка КАК Сделка,
|      ПоступлениеТоваровУслугТовары.СуммаВзаиморасчетов КАК СуммаВзаиморасчетов,
|      ПоступлениеТоваровУслугТовары.СуммаНДСВзаиморасчетов КАК СуммаНДСВзаиморасчетов,
|      ПоступлениеТоваровУслугТовары.ВидЗапасов КАК ВидЗапасов,
|      ПоступлениеТоваровУслугТовары.ИдентификаторСтроки КАК ИдентификаторСтроки,
|      ПоступлениеТоваровУслугТовары.АналитикаУчетаПартий КАК АналитикаУчетаПартий,
|      ПоступлениеТоваровУслугТовары.Назначение КАК Назначение
|   ИЗ
|      Документ.ПоступлениеТоваровУслуг.Товары КАК ПоступлениеТоваровУслугТовары) КАК ВложенныйЗапрос
|
|УПОРЯДОЧИТЬ ПО
|   Ссылка,
|   НомерСтроки");
    Запрос.УстановитьПараметр("МассивДокументов",             МассивОбъектов);

   ТабличныйДокумент = Новый ТабличныйДокумент;
   ТабличныйДокумент.ИмяПараметровПечати = "ПАРАМЕТРЫ_ПЕЧАТИ_ПоступлениеТоваровУслуг";           
   
   ТабличныйДокумент = Новый ТабличныйДокумент;
   МассивРезультатов          = Запрос.ВыполнитьПакет();
   ДанныеПечати         = МассивРезультатов[0].Выбрать();
   ВыборкаПоДокументам    = МассивРезультатов[1].Выбрать(ОбходРезультатаЗапроса.ПоГруппировкам);
   
   ПервыйДокумент = Истина;
   Макет = ПолучитьМакет("Макет");
//   
   Пока ДанныеПечати.Следующий() Цикл
      
      // Найдем в выборке товары по текущему документу
      СтруктураПоиска = Новый Структура("Ссылка", ДанныеПечати.Ссылка);
      НайденСледующий = ВыборкаПоДокументам.НайтиСледующий(СтруктураПоиска);
      
      // Если в накладной только услуги - перейдем к следующему документу
      
      Если НайденСледующий Тогда
         ВыборкаПоТоварам = ВыборкаПоДокументам.Выбрать();
         ВыборкаПоТоварам.Сбросить();
      Иначе
         Продолжить;
      КонецЕсли;
      
      Если Не ПервыйДокумент Тогда
         ТабличныйДокумент.ВывестиГоризонтальныйРазделительСтраниц();
      КонецЕсли;
      
      ПервыйДокумент    = Ложь;
      НомерСтрокиНачало = ТабличныйДокумент.ВысотаТаблицы + 1;
      
//////////////////////////////////////////////////////////////////////////////////////////////////
        //Штамп 
        ОбластьМакета = Макет.ПолучитьОбласть("ОбластьШтрихкода");
        ОбластьМакета.Параметры.Заполнить(ДанныеПечати);
      ТабличныйДокумент.Вывести(ОбластьМакета);
                                 
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////Заголовок
                    ///////////////////////////////////Заголовок
         ОбластьМакета = Макет.ПолучитьОбласть("Заголовок");
        ТекстЗаголовка = ОбщегоНазначенияУТКлиентСервер.СформироватьЗаголовокДокумента(ДанныеПечати, НСтр("ru='ПоступлениеТоваровУслуг'"));
        //ОбластьМакета.Параметры.Заполнить(ДанныеПечати);
        ОбластьМакета.Параметры.ТекстЗаголовка = ТекстЗаголовка;
        //ОбластьМакета.Параметры.Заполнить(ДанныеПечати);
        ТабличныйДокумент.Вывести(ОбластьМакета);
       
       ///////////////////////////////////Поставщик
         ОбластьМакета = Макет.ПолучитьОбласть("Поставщик");
          ОбластьМакета.Параметры.Заполнить(ДанныеПечати);
        ТабличныйДокумент.Вывести(ОбластьМакета);
       
         ///////////////////////////////////Покупатель
         ОбластьМакета = Макет.ПолучитьОбласть("Покупатель");
          ОбластьМакета.Параметры.Заполнить(ДанныеПечати);
        ТабличныйДокумент.Вывести(ОбластьМакета);
         //шапка таблицы
          ОбластьМакета = Макет.ПолучитьОбласть("ШапкаТаблицы");
          ОбластьМакета.Параметры.Заполнить(ДанныеПечати);
        ТабличныйДокумент.Вывести(ОбластьМакета);
       
      
      // Выводим строки таблицы Товары со скидкой
         
      ОбластьМакета = Макет.ПолучитьОбласть("СтрокаТаблицыСоСкидкой");
      НомерСтроки = 0;
      Пока ВыборкаПоТоварам.Следующий() Цикл
         сообщить("мы в строкетаблицысоскидкой");

         НомерСтроки = НомерСтроки + 1;
         
         ОбластьМакета.Параметры.НомерСтроки = НомерСтроки;
         ОбластьМакета.Параметры.Артикул=  ВыборкаПоДокументам.Артикул;
         //ОбластьМакета.Параметры.Заполнить(ВыборкаПоТоварам);
         сообщить(НомерСтроки);
         сообщить(ВыборкаПоДокументам.Артикул);
         ТабличныйДокумент.Вывести(ОбластьМакета);

      КонецЦикла;
      
      //подвал со скидкой таблицы
          ОбластьМакета = Макет.ПолучитьОбласть("ПодвалТаблицыСоСкидкой");
          ОбластьМакета.Параметры.Заполнить(ДанныеПечати);
        ТабличныйДокумент.Вывести(ОбластьМакета);
////////////cтрока таблицы
      ОбластьМакета = Макет.ПолучитьОбласть("СтрокаТаблицы");
      НомерСтроки = 0;
      Пока ВыборкаПоТоварам.Следующий() Цикл
         
         НомерСтроки = НомерСтроки + 1;
         
         ОбластьМакета.Параметры.НомерСтроки = НомерСтроки;
         ОбластьМакета.Параметры.Артикул=  ВыборкаПоДокументам.Артикул;
          ОбластьМакета.Параметры.Заполнить(ВыборкаПоТоварам);
         ТабличныйДокумент.Вывести(ОбластьМакета);

      КонецЦикла;
        //подвал со скидкой таблицы
          ОбластьМакета = Макет.ПолучитьОбласть("ПодвалТаблицы");
          ОбластьМакета.Параметры.Заполнить(ДанныеПечати);
        ТабличныйДокумент.Вывести(ОбластьМакета);

        //ПодвалТаблицыНДС
          ОбластьМакета = Макет.ПолучитьОбласть("ПодвалТаблицыНДС");
          ОбластьМакета.Параметры.Заполнить(ДанныеПечати);
        ТабличныйДокумент.Вывести(ОбластьМакета);

       //СуммаПрописью
          ОбластьМакета = Макет.ПолучитьОбласть("СуммаПрописью");
          ОбластьМакета.Параметры.Заполнить(ДанныеПечати);
        ТабличныйДокумент.Вывести(ОбластьМакета);

        //Подписи
          ОбластьМакета = Макет.ПолучитьОбласть("Подписи");
          ОбластьМакета.Параметры.Заполнить(ДанныеПечати);
        ТабличныйДокумент.Вывести(ОбластьМакета);

       
   конеццикла;    
   
ТабличныйДокумент.АвтоМасштаб = Истина;

   Если ПривилегированныйРежим() Тогда
      УстановитьПривилегированныйРежим(Ложь);
   КонецЕсли;
   
   
   
   Возврат ТабличныйДокумент;   


КонецФункции
Добавлено: 14 сен 2016, 16:47


тема не актуальна и её можно закрыть

Теги:

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

Рейтинг@Mail.ru

Поиск