Получение информации о входящих в блок пачках сигарет (API Честный знак ИС МОТП, Бухгалтерия Предприятия 3)

25.09.20

Учетные задачи - Оптовая торговля

Получение кодов идентификации (GTIN + серия) пачек сигарет, входящих в блок, по коду блока.

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

Наименование Файл Версия Размер
Получение информации о входящих в блок пачках сигарет (API Честный знак ИС МОТП, Бухгалтерия Предприятия 3):
.epf 10,21Kb
8
.epf 10,21Kb 8 Скачать

В некоторых случаях необходимо получить коды идентификации пачек (КИ) по блокам. К примеру, для наполнения расходной накладной при оптовой продаже.

В обработке используются типовые процедуры и функции общих модулей конфигурации Бухгалтерия Предприятия 3, имена модулей:
- ИнтерфейсАвторизацииИСМПСлужебный;
- ИнтерфейсМОТПКлиентСервер;
- ИнтеграцияИСМП;
- ИнтерфейсМОТПСлужебный.

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

Откроется табличный документ со списком КИ пачек блока по данным ИС МОТП.

Проверено на платформе 8.3.15.1830, конфигурации Бухгалтерия предприятия 3.0.80.40. Код модуля формы обработки ниже.


&НаСервере
Процедура ЗапроситьИнформациюНаСервере(ТабДок)
	ОбработкаОбъект = РеквизитФормыВЗначение("Объект");
	Макет = ОбработкаОбъект.ПолучитьМакет("Макет");
	
	ОбластьЗаголовок = Макет.ПолучитьОбласть("Заголовок");
	ОбластьШапкаТаблицы = Макет.ПолучитьОбласть("ШапкаТаблицы");
	ОбластьДетальныхЗаписей = Макет.ПолучитьОбласть("Детали");
	
	ТабДок.Очистить();
	ТабДок.Вывести(ОбластьЗаголовок);
	ТабДок.Вывести(ОбластьШапкаТаблицы);
	
	Для каждого СтрокаКодыБлоков из КодыБлоков Цикл
		Штрихкод = СтрокаКодыБлоков.Значение;
		КлючСессии = ИнтерфейсАвторизацииИСМПСлужебный.ПроверитьОбновитьКлючСессии(
		ИнтерфейсМОТПКлиентСервер.ПараметрыЗапросаКлючаСессии(Организация));
		
		ВозвращаемоеЗначение = Новый Структура;
		ВозвращаемоеЗначение.Вставить("ТребуетсяОбновлениеКлючаСессии", КлючСессии = Неопределено);
		ВозвращаемоеЗначение.Вставить("РезультатОтправкиЗапроса",       Неопределено);
		ВозвращаемоеЗначение.Вставить("ТекстОшибки",                    "");
		ВозвращаемоеЗначение.Вставить("ДанныеОбАгрегации",              Неопределено);
		ВозвращаемоеЗначение.Вставить("СодержимоеНедоступно",           Ложь);
		
		Если ВозвращаемоеЗначение.ТребуетсяОбновлениеКлючаСессии Тогда
			Сообщить("Не удалось получить данные из ИС МОТП. Требуется обновление ключа сессии.");
			Возврат;
		КонецЕсли;
		URLЗапроса = СтрШаблон(
		"v3/cises/%1/aggregated",
		КодироватьСтроку(
		Штрихкод,
		СпособКодированияСтроки.КодировкаURL));
		РезультатЗапроса = ИнтеграцияИСМП.ПолучитьДанныеИзСервиса(URLЗапроса, КлючСессии, ИнтерфейсМОТПКлиентСервер.ПараметрыОтправкиHTTPЗапросов());

		РезультатОтправкиЗапроса = ИнтерфейсМОТПСлужебный.ОбработатьРезультатОтправкиHTTPЗапросаКакJSON(РезультатЗапроса);
		
		ВозвращаемоеЗначение.РезультатОтправкиЗапроса = РезультатОтправкиЗапроса;
		
		Если РезультатОтправкиЗапроса.ОтветПолучен Тогда
			Если РезультатОтправкиЗапроса.КодСостояния = 200 Тогда
				ДанныеОбработки = ИнтерфейсМОТПСлужебный.ТекстJSONВОбъект(РезультатОтправкиЗапроса.ТекстВходящегоСообщенияJSON, Истина);
				Для каждого СтрокаДанных из ДанныеОбработки Цикл
					ОбластьДетальныхЗаписей.Параметры.КодБлока = Штрихкод;
					ОбластьДетальныхЗаписей.Параметры.КодПачки = СтрокаДанных.Ключ;
					ТабДок.Вывести(ОбластьДетальныхЗаписей);
				КонецЦикла;
			КонецЕсли;                      
		КонецЕсли;
	КонецЦикла;
	
