Создание внешней обработки HELP

[mister-q88]

Уважаемые участники форума прошу у вас помощи, имеется 1С Предприятие 8.2  Бухглатерия для Казахстана редакция 2.0
Необходимо установить внешнюю обработку форму 3-2 Накладную на отпуск запасов на сторону, но она не устанавливается ошибки в модуле

Файл во вложении ошибки проверял через конфигуратор.

Очень прошу помогите

[MuI_I_Ika]

У меня нет казахтанской бухгалтерии проверять не на чем. Может скажешь какие ошибки посоветую как исправлять.

[mister-q88]

Ошибки: {ВнешняяОбработка.НакладнаяНаОтпускЗапасовЗ2.МодульОбъекта(173,108)}: Переменная не определена (ФормированиеПечатныхФорм)
      ОбластьМакета.Параметры.ТоварНаименование = СокрЛП(ВыборкаСтрокТовары.Номенклатура.НаименованиеПолное) + <<?>>ФормированиеПечатныхФорм.ПредставлениеСерий(ВыборкаСтрокТовары); (Проверка: Толстый клиент (обычное приложение))
{ВнешняяОбработка.НакладнаяНаОтпускЗапасовЗ2.МодульОбъекта(380,108)}: Переменная не определена (ФормированиеПечатныхФорм)
      ОбластьМакета.Параметры.ТоварНаименование = СокрЛП(ВыборкаСтрокТовары.Номенклатура.НаименованиеПолное) + <<?>>ФормированиеПечатныхФорм.ПредставлениеСерий(ВыборкаСтрокТовары); (Проверка: Толстый клиент (обычное приложение))

А вот так выглядит код.

Код Выделить Развернуть

// Функция формирует табличный документ унифицированной формы З-8
//
// Параметры:
//  Нет.
//
// Возвращаемое значение:
//  Табличный документ по форме З-8.
//
Функция ПечатьРеализацияТоваровиУслуг() Экспорт

Запрос = Новый Запрос;
Запрос.УстановитьПараметр("ТекДокумент", СсылкаНаОбъект);
Запрос.УстановитьПараметр("Дата", СсылкаНаОбъект.Дата);

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

Шапка = Запрос.Выполнить().Выбрать();
Шапка.Следующий();

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

ВыборкаСтрокТоварыИтоги = ЗапросПоТоварам.Выполнить().Выбрать(ОбходРезультатаЗапроса.ПоГруппировкамСИерархией);
ВыборкаСтрокТоварыИтоги.Следующий();

ВыборкаСтрокТовары = ВыборкаСтрокТоварыИтоги.Выбрать();

Макет = ПолучитьМакет("З2");

ТабДокумент = Новый ТабличныйДокумент;

// Зададим параметры макета
ТабДокумент.ПолеСверху         = 0;
ТабДокумент.ПолеСлева          = 10;
ТабДокумент.ПолеСнизу          = 0;
ТабДокумент.ПолеСправа         = 0;
ТабДокумент.ОриентацияСтраницы = ОриентацияСтраницы.Портрет;
   
ТабДокумент.ИмяПараметровПечати = "ПАРАМЕТРЫ_ПЕЧАТИ_ПередачаТоваров_З2";

// Выводим общие реквизиты шапки
ОбластьМакета = Макет.ПолучитьОбласть("Шапка");

СведенияОбОрганизации = ОбщегоНазначения.СведенияОЮрФизЛице(Шапка.Организация, Шапка.ДатаДокумента);
ТекстРНН_БИН   = "";

ОбластьМакета.Параметры.Заполнить(Шапка);
ОбластьМакета.Параметры.ПредставлениеОрганизации = ОбщегоНазначения.ОписаниеОрганизации(СведенияОбОрганизации, "ПолноеНаименование,");
ОбластьМакета.Параметры.ПредставлениеОтправителя = ОбщегоНазначения.ОписаниеОрганизации(СведенияОбОрганизации, "ПолноеНаименование,");
ОбластьМакета.Параметры.ОрганизацияРНН_БИН = ОбщегоНазначения.ОписаниеОрганизации(СведенияОбОрганизации, "БИН_ИИН,", Ложь, Шапка.ДатаДокумента, "ru");
ОбластьМакета.Параметры.НомерДокумента           = ОбщегоНазначения.ПолучитьНомерНаПечать(СсылкаНаОбъект, глСписокПрефиксовУзлов);

