Интеграция ТСД с 1С:
пошаговое руководство

// Процедура выгрузки данных о товарах для ТСД
Процедура ВыгрузитьНоменклатуруДляТСД(Запрос)

    ТекстJSON = "";
    МассивТоваров = Новый Массив;

    // Запрос к справочнику номенклатуры
    Запрос = Новый Запрос;
    Запрос.Текст =
        "ВЫБРАТЬ" |
        "    Номенклатура.Ссылка КАК Ссылка," |
        "    Номенклатура.Код КАК Код," |
        "    Номенклатура.Наименование КАК Наименование," |
        "    Номенклатура.Артикул КАК Артикул," |
        "    Номенклатура.Штрихкод КАК Штрихкод" |
        "ИЗ" |
        "    Справочник.Номенклатура КАК Номенклатура" |
        "ГДЕ" |
        "    НЕ Номенклатура.ПометкаУдаления";

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

    Пока Выборка.Следующий() Цикл
        СтруктураТовара = Новый Структура;
        СтруктураТовара.Вставить("id", Выборка.Код);
        СтруктураТовара.Вставить("name", Выборка.Наименование);
        СтруктураТовара.Вставить("article", Выборка.Артикул);
        СтруктураТовара.Вставить("barcode", Выборка.Штрихкод);
        МассивТоваров.Добавить(СтруктураТовара);
    КонецЦикла;

    // Сериализация в JSON
    ЗаписьJSON = Новый ЗаписьJSON;
    ЗаписьJSON.УстановитьСтроку();
    ЗаписатьJSON(ЗаписьJSON, МассивТоваров);
    ТекстJSON = ЗаписьJSON.Закрыть();

    Возврат ТекстJSON;

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

// Обработка данных инвентаризации, полученных от ТСД
Процедура ЗагрузитьДанныеИнвентаризации(ТекстJSON)

    ЧтениеJSON = Новый ЧтениеJSON;
    ЧтениеJSON.УстановитьСтроку(ТекстJSON);
    ДанныеТСД = ПрочитатьJSON(ЧтениеJSON);
    ЧтениеJSON.Закрыть();

    // Создание документа инвентаризации
    ДокИнвентаризация = Документы.ИнвентаризацияТоваровНаСклаве.СоздатьДокумент();
    ДокИнвентаризация.Дата = ТекущаяДата();
    ДокИнвентаризация.Склад = Справочники.Склады.ОсновнойСклад;

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

        // Поиск номенклатуры по штрихкоду
        НоваяСтрока = ДокИнвентаризация.Товары.Добавить();
        НоваяСтрока.Номенклатура = НайтиНоменклатуруПоШтрихкоду(
            СтрокаТСД.Штрихкод);
        НоваяСтрока.КоличествоФакт = СтрокаТСД.Количество;
        НоваяСтрока.КоличествоУчет = ПолучитьОстаток(
            НоваяСтрока.Номенклатура, ДокИнвентаризация.Склад);

    КонецЦикла;

    // Запись и проведение документа
    ДокИнвентаризация.Записать(РежимЗаписиДокумента.Проведение);

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

// Модуль HTTP-сервиса: ТСД_ОбменДанными
// URL: /hs/tsd/exchange

Функция ПолучитьТовары(Запрос)

    Ответ = Новый HTTPСервисОтвет(200);
    Ответ.Заголовки.Вставить("Content-Type", "application/json");

    Товары = СформироватьСписокТоваров();

    ЗаписьJSON = Новый ЗаписьJSON;
    ЗаписьJSON.УстановитьСтроку();
    ЗаписатьJSON(ЗаписьJSON, Товары);

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

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

Функция ПринятьДокумент(Запрос)

    Тело = Запрос.ПолучитьТелоКакСтроку();
    ЧтениеJSON = Новый ЧтениеJSON;
    ЧтениеJSON.УстановитьСтроку(Тело);
    Данные = ПрочитатьJSON(ЧтениеJSON);
    ЧтениеJSON.Закрыть();

    ТипДокумента = Данные.ТипОперации; // "Приемка", "Инвентаризация", "Отгрузка"

    Если ТипДокумента = "Приемка" Тогда
        ОбработатьПриемку(Данные);
    ИначеЕсли ТипДокумента = "Инвентаризация" Тогда
        ОбработатьИнвентаризацию(Данные);
    ИначеЕсли ТипДокумента = "Отгрузка" Тогда
        ОбработатьОтгрузку(Данные);
    КонецЕсли;

    Ответ = Новый HTTPСервисОтвет(200);
    Ответ.УстановитьТелоИзСтроки("{\""status\"": \""ok\""}");
    Возврат Ответ;

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