КонецПроцедуры

&НаКлиенте
Процедура ЗапроситьИнформацию(Команда)
	ТабДок = Новый ТабличныйДокумент;
	ЗапроситьИнформациюНаСервере(ТабДок);
	ТабДок.Показать();
КонецПроцедуры                   

&НаСервере
Процедура ПриСозданииНаСервере(Отказ, СтандартнаяОбработка)
	//КодыБлоков.Добавить("(01)04660077310165(21)0000A=""");
	ИспользоватьПодключаемоеОборудование = Истина;
КонецПроцедуры

&НаКлиенте
Процедура ВнешнееСобытие(Источник, Событие, Данные)
	Штрихкод = Данные;
	//Штрихкод = "0104660077310165210000A=""800507500093S+Uc";
	Штрихкод = 	"("+Лев(Штрихкод,2)+")"+
				Сред(Штрихкод,3,14) +
				"("+Сред(Штрихкод,17,2)+")"+
				Сред(Штрихкод,19,7);
	КодыБлоков.Добавить(Штрихкод);
	//Сообщить(Штрихкод);
КонецПроцедуры

&НаКлиенте
Процедура ПриОткрытии(Отказ)
	// Попробуем подключить сканер штрихкода
	МенеджерОборудованияКлиентПереопределяемый.НачатьПодключениеОборудованиеПриОткрытииФормы(ЭтотОбъект, "СканерШтрихкода");
КонецПроцедуры

 

API честный знак блок пачка код идентификации маркировки КИ КИЗ КМ

См. также

SALE! 15%

Автоматический заказ поставщику в 1С: загрузка прайсов и анализ цен поставщиков для УТ 10.3, УТ 11, КА2, УНФ, УПП, ERP, Розница 2

Бюджетирование и планирование Оптовая торговля Розничная торговля Логистика, склад и ТМЦ Анализ продаж Платформа 1С v7.7 Платформа 1С v8.3 1С:Комплексная автоматизация 1.х 1С:Управление торговлей 10 1С:Розница 2 1С:Управление производственным предприятием 1С:Управление нашей фирмой 1.6 1С:Управление торговлей 11 1С:Комплексная автоматизация 2.х Розничная и сетевая торговля (FMCG) Оптовая торговля, дистрибуция, логистика Беларусь Украина Россия Казахстан Управленческий учет Платные (руб)

Система управления запасами для 1С помогает работать с запасами правильно: автоматически рассчитывает потребность и делает заказ поставщику, загружает прайсы, перемещает товары по филиалам, анализирует продажи и позволяет управлять ассортиментом.

33529 28500 руб.

21.04.2017    86927    81    38    

163

Гособоронзаказ: учет и отчетность БП3.0 КОРП + ПРОФ + БИТ.ФИНАНС

Бюджетный учет Обмен с ГосИС Платформа 1С v8.3 Бухгалтерский учет 1С:Бухгалтерия 3.0 Государственные, бюджетные структуры Россия Бухгалтерский учет Платные (руб)

