gifts2017

Печать этикеток со штрихкодом

Опубликовал Max Kom (1C8) в раздел Печать - Печатные формы документов

Обработка для печати этикеток со штрих кодом.

Много видел обработок для печати этикеток и штрих кодов отдельно, но вот чтобы все в одном не нашел. Пришлось взять за основу готовую форму печати этикеток и "подрисовать" штрих код. Макеты ценников просьба редактировать самим по своему желанию. Если у кого возникают трудности пишите, расскажу как.

Обработка работает только в конфигурации Управление торговлей редакции 10.3. Работа в других конфигурациях не гарантируется.

Добавил обработки для печати ценников из документов Поступления, Перемещения, Переоценки.

1. Первую, саму обработку по печати ценников добавляем как внешнюю обработку и называем "Печать ценников" (именно так и никак иначе, по другому не будет работать)

2. Добавляем остальные 3 обработки как внешние печатные формы и прикрепляем их к соответствующим документам.

В итоге, у вас в указанных документах при нажатии на кнопку "Печать" появится новая строчка "Печать ценников из ....." (смотря как назовете ВПФ) при нажатии на которую откроется обработка по печати ценников с заполненной табличной частью и количеством из вызванного документа.

Всем удачи! ;-)

Скачать файлы

Наименование Файл Версия Размер Кол. Скачив.
Ценники со штрих кодами.epf
.1245814370 52,41Kb
09.07.13
468
.1245814370 52,41Kb 468 Скачать
Печать цеников из Перемещения
.epf 8,70Kb
09.07.13
10
.epf 8,70Kb 10 Скачать
Печать цеников из Поступления
.epf 7,44Kb
09.07.13
19
.epf 7,44Kb 19 Скачать
Печать цеников из Переоценки
.epf 7,52Kb
09.07.13
6
.epf 7,52Kb 6 Скачать

См. также

Подписаться Добавить вознаграждение

Комментарии

1. pose 26.06.09 19:10
Ругается :
{ВнешняяОбработка.ПечатьЦенников(95)}: Ошибка при установке значения атрибута контекста (Текст): {(8, 2)}: Поле не найдено "НаСкладе.Количество"
<<?>>НаСкладе.Количество КАК Количество
ПостроительОтчета.Текст = ТекстЗапроса;
2. Max Kom (1C8) 27.06.09 08:44
Конфа УТ или УПП? В УПП не работает, надо переписывать немного
3. igor_gk (igor_gk) 01.07.09 12:10
(2) А в чем она тогда работает? Хоть написал бы... Хотя странно - на скрине - как раз УТ
4. Max Kom (1C8) 02.07.09 04:36
а я и не говорил что в УТ она не работает, как раз для УТ она и написана. Что у всех та же ошибка вылетает?
5. grafit (grafit) 02.07.09 09:06
надо так:
СтруктураКурса = ОбщегоНазначения.ПолучитьКурсВалюты(Валюта, РабочаяДата);
//СтруктураКурса = МодульВалютногоУчета.ПолучитьКурсВалюты(Валюта, РабочаяДата);

далее:
//НаСкладе.Количество КАК Количество
kropanev; +1 Ответить
6. Max Kom (1C8) 03.07.09 07:34
Господа! Скачайте и установите себе компоненту 1C:Печать Штрихкодов, и будет вам счастье...
P.S. Компоненту приложил.
7. Алексей Бондаренко (flintm) 07.07.09 19:33
Обработка классная! +. Только она не понимает штрихкоды, кроме EAN13. Что надо сделать, чтобы она понимала все типы штрихкодов или, хотя бы, ещё EAN8?
8. dushelov (Душелов) 08.07.09 00:38
(6) Выкладывать материалы с диска ИТС запрещено политикой 1С.
9. Max Kom (1C8) 13.07.09 07:33
(6) Ради бога....я как лучше хотел.
10. Max Kom (1C8) 13.07.09 07:43
11. Max Kom (1C8) 14.07.09 02:22
Посмотрел на скорую руку. В модуле обработки ищешь строку(их там три таких, меняешь во всех трех)

ОбластьЦенника.Рисунки.Штрихкод1.Объект.ТипКода = 1; //EAN13

Где 1 - это код типа штрихкода. 2 - помоему будет code39, в общем поэксперементируй.

И еще в процедуре ЗаполнениеШтрихкода() ищи строки

Стр.ТипШтрихкода = ПланыВидовХарактеристик.ТипыШтрихкодов.EAN13

они почти рядом. Ну тут я думаю все понятно, в конце вместо EAN13 меняешь на какой тебе надо.
Еще если надо то поменять нужно в модуле формы в процедуре НовыйШтрихкод(Кнопка) и функции КнопкаЗаполнениеШтрихкода(Кнопка) то же самое.
12. Andrey Roy (nindza) 09.11.10 10:31
То ли файл битый, но не открывается в 1С УТ 8.1 :o
13. Maels J (Maels) 06.05.11 18:17
все открывается (если ругается на версию - попробуй через конфигуратор сконвертить), единственное было бы оч.удобно настраивать кол-во ценников и этикеток на 1 странице перед выводом печати.
сам так и не победил в коде модуля (тока начал разбираться во всех этих шалобухах и знаний пока оч.мало), т.к. надо печатать на принтере этикеток.

