Zlecenia dla freelancerów

Zlecenia dla freelancerów

Wywóz TTN z 1s na marketplace'y

Automatyzacja zarządzania przedsiębiorstwem — podano nieprawidłowe kategorie?

Zlecenie jest tłumaczone automatycznie. Zaloguj się lub zarejestruj się, żeby zobaczyć oryginał

Усе детально зі скріншотами та кодом запитів кодом запитів описав на в google docs https://docs.google.com/document/d/1DxK4LOPbYtV7P18RU510pQvNz8-rdhNXKUOnl0rWQKA/edit?usp=sharing

додати колонку з випадаючим списком для вибору ідентифікатора джерела: prom, rozetka, epicentr
додати колонку “токен” (генерація токенів по логіну паролю тут ніде не треба)

Це джерело обирається в замовленні!!! Поле “Источник”(праворуч)

Додати нове поле в замовлення - “№ замов МП” (номер замовлення маркетплейса) яке буде використане для запиту.
в “список замовлень” додати кнопку “Вивантажити ТТН на МП”. при натисканні обираєте виділенні замовлення , згруповує їх по апі ключу, додає мітку “назви джерела” і власне вивантажує ттн на маркетплейси (код нижче)

додаємо колонку в список замовлень “Статус експорту ТТН”: невивантажувалась, успіх, помилка вивантаження

для реалізації я передам вам базу данних і апі ключі. ТТН та номери замовлень можете запросити після реалізії для тестів

Процедура ПередатьТТН(Заказ) // пром

Если ЗначениеЗаполнено(Заказ.НомерЗаказа2ССайта)

И Заказ.ЭтоТТНиз1С Тогда

HTTPСоединение = Новый HTTPСоединение("my.prom.ua",,,,,, Новый ЗащищенноеСоединениеOpenSSL());

КлючAPI = "";

Если ЗначениеЗаполнено(Заказ.ИсточникЗначение) Тогда

Запрос = Новый Запрос;

Запрос.Текст =

"ВЫБРАТЬ

| КлючИнтернета.КлючAPI

|ИЗ

| РегистрСведений.КлючИнтернета КАК КлючИнтернета // БЕРЕМО З ДЖЕРЕЛ, а не ключів інтернету

|ГДЕ

| КлючИнтернета.Организация = &Организация

| И КлючИнтернета.Источник = &Источник";

Запрос.УстановитьПараметр("Источник", Заказ.ИсточникЗначение);

Запрос.УстановитьПараметр("Организация", Заказ.Организация);

РезультатЗапроса = Запрос.Выполнить();

ВыборкаДетальныеЗаписи = РезультатЗапроса.Выбрать();

Пока ВыборкаДетальныеЗаписи.Следующий() Цикл

КлючAPI = ВыборкаДетальныеЗаписи.КлючAPI;

КонецЦикла;

ЗаписьJSON = Новый ЗаписьJSON;

ЗаписьJSON.УстановитьСтроку();

Структура = Новый Структура();

Структура.Вставить("order_id", Число(Заказ.НомерЗаказа2ССайта));

Структура.Вставить("declaration_id", Заказ.НомерТТН);

Если Заказ.СпособОтправки = Справочники.СпособыОтправки.НоваяПочта Тогда

Структура.Вставить("delivery_type", "nova_poshta");

Иначе

Структура.Вставить("delivery_type", "ukrposhta");

КонецЕсли;

ЗаписатьJSON(ЗаписьJSON, Структура);

ЗаголовокHTTP = Новый Соответствие();

ЗаголовокHTTP.Вставить("Authorization", "Bearer " + КлючAPI);

ЗаголовокHTTP.Вставить("Content-Type", "application/json");

HTTPЗапрос = Новый HTTPЗапрос("api/v1/delivery/save_declaration_id", ЗаголовокHTTP);

HTTPЗапрос.УстановитьТелоИзСтроки(ЗаписьJSON.Закрыть());

Ответ = HTTPСоединение.ОтправитьДляОбработки(HTTPЗапрос);

Если Ответ.КодСостояния >= 300 Тогда

ТекстОтвета = Ответ.ПолучитьТелоКакСтроку();

