Маркировка для 1С 77

[ray1978]

Спасибо за ответ.

Я уже на ocvita barcode сделал сам.
Полученные марки распечатываются, считываются приложениями с мобильного. А приложение на мобильном честныйЗнак даже выдает инфо что за марка, какой товар и за кем закреплена она.

Внедрил под 1с77

[Rebook]

Спасибо за ответ.

Я уже на ocvita barcode сделал сам.
Полученные марки распечатываются, считываются приложениями с мобильного. А приложение на мобильном честныйЗнак даже выдает инфо что за марка, какой товар и за кем закреплена она.

Внедрил под 1с77

Поделись опытом реализации? У меня даже примеры с сайта не работают

[влад55]

Тоже сильно актуальна любая информация по внедрению систем маркировки (обувь) в среде 7.7 ... у подшефных слегка покореженная ТиС и с 1 марта проблема маркировки встает в полный рост. Переходить на 8.3 нет ни средств, ни ресурсов, ни желания. Как альтернативный вариант с минимальными затратами - облачная 1С https://www.moysklad.ru/poleznoe/markirovka-tovarov/. Ну а в идеале конечно же прикрутить весь функционал к имеющейся ТиС. Я так понимаю, что регистрироваться на "ЧЗ" и приобретать 2-d сканер и ККМ(ФР) придется в любом варианте. Буду признателен за любые подробности по данному вопросу.

[yri]

Собственно написать программу по обмену с данными с ЦРПТ не сложно. всё сводится к передаче-приеме данных (кодов маркировки) в базу ЦРПТ под разными статусами. Причем передача возможна и через API и посредством файлов XML или CSV. Но есть одно НО. Проблема в самом сервере ЦРПТ который висит с 10 до 18 часов и неправильно отрабатывает запросы что ещё более трагично. Ещё более трагичен интерфейс личного кабинета где тупо нельзя прокрутить экран. Я уже пару месяцев с этим, если так можно выразиться живу. Чего только люди не делают что бы обойти эти косяки. И собственный учет КМ ведут и файлики друг другу отсылают, согласовывают. Знающие говорят что возможно эта шняга корректно заработает минимум через полгода не ранее. Непонятно что будет 1 марта.

[yri]

Я так понимаю, что регистрироваться на "ЧЗ" и приобретать 2-d сканер и ККМ(ФР) придется в любом варианте. Буду признателен за любые подробности по данному вопросу.

Регистрироваться надо в любом случае. Неважно опт или розница. Т.к. необходимо принять КМ и стать их собственником. Затем КМ уходят из оборота или через сканер или через документ передачи-отгрузки другому счастливому человеку. Если видов товаров мало можно худо-бедно работать через личный кабинет. Если нужен учет КМ то добро пожаловать в наш клуб...

[влад55]

yri - спасибо большое за комментарии, я правильно вас понял, что на первых порах достаточно просто регистрации, без приобретения сканера и ККМ, осуществляя обмен данными через файлы только посредством личного кабинета? А формат файлов обмена специфицирован как-то, где можно посмотреть?
Еще обнаружил на инфостарте типа "готовое" решение (https://infostart.ru/public/603118/product/1051583/), может есть кто уже попробовал?

[yri]

я правильно вас понял, что на первых порах достаточно просто регистрации, без приобретения сканера и ККМ, осуществляя обмен данными через файлы только посредством личного кабинета? А формат файлов обмена специфицирован как-то, где можно посмотреть?

Совершенно верно. Достаточно зарегистрироваться и загружать файлы через ЛК. Формат файлов в личном кабинете - жмете в верхнем правом углу желтую кнопку Помощь. Там все форматы и описание API.

[yri]

Часто спрашивают как работать с подписями в 1С7.7. Рабочий пример. Условие - установка в системе КриптоАРМ 5 и выше. Т.е. регистрация библиотек.
Входящий параметр строка которую надо подписать. Выходящая подписанная.
//*******************************************
Функция Подписать(Стр) Экспорт


oCertificate = СоздатьОбъект("DigtCrypto.Certificate ");
oCertificateStore = СоздатьОбъект("DigtCrypto.Certificate Store");
oPKCS7Message = СоздатьОбъект("DigtCrypto.PKCS7Messag e");
oProfile = СоздатьОбъект("DigtCrypto.Profile");

oCerts = oCertificateStore.Display(1);
Если ПустоеЗначение(oCerts) <> 1 Тогда
глВыбСертификат = oCerts.Item(0);

oProfile.SilentLevel = 3;
oProfile.DisableInputFilesWindow = 1;
oProfile.SignIncludeBase64Headers = 1;
oProfile.Detach = 1;
oProfile.SetCertificate( 2, "1", глВыбСертификат);

oPKCS7Message.Profile = oProfile;
oPKCS7Message.Import(0,СокрЛП(Стр));
oPKCS7Message.Sign();
retStr = oPKCS7Message.Export( 2, 0);

Возврат retStr;

Иначе
Возврат "";

КонецЕсли;

КонецФункции // Подписать
//*******************************************