Показано с 11 по 20 из 43
Тема: Маркировка для 1С 77
-
30.12.2019, 17:16 #11
- Регистрация
- 02.07.2009
- Сообщений
- 20
- Сказал(а) спасибо
- 9
- Поблагодарили 2 раз(а) в 2 сообщениях
Re: Маркировка для 1С 77
Могу поставить на любую конфигурацию 7.7
-
30.12.2019, 17:20 #12
- Регистрация
- 02.07.2009
- Сообщений
- 20
- Сказал(а) спасибо
- 9
- Поблагодарили 2 раз(а) в 2 сообщениях
-
30.12.2019, 17:24 #13
- Регистрация
- 02.07.2009
- Сообщений
- 20
- Сказал(а) спасибо
- 9
- Поблагодарили 2 раз(а) в 2 сообщениях
Re: Маркировка для 1С 77
Все подключаемые компоненты для конфигурации здесь.
//*******************************************
Процедура ПриНачалеРаботыСистемы()
Если ЗагрузитьВнешнююКомпонент у("v7plus.dll") = 0 Тогда
Сообщить("не удалось найти компоненту v7plus.dll", "!!!");
КонецЕсли;
Попытка
WinHttp = СоздатьОбъект("WinHttp.WinHttpRequest .5.1");
Исключение
Сообщить("Ошибка подключения! (" + ОписаниеОшибки() + ")", "!!!");
КонецПопытки;
Попытка
ДанныеJSON = СоздатьОбъект("ADODB.Stream");
Исключение
Сообщить("Ошибка подключения! (" + ОписаниеОшибки() + ")", "!!!");
КонецПопытки;
Попытка
WinXML = СоздатьОбъект("MSXML2.ServerXMLHTTP.6 .0");
Исключение
Сообщить("Ошибка подключения! (" + ОписаниеОшибки() + ")", "!!!");
КонецПопытки;
// Не используется для DataMatrix
Попытка
// BarCode = СоздатьОбъект("BARCODE.BarcodeCtrl.1" );
Исключение
// Сообщить("Ошибка подключения! (" + ОписаниеОшибки() + ")", "!!!");
КонецПопытки;
КонецПроцедуры //ПриНачалеРаботыСистемы
-
30.12.2019, 19:05 #14
- Регистрация
- 18.01.2019
- Сообщений
- 4
- Сказал(а) спасибо
- 1
- Поблагодарили 3 раз(а) в 3 сообщениях
Re: Маркировка для 1С 77
Спасибо за ответ.
Я уже на ocvita barcode сделал сам.
Полученные марки распечатываются, считываются приложениями с мобильного. А приложение на мобильном честныйЗнак даже выдает инфо что за марка, какой товар и за кем закреплена она.
Внедрил под 1с77
-
Пользователь сказал cпасибо:
yri (01.01.2020)
-
12.01.2020, 18:49 #15
- Регистрация
- 02.12.2016
- Сообщений
- 9
- Сказал(а) спасибо
- 1
- Поблагодарили 0 раз(а) в 0 сообщениях
Re: Маркировка для 1С 77
Всем привет! Хочу подключиться к данной теме.
Ребята - почитал по этой теме, кто то разрабатывает , дорабатывает решения на 7 платформе под работу с маркированным товаром? Сгенерировали ШК - дальше же при списании его нужно отправить. Кто и как это решает?
-
12.01.2020, 19:21 #16
- Регистрация
- 18.01.2019
- Сообщений
- 4
- Сказал(а) спасибо
- 1
- Поблагодарили 3 раз(а) в 3 сообщениях
Re: Маркировка для 1С 77
Я решаю так:
- розничная продажа происходит через онлайн-кассу. Иными словами, кроме реквизитов у чека по товару, цене и т.д. буду отправлять марку (gtin, serial). Далее офд должно отправить инфо о таком товаре в наш личный кабинет. С офд нужно заключить допСоглашение на обработку ими маркированного товара.
- оптовая продажа (безнал), ч/з накладные. Эти данные буду выгружать в csv файл. Далее этот файл будет руками загружаться в личном кабинете.
- иные выбытия товара типа списания, оприходования, личное использование и т.д. будут также выгружаться в соответствующие csv файлы.
В будущем, когда все устаканится с api доделаю механизм, чтобы не делать промежуточные файлы.
В самой 1с хранить информацию по остаткам марок не предполагаем. Марку подставляем только либо в момент продажи (чекккм), либо при сборе и выдаче на складе.
Из-за специфики работы (менеджеры и склад разнесены по этажам) будут сделаны срецДоки, подчинённые первичным, в которые будут подставляться конкретные товары с марками. Например, менеджер выписал счёт, РНК и счетФактуру как обычно - общее колВо. На складе на основании РНК будет выписываться докумя реализацияМаркТоваров. В нем кладовщик подберёт товары и их конкретные марки пропикпет. Именно этот документ будет выгружаться в файл для переноса данных в чз.
Примерно по такой же схеме будут сделаны доки для ЧЗ в ситуациях по складу: списание, оприходования.
Пока идея такая и это касается обуви.
Неизвестные ещё ситуации связаны с тем, что
1.от поставщиков не понятно как что будет приходить.
2. С лета чз обещает что приходы и реализация больше не будет на бумажных носителях, а только через Эдо. Соответственно, что-то изменится с выгрузкамиЗагрузкамт
Пока так.
-
12.01.2020, 19:40 #17
- Регистрация
- 02.07.2009
- Сообщений
- 20
- Сказал(а) спасибо
- 9
- Поблагодарили 2 раз(а) в 2 сообщениях
Re: Маркировка для 1С 77
Тут, конечно можно романы по этому поводу писать т.к. задачи и конфигурации и полет мысли у всех разный.
Но главное. После выпуска кодов маркировки (КМ) их необходимо ввести в оборот и после реализации вывести из оборота. Т.е. 2 дополнительные функции API.
Итак в общем план такой
1. Создаем GTIN и получаем.
2. Заказываем КМ на готовые GTIN, получаем их.
3. Печатаем КМ.
4. Вводим в оборот.
5. Реализуем и выводим из оборота.
У меня на всё получилось 5 докуметов с отдельными журналами. И справочник GTIN с дополнительными по кодам ТНВЭД, странам, артикулам и пр.
Задача программиста внедрить этот скелет в любую конфигурацию.
Кстати никто не работал с Крипто сервисами через 1с77?
-
12.01.2020, 23:32 #18
- Регистрация
- 02.12.2016
- Сообщений
- 9
- Сказал(а) спасибо
- 1
- Поблагодарили 0 раз(а) в 0 сообщениях
Re: Маркировка для 1С 77
Можешь поделиться наработками? Готов к совместному сотрудничеству или за разовое вознаграждение.
-
12.01.2020, 23:34 #19
- Регистрация
- 02.12.2016
- Сообщений
- 9
- Сказал(а) спасибо
- 1
- Поблагодарили 0 раз(а) в 0 сообщениях
Re: Маркировка для 1С 77
Вообще камрады давайте объединяться? Можно проект на гите создать и совместными усилиями "есть слона".
-
-
12.01.2020, 23:59 #20
- Регистрация
- 02.07.2009
- Сообщений
- 20
- Сказал(а) спасибо
- 9
- Поблагодарили 2 раз(а) в 2 сообщениях
Re: Маркировка для 1С 77
Да без проблем!
В API запросах с ЦРПТ работают два метода GET и POST см. документацию по API.
Выше я выкладывал загрузку компонент. Теперь функции для работы с запросами.
//*******************************************
Функция глЗапросGET(СтрокаЗапроса) Экспорт
Стр = "";
Попытка
WinHttp.Open("GET", СтрокаЗапроса+"omsId="+СокрЛП(� �онстанта.OmsID), 0);
WinHttp.SetRequestHeader("Accept","application/json");
WinHttp.SetRequestHeader("Content-Type","application/x-www-form-urlencoded;charset=UTF-8");
WinHttp.SetRequestHeader("clientToken",СокрЛ� �(Константа.ClientToken));
WinHttp.SetTimeouts(15000, 15000, 15000, 15000);
WinHttp.Send();
Если WinHttp.Status = 200 Тогда
Стр = WinHttp.ResponseText;
Иначе
Сообщить("HTTP " + WinHttp.Status + " " + WinHttp.StatusText);
Стр = "Ошибка запроса!";
КонецЕсли;
Исключение
Сообщить("Ошибка запроса!");
КонецПопытки;
Возврат Стр;
КонецФункции
//*******************************************
Функция глЗапросPOST(СтрокаЗапроса) Экспорт
Стр = "";
Попытка
WinXML.Open("POST", "https://suz2.crpt.ru/api/v2/light/orders?"+"omsId="+СокрЛП(Константа. OmsID), 0);
WinXML.SetRequestHeader("Accept","application/json");
WinXML.SetRequestHeader("Content-Type","application/json;charset=UTF-8");
WinXML.SetRequestHeader("Content-Length",Строка(СтрДлина(Строка Запроса)));
WinXML.SetRequestHeader("clientToken",СокрЛП (Константа.ClientToken));
WinXML.SetTimeouts(15000, 15000, 15000, 15000);
WinXML.Send(СтрокаЗапроса);
Если WinXML.Status = 200 Тогда
Стр = WinXML.ResponseText;
Иначе
Сообщить("HTTP " + WinXML.Status + " " + WinXML.StatusText);
КонецЕсли;
Исключение
Сообщить("Ошибка запроса!");
КонецПопытки;
Возврат Стр;
КонецФункции
//*******************************************
В дальнейшем просто идет обработка получаемых строк.
Похожие темы
-
Нужна помощь, маркировка печать Datamatrix из pdf
от AdmRPO в разделе ПомощьОтветов: 2Последнее сообщение: 26.01.2022, 22:07 -
Маркировка памяти Palit Radeon HD 2600 Pro Sonic 256 Mb DDR3
от Groov-Jet в разделе Железо (hardware)Ответов: 1Последнее сообщение: 18.01.2008, 02:55
Социальные закладки