Сообщить("Код состояния: "+ Строка(Ответ.КодСостояния) + Символы.ПС + ТекстОтвета);

Иначе

ЕстьОшибки = Найти(Ответ.ПолучитьТелоКакСтроку(), "error") > 0;

Если ЕстьОшибки Тогда

Сообщить(Ответ.ПолучитьТелоКакСтроку()); // записати відповідь в нове поле "статус вивант ТТН" - успіх, найменування помилки, невивантажувалось

Иначе

Сообщить("Переден номер ТТН на пром.юа: " + Строка(Заказ.НомерТТН));

КонецЕсли;

КонецПроцедуры

//////////////// ROZETKA start

Функция ОбновитьЗаказ(Заказ, Статус=Неопределено, ТТН=Неопределено, Комментарий=Неопределено, ОбновитьТовары=Ложь) Экспорт

Если Статус <> Неопределено ИЛИ ТТН <> Неопределено ИЛИ Комментарий <> Неопределено Тогда

ID = Заказ.НомерЗаказа2ССайта; //КлючПолучить(Заказ, Перечисления.АпиРозеткаТипыКлючей.ID_Order);

Если Статус <> Неопределено Тогда

СтатусКод = НайтиСтатусЗаказаПоОписанию(Статус);

КонецЕсли;

Рез = РедактированиеЗаказаШапка(ID,, СтатусКод, Комментарий, ТТН);

Возврат Рез

КонецЕсли;

КонецФункции //

Функция РедактированиеЗаказаШапка(id, expand=Неопределено, status=Неопределено, seller_comment=Неопределено, ttn=Неопределено)

Токен = ПолучитьТокен();

СтруктураЗапроса = Новый Структура;

Если ЗначениеЗаполнено(status) Тогда

СтруктураЗапроса.Вставить("status", status); // 3 - передан в службу доставки!!!

КонецЕсли;

Если ЗначениеЗаполнено(seller_comment) Тогда

СтруктураЗапроса.Вставить("seller_comment", seller_comment);

КонецЕсли;

Если ЗначениеЗаполнено(ttn) Тогда

СтруктураЗапроса.Вставить("ttn", ttn);

КонецЕсли;

РесурсНаСервере = "/orders/" + ИДвСтроку(ID) + ?(ЗначениеЗаполнено(expand), "?expand=" + expand, "");

Ответ = ОтправитьЗапрос("PUT", РесурсНаСервере, Токен, СтруктураЗапроса); // токен статичний з довідника "джерел"...

Возврат Ответ;

КонецФункции //РедактированиеЗаказа

//////////////// epicentr start

https://mp-api.epicentrm.com.ua/v1/oms/orders/{orderId}/shipment-number

{

"number": "100321569875"

}

Oferty 4

Alina Stoyeva

13 0

Zlecenia 13
Ocena -
Ranking 602

Budżet: 700 UAH Termin: 1 dzień

Witam, mogę pomóc Ci wykonać to zadanie maksymalnie szybko i jakościowo. Doświadczenie podobne miałem - więc pisz śmiało ;)
Cena i terminy zależą od zakresu pracy.

Oleksandr Sidorov

4 0

Zlecenia 4
Ocena -
Ranking 1 018

Budżet: 1000 UAH Termin: 1 dzień

Witaj, Wjaczesławie.
Jaka jest twoja konfiguracja (nazwa i wersja)? Czy są moduły rynków, które ładują lub ściągają dane na te rynki (z opisu nie do końca zrozumiałem). O jakich listach przewozowych usług dostawy mowa - czy są one również zintegrowane z twoim 1C? Dużo pytań, ale myślę, że jeśli rozszerzysz opis lub odpowiesz na nie - będziemy mogli ocenić budżet. Mamy wszystkie gotowe rozwiązania do wymiany z rynkami i usługami dostawy - mamy te numery listów przewozowych ściągane (są różnice w każdym rynku, na przykład w Rozetka...)
Napisz do mnie, jeśli ci wygodnie - omówimy szczegóły. Więcej informacji w portfolio.
Dziękuję!

Podobny projekt: Доработка функционала обмена с сайтом в 1С