Обработка для печати ценников и этикеток
Задачи пользователя - Этикетки, ценники
Файлы
ВНИМАНИЕ: Файлы из Базы знаний - это исходный код разработки. Это примеры решения задач, шаблоны, заготовки, "строительные материалы" для учетной системы. Файлы ориентированы на специалистов 1С, которые могут разобраться в коде и оптимизировать программу для запуска в базе данных. Гарантии работоспособности нет. Возврата нет. Технической поддержки нет.
Подписка PRO — скачивайте любые файлы со скидкой до 85% из Базы знаний
Оформите подписку на компанию для решения рабочих задач
Оформить подписку и скачать решение со скидкойВы можете заказать платную доработку или адаптацию этой разработки под вашу конфигурацию на «Бирже заказов».
- 0% комиссии — оплата напрямую исполнителю;
- Исполнители любого масштаба — от отдельных специалистов до команд под проект;
- Прямой обмен контактами между заказчиком и исполнителем;
- Безопасная сделка — при необходимости;
- Рейтинги, кейсы и прозрачная система откликов.
Позволяет заполнять ТЧ обработки из ТСД, документов и т.д.
Интерфейс частично позаимствован с РАРУС:Магазин
Вступайте в нашу телеграмм-группу Инфостарт
См. также
Этикетки, ценники Пользователь 1С:Предприятие 7.7 1C77 Здравоохранение, медицина, стоматология Россия Абонемент ($m)
Поскольку в еФарма нет печати кодов DataMatrix в нормальном виде, только в виде QR-кода, возникла идея написать данную обработку.
1 стартмани
03.05.2023 4442 2 Eisent 0
Этикетки, ценники Пользователь 1С:Предприятие 7.7 1C77 Розничная и сетевая торговля (FMCG) Россия Абонемент ($m)
Печать этикеток для маркировки остатков по файлам из Честного Знака, для одежды, обуви и т.п.
1 стартмани
25.01.2021 8893 8 M_W_W 1
Этикетки, ценники Разработчик Пользователь 1С:Предприятие 7.7 1C77 Россия Абонемент ($m)
Предназначено для тех, кто еще и в классике программирует, но уже начал подзабывать.
1 стартмани
20.08.2020 10689 20 AlexHelmer 5
Пакетная печать Этикетки, ценники Пользователь 1С:Предприятие 7.7 1C77 Розничная и сетевая торговля (FMCG) Оптовая торговля, дистрибуция, логистика Легкая промышленность, мода и одежда Россия Управленческий учет Платные (руб)
С помощью обработки 1С 7.7 можно коды маркировки вводить вручную или загружать файлы в формате csv и печатать либо на ленту (принтер этикеток) либо на лист (офисный принтер). Есть возможность создать разные шаблоны этикеток с настраиваемым выводом текста и логотипа, с указанием числа рядов и столбцов при печати этикеток на офисный принтер. Имеется проверка штрихкодов на соответствие форматам согласно документа "Протокол информационного обмена (ОФД). Поддерживаются форматы всех товарных групп, подлежащих маркировке или участвующих в эксперименте (алкоголь, изделия из меха, табак, обувь, лекарства, текстиль, шины и т.д.) Выделение из ШК идентификаторов применения (AI) и их показ. Расшифровка максимальной розничной цены (МРЦ) из Datamatrix табака.
5124 руб.
12.03.2020 22829 17 4
Этикетки, ценники Разработчик Пользователь 1С:Предприятие 7.7 1С:Бухгалтерия 7.7 1С:Комплексная 7.7 1С:Торговля и склад 7.7 Россия Управленческий учет Абонемент ($m)
"Ответ на главный вопрос жизни, вселенной и всего такого" как распечатать DataMatrix из 1С 7.7 для маркировки.
5 стартмани
24.12.2019 45577 39 Mx00 183
Этикетки, ценники Бухгалтер Пользователь Оперативный учет 7.7 1С:Торговля и склад 7.7 Оптовая торговля, дистрибуция, логистика Россия Абонемент ($m)
Печать ценников номенклатуры по типам цен списком 1С 7.7 ТИС.
1 стартмани
21.11.2019 13955 6 war41k 0
Розничная торговля Этикетки, ценники Бухгалтер Пользователь 1С:Предприятие 7.7 Оперативный учет 7.7 1С:Торговля и склад 7.7 Россия Абонемент ($m)
Печать ценников для конфигурации "Торговля и склад ред . 9.2". Платформа "1С:Предприятие 7.7"
2 стартмани
28.11.2017 22687 6 dbolotin 0
Розничная торговля Этикетки, ценники Пользователь Оперативный учет 7.7 1С:Торговля и склад 7.7 Розничная и сетевая торговля (FMCG) Россия Абонемент ($m)
Внешняя печатная форма для документов Перемещение ТМЦ, Поступление ТМЦ и любых других с реквизитами табличной части Номенклатура, Количество, Цена.
1 стартмани
17.11.2017 17507 20 aksyoma 2
Таб.Цена=глПолучитьЦену(Таб.Товар,ТипЦен.ТекущийЭлемент(),РабочаяДата()<<?>>);
{J:\ОБНОВЛЕНИЕ 1С\ПРИЛОЖЕНИЯ\ОБРАБОТКА ДЛЯ ПЕЧАТИ ЦЕННИКОВ И ЭТИКЕТОК\PECHATJ_CENNIKOV_I_ETIKETOK.ERT(125)}: Недостаточно фактических параметров
Таб.Цена=глПолучитьЦену(Таб.Товар,ТипЦен.ТекущийЭлемент(),РабочаяДата()<<?>>);
{J:\ОБНОВЛЕНИЕ 1С\ПРИЛОЖЕНИЯ\ОБРАБОТКА ДЛЯ ПЕЧАТИ ЦЕННИКОВ И ЭТИКЕТОК\PECHATJ_CENNIKOV_I_ETIKETOK.ERT(194)}: Недостаточно фактических параметров
Если глТерминалВключен<<?>>() = 1 Тогда
{J:\ОБНОВЛЕНИЕ 1С\ПРИЛОЖЕНИЯ\ОБРАБОТКА ДЛЯ ПЕЧАТИ ЦЕННИКОВ И ЭТИКЕТОК\PECHATJ_CENNIKOV_I_ETIKETOK.ERT(239)}: Функция не обнаружена (глТерминалВключен)
Если глЕстьРеквизитМнЧ<<?>>("Номенклатура", Метаданные.Документ(Сч).Идентификатор)=1 Тогда
{J:\ОБНОВЛЕНИЕ 1С\ПРИЛОЖЕНИЯ\ОБРАБОТКА ДЛЯ ПЕЧАТИ ЦЕННИКОВ И ЭТИКЕТОК\PECHATJ_CENNIKOV_I_ETIKETOK.ERT(272)}: Функция не обнаружена (глЕстьРеквизитМнЧ)
ИначеЕсли глЕстьРеквизитМнЧ<<?>>("Номенклатура",Док.Вид())=1 Тогда
{J:\ОБНОВЛЕНИЕ 1С\ПРИЛОЖЕНИЯ\ОБРАБОТКА ДЛЯ ПЕЧАТИ ЦЕННИКОВ И ЭТИКЕТОК\PECHATJ_CENNIKOV_I_ETIKETOK.ERT(296)}: Функция не обнаружена (глЕстьРеквизитМнЧ)
Если глТерминалЗагрузитьДанные<<?>>(ТермДанные) = 0 Тогда
{J:\ОБНОВЛЕНИЕ 1С\ПРИЛОЖЕНИЯ\ОБРАБОТКА ДЛЯ ПЕЧАТИ ЦЕННИКОВ И ЭТИКЕТОК\PECHATJ_CENNIKOV_I_ETIKETOK.ERT(355)}: Функция не обнаружена (глТерминалЗагрузитьДанные)
Если глПолучитьТоварПоШтрихкоду<<?>>(ТермДанные.Штрихкод, ВремНоменклатура, ВремЕдиница, ВремКолво) = 0 Тогда
{J:\ОБНОВЛЕНИЕ 1С\ПРИЛОЖЕНИЯ\ОБРАБОТКА ДЛЯ ПЕЧАТИ ЦЕННИКОВ И ЭТИКЕТОК\PECHATJ_CENNIKOV_I_ETIKETOK.ERT(366)}: Функция не обнаружена (глПолучитьТоварПоШтрихкоду)
глТерминалОчиститьПамять<<?>>();
{J:\ОБНОВЛЕНИЕ 1С\ПРИЛОЖЕНИЯ\ОБРАБОТКА ДЛЯ ПЕЧАТИ ЦЕННИКОВ И ЭТИКЕТОК\PECHATJ_CENNIKOV_I_ETIKETOK.ERT(386)}: Процедура не обнаружена (глТерминалОчиститьПамять)
ТаблицаТоваров.Валюта=глРубли<<?>>;
{J:\ОБНОВЛЕНИЕ 1С\ПРИЛОЖЕНИЯ\ОБРАБОТКА ДЛЯ ПЕЧАТИ ЦЕННИКОВ И ЭТИКЕТОК\PECHATJ_CENNIKOV_I_ETIKETOK.ERT(459)}: Переменная не определена (глРубли)
ПечРозн = глФРМ<<?>>(ТаблицаТоваров.Цена, ТаблицаТоваров.Валюта);
{J:\ОБНОВЛЕНИЕ 1С\ПРИЛОЖЕНИЯ\ОБРАБОТКА ДЛЯ ПЕЧАТИ ЦЕННИКОВ И ЭТИКЕТОК\PECHATJ_CENNIKOV_I_ETIKETOK.ERT(461)}: Функция не обнаружена (глФРМ)
глОживить<<?>>(1);
{J:\ОБНОВЛЕНИЕ 1С\ПРИЛОЖЕНИЯ\ОБРАБОТКА ДЛЯ ПЕЧАТИ ЦЕННИКОВ И ЭТИКЕТОК\PECHATJ_CENNIKOV_I_ETIKETOK.ERT(470)}: Процедура не обнаружена (глОживить)
Только пришлось добавить строку в процедуру "ПечатьЭтикетокГодекс" - "ПечЦена= Лев(ТБ.Цена,10.2);" и соответственно в макет таблицы поле с типом "шаблон" с значением Цена:[ПечЦена]руб.
:-)
В функции "ПриВыбореЗначения" заменить ветку
ИначеЕсли Об="Добавить из документа" Тогда
Сп=СоздатьОбъект("СписокЗначений");
Для Сч=1 По Метаданные.Документ() Цикл
Если глЕстьРеквизитМнЧ("Номенклатура", Метаданные.Документ(Сч).Идентификатор)=1 Тогда
Сп.ДобавитьЗначение(Метаданные.Документ(Сч).Идентификатор, Метаданные.Документ(Сч).Представление());
КонецЕсли;
КонецЦикла;
Если Сп.РазмерСписка()=0 Тогда
Возврат 0;
КонецЕсли;
ВидДок=ВосстановитьЗначение("ПоследнийВидДокумента");
Если Сп.ВыбратьЗначение(ВидДок,"Выберите вид документа")=0 Тогда
Возврат 0;
КонецЕсли;
СохранитьЗначение("ПоследнийВидДокумента",ВидДок);
Попытка
Док = СоздатьОбъект("Документ."+ВидДок);
Исключение
Возврат 0;
КонецПопытки;
Если Док.Выбрать("Выберите документ")<>1 Тогда
Возврат 0;
ИначеЕсли глЕстьРеквизитМнЧ("Номенклатура",Док.Вид())=1 Тогда
Док.ВыбратьСтроки();
Форма.Таб.Видимость(0);
Пока Док.ПолучитьСтроку()=1 Цикл
ПриВыбореЗначения("Добавить",Док.Номенклатура.ТекущийЭлемент());
КонецЦикла;
Если глЕстьРеквизитМнЧ("Количество", Док.Вид())=1 Тогда
Таб.Количество = Макс(Док.Количество*Док.Коэффициент,1);
КонецЕсли;
Форма.Таб.Видимость(1);
КонецЕсли;
Если Док.Выбрать("Выберите документ")<>1 Тогда
Возврат 0;
ИначеЕсли глЕстьРеквизитМнЧ("Номенклатура",Док.Вид())=1 Тогда
Док.ВыбратьСтроки();
Форма.Таб.Видимость(0);
Пока Док.ПолучитьСтроку()=1 Цикл
ПриВыбореЗначения("Добавить",Док.Номенклатура.ТекущийЭлемент());
Если глЕстьРеквизитМнЧ("Количество", Док.Вид())=1 Тогда
Таб.Количество = Макс(Док.Количество*Док.Коэффициент,1);
КонецЕсли;
КонецЦикла;
Форма.Таб.Видимость(1);
КонецЕсли;
Этот файл должен содержать строку такого вида:
Название=<текстовое название файла>
//в нашем случае:
//Название=<Обработка для печати ценников и этикеток>
Далее в 1С открываешь вкладку Сервис/Дополнительные возможности и ВУАЛЯ наблюдаешь в списке свою обработку!
При открытии обработка осматривает каталог ExtForms и ищет все файлы
с расширением EFD.
И совет, почитай про Доп возможности, в книжке "Описание" идущей в комплекте с программой! Я тоже не гуру, но все доступным языком в принципе описано.
Таб.Цена=глПолучитьЦену<<?>>(Таб.Товар,ТипЦен.ТекущийЭлемент(),РабочаяДата());
{F:\1С\ВНЕШНИЕ УТИЛИТЫ\ПЕЧАТЬ ЦЕННИКОВ И ЭТИКЕТОК\ПЕЧАТЬ_ЦЕННИКОВ_И_ЭТИКЕТОК.ERT(125)}: Функция не обнаружена (глПолучитьЦену)
и т.д. и т.п.
пробовал в самой конфигурации не через внешнюю обработку тоже не получилось.
Может подскажет как это все можно сделать
Таб.НоваяКолонка("Артикул","Строка",8,,"Артикул",8,,2);
2). Строку 463 заменить на
ПечКод=ТаблицаТоваров.Товар.ТекущийЭлемент().Артикул;
Попробовал воспользоваться данным изменением. Но Увы...... Не подхватывает КОЛИЧЕСТВО в соответствующий столбец, если добавлять ИЗ ДОКУМЕНТА.
Всё равно количество всегда 1шт :(
Вы можете заказать платную консультацию или разработку у автора. Будет создан приватный заказ на «Бирже заказов» для автора.
№ 16049
Создание 10.07.08 13:22
Обновление 07.09.10 08:25
Просмотры 30566
Загрузки 1608
Рейтинг
69
Комментарии 64
Код открыт Не указано
Рубрики Этикетки, ценники
Кому Пользователь
Тип файла Внешняя обработка (ert,epf)
Платформа Оперативный учет 7.7
Конфигурация
1С:Комплексная 7.7
,
1С:Торговля и склад 7.7
Операционная система Не имеет значения
Страна Россия
Отрасль Не имеет значения
Налоги Не имеет значения
Вид учета Не имеет значения
Доступ к файлу Абонемент ($m)