Переделанная стандартная обработка ПечатьЭтикетокИЦенников для УТ 11.0.9.15. Позволяет вывести в печатную форму дополнительное значение цены по выбранному типу цен.
Необходимо заменить встроенную обработку ПечатьЭтикетокИЦенников обработкой из файла, после этого в модуле менеджера обработки ПечатьЭтикетокИЦенников добавить несколько строк кодаВ процедуре СформироватьПечатныеФормыЭтикетокИЦенниковТоваров:
//СТРОКА 392
//my begin
СтруктураНастроек.ПараметрыДанных.Вставить("ВидЦеныДоп", МассивОбъектов[0].ВидЦеныДоп);
//my end:
//СТРОКА 465
//my begin
//Область.Параметры[ПараметрШаблона.Значение] = СтрокаТовары[НаименованиеКолонки];
Если (ПараметрШаблона.Ключ = "Цена") ИЛИ (ПараметрШаблона.Ключ = "ЦенаДоп") Тогда
Область.Параметры[ПараметрШаблона.Значение] = Формат(СтрокаТовары[НаименованиеКолонки], "ЧЦ='15'; ЧДЦ='2'; ЧРД='.'; ЧГ='0,2'");
Иначе
Область.Параметры[ПараметрШаблона.Значение] = СтрокаТовары[НаименованиеКолонки];
КонецЕсли;
//my end
Значения в полях Цена и ЦенаДоп дополнительно форматируются до вида 99.99, при необходимости можно убрать данную возможность, заменив в модуле менеджера в процедуре СформироватьПечатныеФормыЭтикетокИЦенниковТоваров, код:
//my begin
//Область.Параметры[ПараметрШаблона.Значение] = СтрокаТовары[НаименованиеКолонки];
Если (ПараметрШаблона.Ключ = "Цена") ИЛИ (ПараметрШаблона.Ключ = "ЦенаДоп") Тогда
Область.Параметры[ПараметрШаблона.Значение] = Формат(СтрокаТовары[НаименованиеКолонки], "ЧЦ='15'; ЧДЦ='2'; ЧРД='.'; ЧГ='0,2'");
Иначе
Область.Параметры[ПараметрШаблона.Значение] = СтрокаТовары[НаименованиеКолонки];
КонецЕсли;
//my end
на код:
Область.Параметры[ПараметрШаблона.Значение] = СтрокаТовары[НаименованиеКолонки]; Вступайте в нашу телеграмм-группу Инфостарт