ОтветственныйДляПечати  = "";
ДолжностьОтветственного = "";

Если ТипЗнч(Шапка.Ответственный) = Тип("СправочникСсылка.ФизическиеЛица") Тогда
ДанныеОтветственного = ПроцедурыУправленияПерсоналом.ДанныеФизЛица(Шапка.Организация, Шапка.Ответственный, СсылкаНаОбъект.Дата);
ОтветственныйДляПечати = ДанныеОтветственного.Представление;
ДолжностьОтветственного = ДанныеОтветственного.Должность;
Иначе
ОтветственныйДляПечати = Шапка.Ответственный;
КонецЕсли;

ОбластьМакета.Параметры.ОтветственныйЗаПоставку = ОтветственныйДляПечати;

ПредставлениеПолучателя = ОбщегоНазначения.ОписаниеОрганизации(ОбщегоНазначения.СведенияОЮрФизЛице(Шапка.Контрагент, Шапка.ДатаДокумента), "ПолноеНаименование,");
ОбластьМакета.Параметры.ПредставлениеПолучателя = ПредставлениеПолучателя;

ТабДокумент.Вывести(ОбластьМакета);

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

КоличествоСтрок = ВыборкаСтрокТовары.Количество();

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

Пока ВыборкаСтрокТовары.Следующий() Цикл

Если НЕ ЗначениеЗаполнено(ВыборкаСтрокТовары.Номенклатура) Тогда
Сообщить("В одной из строк не заполнено значение номенклатуры - строка при печати пропущена.", СтатусСообщения.Важное);
Продолжить;
КонецЕсли;

Если Не УниверсальныеМеханизмы.ПроверитьВыводДляТабличногоДокумента(ТабДокумент, ОбластьМакета) Тогда
ТабДокумент.ВывестиГоризонтальныйРазделительСтраниц();
            ТабДокумент.Вывести(ЗаголовокТаблицы);
КонецЕсли;

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

КонецЦикла;

// Выводим итоги по документу
ОбластьМакета    = Макет.ПолучитьОбласть("Итого");
//ОбластьМакета.Параметры.Валюта = Шапка.ВалютаПредставление;

ОбластьМакета.Параметры.КоличествоПорядковыхНомеровЗаписейПрописью = ЧислоПрописью(КоличествоСтрок, ,",,,,,,,,0");
ОбластьМакета.Параметры.СуммаПрописью = ОбщегоНазначения.СформироватьСуммуПрописью(?(ЗначениеЗаполнено(ВыборкаСтрокТоварыИтоги.СуммаСНДС),ВыборкаСтрокТоварыИтоги.СуммаСНДС,0), Шапка.ВалютаДокумента);

ТабДокумент.Вывести(ОбластьМакета);

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

ОбластьМакета.Параметры.Доверенность = СокрЛП(Шапка.Доверенность);
ОбластьМакета.Параметры.ЧерезКого    = СокрЛП(Шапка.ЧерезКого);

Руководители = ОбщегоНазначения.ОтветственныеЛицаОрганизаций(Шапка.Организация, Шапка.ДатаДокумента,);
Бухгалтер    = ?(НЕ ЗначениеЗаполнено(Руководители.ГлавныйБухгалтер), "Не предусмотрен", Руководители.ГлавныйБухгалтер);
ОбластьМакета.Параметры.ГлБухгалтер = Бухгалтер;