а в целом все нормально и удобно мне как пользователю.
15. Сергей (seandr) 03.10.11 09:30
Обработка очень полезная.. добавив функионал формирования ШК на поступление при отсутствии такового. Добавил пересчет единиц измерения с подстановкой для них установленных ШК.
16. Steve Gordon (SGordon1) 03.10.11 15:51
У меня почему то тоже в старой торговле не заъотело совсем работать . То ли файл битый, но не открывается в 1С УТ 8.1
17. Maels J (Maels) 05.10.11 16:43
Пользуюсь, правда не в полном объеме.

все приходится ручками заполнять, т.к. не предусмотрена установка кол-ва ценников на странице (у меня принтер этикеток), настраиваемость их размеров под распространенные форматы самих этикеток.

ручками в коде методом тыка добился что бы печатал только 1 ценник на 1 этикетке, но по всей видимости что то в логике нарушил и теперь кол-во ценников надо в ручную указывать при нажатии кнопочка печать.

Идеально конечно что бы обработка могла подцепляться к типовым документам для автоматической распечатки.
по сути два таких документа у меня в УТ - приходный ордер или поступление товаров.

А вообще спасибо огромное - даже так это сильно лучше чем ничего, т.к. требования ужесточаются и все большую информацию надо умещать на ценниках, а штатными средствами 1с это почти не реализуемо без специальных навыков и знаний. а политика 1с в этом отношении тоже улыбает - за немало денег покупаешь полупродукт и за большие деньги допиливаешь до минимального функционала. именно поэтому поддержку продлевать не вижу смысла - проще заплатить специалисту за доработки и чаще самому прикручивать что то тебе нужное.
19. moon river (mrdc) 10.12.11 11:51
Не работает. 1С:Предприятие 8.2 (8.2.14.540), "Управление торговлей для Казахстана", редакция 2.2, локализация для Казахстана: "1С-Рейтинг", "1С-Сапа" (2.2.10.10)
{ВнешняяОбработка.ПечатьЦенников.МодульОбъекта(142,19)}: Переменная не определена (Ценообразование)
		ЗапросПоЦенам = <<?>>Ценообразование.СформироватьЗапросПоЦенамРасчитываемые(Товары.ВыгрузитьКолонку("Номенклатура"),ТипЦен,РабочаяДата);	
{ВнешняяОбработка.ПечатьЦенников.МодульОбъекта(148,19)}: Переменная не определена (Ценообразование)
		ЗапросПоЦенам = <<?>>Ценообразование.СформироватьЗапросПоЦенам(СтруктураЗначений,
{ВнешняяОбработка.ПечатьЦенников.МодульОбъекта(192,11)}: Переменная не определена (Ценообразование)
			Цена = <<?>>ЦеноОбразование.ОкруглитьЦену(Цена, ТипЦен.ПорядокОкругления, ТипЦен.ОкруглятьВБольшуюСторону);
{ВнешняяОбработка.ПечатьЦенников.МодульОбъекта(193,11)}: Переменная не определена (Ценообразование)
			Цена = <<?>>Ценообразование.ПересчитатьЦенуПриИзмененииВалюты(Цена, НайденнаяСтрока.ВалютаЦены, Валюта, Курс, Кратность);
{ВнешняяОбработка.ПечатьЦенников.МодульОбъекта(535,18)}: Переменная не определена (Ценообразование)
	ЗапросПоЦенам = <<?>>Ценообразование.СформироватьЗапросПоЦенам(СтруктураЗначений,
{ВнешняяОбработка.ПечатьЦенников.МодульОбъекта(578,11)}: Переменная не определена (Ценообразование)
			Цена = <<?>>Ценообразование.ОкруглитьЦену(Цена, ТипЦен.ПорядокОкругления, ТипЦен.ОкруглятьВБольшуюСторону);
{ВнешняяОбработка.ПечатьЦенников.МодульОбъекта(579,11)}: Переменная не определена (Ценообразование)
			Цена = <<?>>Ценообразование.ПересчитатьЦенуПриИзмененииВалюты(Цена, НайденнаяСтрока.ВалютаЦены, Валюта, Курс, Кратность);
{ВнешняяОбработка.ПечатьЦенников.МодульОбъекта(160,19)}: Переменная не определена (МодульВалютногоУчета)
	СтруктураКурса = <<?>>МодульВалютногоУчета.ПолучитьКурсВалюты(Валюта, РабочаяДата);
{ВнешняяОбработка.ПечатьЦенников.МодульОбъекта(546,19)}: Переменная не определена (МодульВалютногоУчета)
	СтруктураКурса = <<?>>МодульВалютногоУчета.ПолучитьКурсВалюты(Валюта, РабочаяДата);
...Показать Скрыть
21. Sergey Anisimov (Sean1s) 05.02.12 19:29
22. Alexey Pak (Alexey55) 02.04.12 14:11
Спасибо! очень вовремя!)
23. Руслан Боярко (33m2) 04.12.13 10:56
Для написания сообщения необходимо авторизоваться
Прикрепить файл
Дополнительные параметры ответа