Доработка конфигурации 1С: Бухгалтерия предприятия, редакция 3.0. Предназначена для ведения раздельного учета и автоматизации заполнения отчетности исполнения контрактов ГОЗ в конфигурациях 1С БП КОРП, ПРОФ, БИТ.ФИНАНС.

30000 руб.

16.08.2019    85427    181    85    

115

Гособоронзаказ в 1С: УПП 1.3

Бюджетный учет Обмен с ГосИС Бухгалтерский учет 1С:Управление производственным предприятием Государственные, бюджетные структуры Россия Бухгалтерский учет Платные (руб)

Для 1С: УПП 1.3 предлагаем Вашему вниманию подсистему "Раздельный учет результатов финансово-хозяйственной деятельности организаций, выполняющих государственный оборонный заказ (раздельный учет ГОЗ)". Ключевые возможности подсистемы: - Автоматическое заполнение регламентированного отчета "Исполнение контрактов ГОЗ"; - Расшифровка показателей отчета об исполнении контрактов ГОЗ с детализацией до документов; - Контроль хозяйственных операций на соответствие требованиям Постановления Правительства № 47; - Автоматизированный ввод начальных данных по контрактам, заключенным ранее даты начала использования подсистемы.

90000 руб.

25.09.2020    27214    29    9    

33

ЕГАИС++. Опт, производство, импорт

Оптовая торговля Розничная торговля Обмен с ГосИС Платформа 1С v8.3 1С:Управление торговлей 10 1С:Бухгалтерия 3.0 1С:Управление торговлей 11 Розничная и сетевая торговля (FMCG) Оптовая торговля, дистрибуция, логистика Рестораны, кафе и фаст-фуд Россия Бухгалтерский учет Управленческий учет Акцизы Платные (руб)

Полнофункциональное расширение (ранее известное как Модуль 1С-ЕГАИС) для взаимодействия типовых конфигураций 1С и ЕГАИС, предоставляющее максимум возможностей по работе с УТМ. Получение и отправка ТТН, отправка акта о постановке на баланс и акта о списании. Получение остатков. Загрузка и сопоставление номенклатуры и контрагентов. Оправка в ЕГАИС отчетов о производстве и импорте.

7800 руб.

15.12.2015    163973    639    361    

381

Обмен с системами Казначейства: Электронный бюджет

Обмен с ГосИС Платформа 1С v8.3 Бухгалтерский учет 1С:ERP Управление предприятием 2 1С:Бухгалтерия 3.0 Россия Бухгалтерский учет Платные (руб)

Обработка для обмена платежными документами в формате xml для системы Федерального казначейства "Электронный бюджет" из конфигураций 1С. Поставляется в двух вариантах для БП 3.0 и КА 2.х/ERP 2.х

15000 руб.

14.10.2020    55829    320    101    

247

Бонусная система для УТ 10.3

Управление взаимоотношениями с клиентами (CRM) Оптовая торговля Розничная торговля Платформа 1С v8.3 Оперативный учет Управляемые формы 1С:Управление торговлей 10 1С:Розница 2 Россия Управленческий учет Платные (руб)

Подсистема призвана упростить и автоматизировать процесс расчета и начисления бонусов покупателей. ОБНОВЛЕНИЕ ОТ 20.06.2022 г. Работает с конфигурациями 1С:УТ 10.3, 1С:Розница. Механизм реализован в начале 2013г. и работает до сих пор с постоянными совершенствованиями.

40000 руб.

02.11.2015    107861    87    87    

177
Комментарии
В избранное Подписаться на ответы Сортировка: Древо развёрнутое
Свернуть все
1. user1170885 07.06.21 12:48 Сейчас в теме
А можно-ли таким способом получить из Честного Знака и МРЦ?
3. Libertaspan 18.11.21 09:23 Сейчас в теме
(1)
А можно-ли таким способом получить из Ч

Да у меня тоже такой вопрос.
2. HAMMER_59 241 04.10.21 15:32 Сейчас в теме
Спасибо за публикацию.
Вы мне сэкономили много моего времени и нервов.
Оставьте свое сообщение