// заполняем ответстенного за разрешения отпуска товара
Если ЗначениеЗаполнено(Шапка.ОтпускРазрешил) Тогда
ДанныеМОЛ = ПроцедурыУправленияПерсоналом.ДанныеФизЛица(Шапка.Организация, Шапка.ОтпускРазрешил, СсылкаНаОбъект.Дата);
ОбластьМакета.Параметры.ОтпускРазрешил          = ДанныеМОЛ.Представление;
ОбластьМакета.Параметры.ОтпускРазрешилДолжность = ДанныеМОЛ.Должность;
Иначе
ОбластьМакета.Параметры.ОтпускРазрешил          = ОтветственныйДляПечати;
ОбластьМакета.Параметры.ОтпускРазрешилДолжность = ДолжностьОтветственного;
КонецЕсли;

// заполняем ответстенного за отпуск товара
Если ЗначениеЗаполнено(Шапка.ОтпускПроизвел) Тогда
ДанныеМОЛ = ПроцедурыУправленияПерсоналом.ДанныеФизЛица(Шапка.Организация, Шапка.ОтпускПроизвел, СсылкаНаОбъект.Дата);
ОбластьМакета.Параметры.МОЛОтпустил = ДанныеМОЛ.Представление;
Иначе
Если ЗначениеЗаполнено(Шапка.Склад) Тогда
ДанныеМОЛ = ПроцедурыУправленияПерсоналом.ДанныеФизЛица(Шапка.Организация, Шапка.МОЛ, СсылкаНаОбъект.Дата);
ОбластьМакета.Параметры.МОЛОтпустил = ДанныеМОЛ.Представление;
КонецЕсли;
КонецЕсли;                    
   
ТабДокумент.Вывести(ОбластьМакета);

Возврат ТабДокумент;

КонецФункции // Печать()

// Функция формирует табличный документ унифицированной формы З-8
//
// Параметры:
//  Нет.
//
// Возвращаемое значение:
//  Табличный документ по форме З-8.
//
Функция ПечатьРасходныйОрдерНаТовары() Экспорт

Запрос = Новый Запрос;
Запрос.УстановитьПараметр("ТекДокумент", СсылкаНаОбъект);
Запрос.УстановитьПараметр("Дата", СсылкаНаОбъект.Дата);

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

Шапка = Запрос.Выполнить().Выбрать();
Шапка.Следующий();

ЗапросПоТоварам = Новый Запрос();
ЗапросПоТоварам.УстановитьПараметр("ТекДокумент", СсылкаНаОбъект);
ЗапросПоТоварам.Текст =
"ВЫБРАТЬ РАЗРЕШЕННЫЕ
| РасходныйОрдерНаТовары.Номенклатура КАК Номенклатура,
| ВЫРАЗИТЬ(РасходныйОрдерНаТовары.Номенклатура.НаименованиеПолное КАК СТРОКА(1000)) КАК ТоварНаименование,
| РасходныйОрдерНаТовары.ХарактеристикаНоменклатуры КАК Характеристика,
| РасходныйОрдерНаТовары.СерияНоменклатуры КАК Серия,
| РасходныйОрдерНаТовары.Номенклатура.Код КАК ТоварКод,
| ЕСТЬNULL(РасходныйОрдерНаТовары.Количество, 0) КАК Количество,
| РасходныйОрдерНаТовары.ЕдиницаИзмерения КАК ЕдиницаИзмеренияНаименование,
| РасходныйОрдерНаТовары.НомерСтроки КАК НомерСтроки,
| 0 КАК Метка
|ИЗ
| Документ.РасходныйОрдерНаТовары.Товары КАК РасходныйОрдерНаТовары
|ГДЕ
| РасходныйОрдерНаТовары.Ссылка = &ТекДокумент
|
|ОБЪЕДИНИТЬ ВСЕ
|
|ВЫБРАТЬ
| РасходныйОрдерНаТовары.Номенклатура,
| ВЫРАЗИТЬ(РасходныйОрдерНаТовары.Номенклатура.НаименованиеПолное КАК СТРОКА(1000)),
| NULL,
| NULL,
| РасходныйОрдерНаТовары.Номенклатура.Код,
| ЕСТЬNULL(РасходныйОрдерНаТовары.Количество, 0),
| РасходныйОрдерНаТовары.Номенклатура.ЕдиницаХраненияОстатков.Представление,
| РасходныйОрдерНаТовары.НомерСтроки,
| 1
|ИЗ
| Документ.РасходныйОрдерНаТовары.ВозвратнаяТара КАК РасходныйОрдерНаТовары
|ГДЕ
| РасходныйОрдерНаТовары.Ссылка = &ТекДокумент
|
|УПОРЯДОЧИТЬ ПО
| Метка,
| НомерСтроки";


