Повторная печать кодов маркировки, автоматическое заполнение реквизитов в УТ 11.4

20.03.20

Задачи пользователя - Этикетки, ценники

Расширение для конфигурации "Управление торговлей 11.4.11.67", позволяющее повторно распечатывать коды маркировки, полученные через СУЗ. Также расширение оптимизирует работу с помощью автоматического заполнения реквизитов. В релизе 11.4.11.84 повторная печать кодов маркировки работает без дополнения. Выкладываю расширение с оставшимися функциями. Дополнительно исправлена ошибка при подборе маркированной продукции.

Скачать файл

ВНИМАНИЕ: Файлы из Базы знаний - это исходный код разработки. Это примеры решения задач, шаблоны, заготовки, "строительные материалы" для учетной системы. Файлы ориентированы на специалистов 1С, которые могут разобраться в коде и оптимизировать программу для запуска в базе данных. Гарантии работоспособности нет. Возврата нет. Технической поддержки нет.

Наименование По подписке [?] Купить один файл
11.4.11.67 Повторная печать кодов маркировки, автоматическое заполнение реквизитов в УТ 11.4
.cfe 26,64Kb
29
29 Скачать (1 SM) Купить за 1 850 руб.
11.4.11.84 Автоматическое заполнение реквизитов в УТ 11.4, исправление ошибки при подборе обувной продукции по кодам маркировки на остатки
.cfe 41,95Kb
9
9 Скачать (1 SM) Купить за 1 850 руб.

1. Расширение позволяет повторно распечатывать коды маркировки. При печати из документа "Заказ на эмиссию кодов маркировки СУЗ" автоматически заполняется количество этикеток из документа. Важно установить роль пользователю "Повторная печать кодов маркировки ИС МП" в конфигураторе. В пользовательском режиме с помощью групп доступа сделать не получилось.

2. Также автоматически ставится вариант "На отдельных листах" для печати на принтере этикеток, автоматически подбирается шаблон этикетки и подставляется во все строки для печати.

3. Автоматически заполняется страна происхождения в документе "Маркировка товаров ИС МП" из дополнительного реквизита номенклатуры с наименованием "Страна происхождения", если такой есть.

4. Автоматически заполняется код ТН ВЭД, способ ввода в оборот (определяется по стране происхождения), вид обуви для размеров менее 38 устанавливается в "Детская" в документе "Заказ кодов маркировки СУЗ".

5. Доработано заполнение параметров остатков. Есть возможность заполнить для выделенных строк Код ТН ВЭД.

Для п.1 частично использована идея автора публикации //infostart.ru/public/1190756/ , но метод реализован в режиме &ИзменениеИКонтроль, а не &Вместо

 

Также выложил расширение для 11.4.11.84. Повторная печать реализована типовыми средствами, т.е. п.1 не нужен больше. Остаются вспомогательные функции и исправление ошибки при подборе обувной продукции по кодам маркировки на остатки. В типовой при сканировании кода маркировки производится поиск строк по номенклатуре, характеристике и GTIN, убрал поиск по GTIN, которого по сути нет у номенклатуры при маркировке остатков. Реализована сортировка по номенклатуре и характеристике при печати кодов маркировки.

Маркировка Честный_знак СУЗ ИС_МП

См. также

Этикетки, ценники Пользователь Платформа 1С v8.3 Конфигурации 1cv8 Розничная и сетевая торговля (FMCG) Рестораны, кафе и фаст-фуд Беларусь Украина Россия Управленческий учет Платные (руб)

Простая в использовании обработка для формирования и печати ценников и этикеток со штрих-кодом, с дополнительной ценой, для 1С8.х Большое разнообразие шаблонов печатных форм. Управляемая форма (Такси) + Обычный режим.

3588 руб.

11.11.2020    49914    61    47    

70

Этикетки, ценники Пользователь Платформа 1С v8.3 1С:Розница 2 1С:Управление торговлей 11 1С:Управление нашей фирмой 3.0 Абонемент ($m)

Расширение "Контроль ценников". Позволяет автоматизировать контроль над устаревшими ценниками в магазине при изменении цен на товары. Продавцы или товароведы получают список товаров с измененными ценами для замены ценников в режиме онлайн.

10 стартмани

30.10.2024    317    3    Miket78    4    

5

Этикетки, ценники Пользователь Платформа 1С v8.3 1С:Розница 2 Розничная и сетевая торговля (FMCG) Россия Абонемент ($m)

Внешняя обработка для 1С Розница 2.2.ХХХ - 2.3.ХХХ для печати формирования штрихкодов весового товара и печати на принтере термоэтикеток или кассовом аппарате.

1 стартмани

29.10.2024    402    6    independ    1    

6

Логистика, склад и ТМЦ Этикетки, ценники Пользователь Платформа 1С v8.3 1С:ERP Управление предприятием 2 1С:Управление торговлей 11 1С:Комплексная автоматизация 2.х Управленческий учет Абонемент ($m)

Выводит при печати этикетки складской ячейки в качестве штрихкода адрес ячейки вместо уникального идентификатора

1 стартмани

20.06.2024    1249    3    Alexei_Siva    4    

6

Этикетки, ценники Программист Мобильная платформа Бесплатно (free)