ВыборкаСтрокТовары =  ЗапросПоТоварам.Выполнить().Выбрать();

Макет = ПолучитьМакет("З2");

ТабДокумент = Новый ТабличныйДокумент;

// Зададим параметры макета
ТабДокумент.ПолеСверху         = 0;
ТабДокумент.ПолеСлева          = 10;
ТабДокумент.ПолеСнизу          = 0;
ТабДокумент.ПолеСправа         = 0;
ТабДокумент.ОриентацияСтраницы = ОриентацияСтраницы.Ландшафт;
   
ТабДокумент.ИмяПараметровПечати = "ПАРАМЕТРЫ_ПЕЧАТИ_ПередачаТоваров_З2";

// Выводим общие реквизиты шапки
ОбластьМакета = Макет.ПолучитьОбласть("Шапка");

СведенияОбОрганизации = ОбщегоНазначения.СведенияОЮрФизЛице(Шапка.Организация, Шапка.ДатаДокумента);
ТекстРНН_БИН   = "";

ОбластьМакета.Параметры.Заполнить(Шапка);
ОбластьМакета.Параметры.ПредставлениеОрганизации = ОбщегоНазначения.ОписаниеОрганизации(СведенияОбОрганизации, "ПолноеНаименование,");
ОбластьМакета.Параметры.ПредставлениеОтправителя = ОбщегоНазначения.ОписаниеОрганизации(СведенияОбОрганизации, "ПолноеНаименование,");
ОбластьМакета.Параметры.ОрганизацияРНН_БИН = ОбщегоНазначения.ОписаниеОрганизации(СведенияОбОрганизации, "БИН_ИИН,", Ложь, Шапка.ДатаДокумента, "ru");
ОбластьМакета.Параметры.НомерДокумента           = ОбщегоНазначения.ПолучитьНомерНаПечать(СсылкаНаОбъект, глСписокПрефиксовУзлов);

ОтветственныйДляПечати  = "";
ДолжностьОтветственного = "";

Если ТипЗнч(Шапка.Ответственный) = Тип("СправочникСсылка.ФизическиеЛица") Тогда
ДанныеОтветственного = ПроцедурыУправленияПерсоналом.ДанныеФизЛица(Шапка.Организация, Шапка.Ответственный, СсылкаНаОбъект.Дата);
ОтветственныйДляПечати = ДанныеОтветственного.Представление;
ДолжностьОтветственного = ДанныеОтветственного.Должность;
Иначе
ОтветственныйДляПечати = Шапка.Ответственный;
КонецЕсли;

ОбластьМакета.Параметры.ОтветственныйЗаПоставку = ОтветственныйДляПечати;

ПредставлениеПолучателя = ОбщегоНазначения.ОписаниеОрганизации(ОбщегоНазначения.СведенияОЮрФизЛице(Шапка.Контрагент, Шапка.ДатаДокумента), "ПолноеНаименование,");
ОбластьМакета.Параметры.ПредставлениеПолучателя = ПредставлениеПолучателя;

ТабДокумент.Вывести(ОбластьМакета);

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

КоличествоСтрок = ВыборкаСтрокТовары.Количество();

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

ИтогоКоличество  = 0;
ИтогоСумма       = 0;


Пока ВыборкаСтрокТовары.Следующий() Цикл

Если НЕ ЗначениеЗаполнено(ВыборкаСтрокТовары.Номенклатура) Тогда
Сообщить("В одной из строк не заполнено значение номенклатуры - строка при печати пропущена.", СтатусСообщения.Важное);
Продолжить;
КонецЕсли;

Если Не УниверсальныеМеханизмы.ПроверитьВыводДляТабличногоДокумента(ТабДокумент, ОбластьМакета) Тогда
ТабДокумент.ВывестиГоризонтальныйРазделительСтраниц();
            ТабДокумент.Вывести(ЗаголовокТаблицы);