Печать этикеток на принтер WiFi без драйвера.

20.01.2023    2653    aldar    0    

10

Этикетки, ценники Пользователь Платформа 1С v8.3 1С:Управление нашей фирмой 1.6 1С:Управление нашей фирмой 3.0 Россия Управленческий учет Абонемент ($m)

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

2 стартмани

03.01.2023    4234    31    AndreyPonom    9    

11

Этикетки, ценники Пользователь Платформа 1С v8.3 1С:Розница 2 Розничная и сетевая торговля (FMCG) Россия Управленческий учет Абонемент ($m)

Архив с экспортными шаблонами этикеток (ценников) формата 58х40. Для тех, кто не хочет сам рисовать их.

3 стартмани

04.05.2022    16106    56    aximo    3    

12
Комментарии
Подписаться на ответы Инфостарт бот Сортировка: Древо развёрнутое
Свернуть все
1. bprogs 285 19.03.20 13:13 Сейчас в теме
Добрый, пишет нет маркировок для заказа на эмиссию, не работает
2. bprogs 285 19.03.20 13:18 Сейчас в теме
Текст Ошибки
3. bprogs 285 19.03.20 14:08 Сейчас в теме
в соседнем расширении встало без проблем , конф Ут 11.4.11.84
4. boba13 88 20.03.20 07:23 Сейчас в теме
(3) Сегодня адаптирую для 11.4.11.84 и выложу. Метод изменился, контроль сработал. Все, как задумано фирмой "1С".
5. boba13 88 20.03.20 13:15 Сейчас в теме
Повторная печать кодов маркировки в УТ 11.4.11.84 работает без дополнений. Необходимо пользователю включить роль "ПовторнаяПечатьКодовМаркировкиИСМП". После этого в документе "Заказ на эмиссию кодов маркировки СУЗ ИСМП" будет активна команда "Сбросить признак печати". Вызов команды сбрасывает признак печати и дает еще один раз распечатать коды. Сбрасывать можно неограниченное количество раз.

В моем расширении достаточно очистить весь текст в модуле менеджера регистра сведений "ПулКодовМаркировкиСУЗ", в форме "ФормаПечати" заменить процедуру на:
Процедура МО_ЗаполнитьДанныеФормы(Отказ)

	ЭтоЗаказНаЭмиссию = ТипЗнч(Документ) = Тип("ДокументСсылка.ЗаказНаЭмиссиюКодовМаркировкиСУЗ");

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

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

		Для Каждого СтрокаТаблицы Из ТаблицаСвободныхКодов Цикл

			ПредставлениеНоменклатуры = ИнтеграцияИСМПКлиентСервер.ПредставлениеGTINОстаткиПоВидуПродукции(
			СтрокаТаблицы.ПредставлениеНоменклатуры, СтрокаТаблицы.ВидПродукции);

			СтрокаТаблицы.Содержимое = ИнтеграцияИС.ПредставлениеНоменклатуры(
			СтрокаТаблицы.Номенклатура, СтрокаТаблицы.Характеристика,,, ПредставлениеНоменклатуры);

		КонецЦикла;

		СписокКодовМаркировки.Загрузить(ТаблицаСвободныхКодов);
	КонецЕсли;

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

	ЕстьСвободныеКоды      = СписокКодовМаркировки.Количество() > 0;
	ЕстьАгрегированныеКоды = ДеревоАгрегированныхКодов.ПолучитьЭлементы().Количество() > 0;

	Если Отказ <> Неопределено
		И НЕ ЕстьСвободныеКоды
		И НЕ ЕстьАгрегированныеКоды Тогда
		ТекстОшибки = НСтр("ru = 'По документу ""%1"" нет кодов маркировки для печати.'");
		ТекстОшибки = СтрШаблон(ТекстОшибки, Параметры.Документ);
		ОбщегоНазначения.СообщитьПользователю(ТекстОшибки,,,,Отказ);
	КонецЕсли;

КонецПроцедуры
Показать


По сути у моего расширения остается лишь вспомогательная функция, заполняющая шаблон этикеток и другие параметры.
6. MarcOSx 21.08.20 19:15 Сейчас в теме
Благо что в последних обновлениях доступных на данный момент, уже это есть в УТ11 проф и УТ11 базовая, без каких либо танцев с бубном ("Отменить признаки печати")
8. Metropolitan75 13.01.21 21:51 Сейчас в теме
(6)
"Отменить признаки печати"


Добрый вечер!
Подскажите, как именно это сделать?)))
9. boba13 88 14.01.21 09:31 Сейчас в теме
(8) Открыть документ "Заказ на эмиссию кодов маркировки СУЗ". Убедиться, что коды получены: слева сверху должен быть статус "Коды маркировки эмитированы". Нажать справа сверху Еще - Сбросить признак печати.
Прикрепленные файлы:
Metropolitan75; +1 Ответить
10. MarcOSx 25.02.21 02:36 Сейчас в теме
(8)
Прикрепленные файлы:
Metropolitan75; +1 Ответить
7. lifeforeve 27.10.20 15:13 Сейчас в теме
Здравствуйте
Для ERP есть такая же обработка или расширение?
Оставьте свое сообщение