КонецЕсли;

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

ИтогоКоличество = ИтогоКоличество + ВыборкаСтрокТовары.Количество;

КонецЦикла;

// Выводим итоги по документу
ОбластьМакета    = Макет.ПолучитьОбласть("Итого");
//ОбластьМакета.Параметры.Валюта = Шапка.ВалютаПредставление;

ОбластьМакета.Параметры.КоличествоПорядковыхНомеровЗаписейПрописью = ЧислоПрописью(КоличествоСтрок, ,",,,,,,,,0");
ОбластьМакета.Параметры.СуммаПрописью = ОбщегоНазначения.СформироватьСуммуПрописью(ИтогоСумма, Шапка.ВалютаДокумента);

ТабДокумент.Вывести(ОбластьМакета);

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

Руководители = ОбщегоНазначения.ОтветственныеЛицаОрганизаций(Шапка.Организация, Шапка.ДатаДокумента,);
Бухгалтер    = ?(НЕ ЗначениеЗаполнено(Руководители.ГлавныйБухгалтер), "Не предусмотрен", Руководители.ГлавныйБухгалтер);
ОбластьМакета.Параметры.ГлБухгалтер = Бухгалтер;

// заполняем ответсвтенного за отпуск товара
Если ЗначениеЗаполнено(Шапка.МОЛОтпустил) Тогда
ДанныеМОЛ = ПроцедурыУправленияПерсоналом.ДанныеФизЛица(Шапка.Организация, Шапка.МОЛОтпустил, Шапка.ДатаДокумента);
ОбластьМакета.Параметры.МОЛОтпустил = ДанныеМОЛ.Представление;
КонецЕсли;
   
ТабДокумент.Вывести(ОбластьМакета);

Возврат ТабДокумент;

КонецФункции // Печать()
     
Функция Печать() Экспорт
Если ТипЗнч(СсылкаНаОбъект) = Тип("ДокументСсылка.РеализацияТоваровУслуг") Тогда
Возврат ПечатьРеализацияТоваровиУслуг();
ИначеЕсли ТипЗнч(СсылкаНаОбъект) = Тип("ДокументСсылка.РасходныйОрдерНаТовары") Тогда
        Возврат ПечатьРасходныйОрдерНаТовары() ;
КонецЕсли;
КонецФункции


[LordWizard]

Блин! без тегов кода глаза ломает текст

Добавлено: 05 фев 2014, 14:55

У Вас вообще нет общего модуля "ФормированиеПечатныхФорм" в конфигурации - вот что.

[mister-q88]

как по умному его выложить с цветными буквами?

[MuI_I_Ika]

А вы уверены что эта обработка подходит для этой конфигурации?

Если нет общего модуля ФормированиеПечатныхФорм, то может не быть многих функций и процедур и других модулей.

[mister-q88]

Я ее нашел на нашем сайте, там человек пишет что она идет кросплатформенная и что другие люди ее скачивали, что вроде рабочая.
 

[MuI_I_Ika]

Значит поиском в конфигурации найдите функцию ПредставлениеСерий()

Определите в каком она модуле. Если в том же, то проверьте у него галочку глобальный. Если модуль глобальный, то просто поменяйте в обработке вызов функции без указания модуля.

Если функция в другом модуле, то переделайте вызов на него.

Если функции нет, то придется дописать ее самостоятельно в обработку.

[mister-q88]

Вот честно я полный ноль во все этих делах то что вы мне сказали найти в коде ПредставлениеСерий через поиск нашел а что дальше с ним делать глобальный он или не глобальный я понятия не имею. Вроде с компами и на ты общаюсь, а во все эти програмные дебри никогда не совался.    

[LordWizard]

Я ее нашел на нашем сайте, там человек пишет что она идет кросплатформенная и что другие люди ее скачивали, что вроде рабочая.
 

Могли скачивать под другую конфигурацию. У каждой конфигурации могут быть свои механизмы, а соответственно свои общие отличные модули и процедуры.