Интеграция AI в 1С через AI Gateway: HTTP-запросы на встроенном

1С:Предприятие умеет ходить в HTTP-сервисы штатными средствами встроенного языка — этого достаточно, чтобы обращаться к OpenAI-совместимому API AI Gateway. Соберём функцию, которая шлёт текст промпта на шлюз и возвращает ответ модели: её можно вызывать из обработки, регламентного задания или обработчика события. Модели берём из каталога.

Подготовка

Нужен ключ AI Gateway sk-aigate-… и хост ai-gatewey.ru (порт 443, HTTPS). Ключ лучше хранить в константе или параметре сеанса, а не в модуле. Обращения идут на путь /v1/chat/completions.

Реализация

1. 1
   Вспомогательные функции JSON

   Тело запроса и разбор ответа — через штатные ЗаписатьJSON/ПрочитатьJSON:

   bsl Копировать

   Функция ВJSON(Значение)
       Запись = Новый ЗаписьJSON;
       Запись.УстановитьСтроку();
       ЗаписатьJSON(Запись, Значение);
       Возврат Запись.Закрыть();
   КонецФункции
   
   Функция ИзJSON(Строка)
       Чтение = Новый ЧтениеJSON;
       Чтение.УстановитьСтроку(Строка);
       Результат = ПрочитатьJSON(Чтение);
       Чтение.Закрыть();
       Возврат Результат;
   КонецФункции

2. 2
   Функция обращения к модели

   Формируем структуру запроса, шлём HTTPЗапрос по защищённому соединению и достаём текст ответа:

   bsl Копировать

   Функция ЗапросКAI(ТекстПромпта) Экспорт
       Сообщение = Новый Структура("role, content", "user", ТекстПромпта);
       Сообщения = Новый Массив;
       Сообщения.Добавить(Сообщение);
   
       Тело = Новый Структура;
       Тело.Вставить("model", "deepseek/deepseek-chat");
       Тело.Вставить("messages", Сообщения);
   
       Запрос = Новый HTTPЗапрос("/v1/chat/completions");
       Запрос.Заголовки.Вставить("Content-Type", "application/json");
       Запрос.Заголовки.Вставить("Authorization", "Bearer " + КлючAI Gateway());
       Запрос.УстановитьТелоИзСтроки(ВJSON(Тело));
   
       Соединение = Новый HTTPСоединение(
           "ai-gatewey.ru", 443, , , , 30,
           Новый ЗащищенноеСоединениеOpenSSL);
       Ответ = Соединение.ОтправитьДляОбработки(Запрос);
   
       Данные = ИзJSON(Ответ.ПолучитьТелоКакСтроку());
       Возврат Данные["choices"][0]["message"]["content"];
   КонецФункции

3. 3
   Хранение ключа

   Ключ отдаём отдельной функцией — из константы или параметра сеанса, чтобы не хардкодить в бизнес-логике:

   bsl Копировать

   Функция КлючAI Gateway()
       Возврат Константы.КлючAI Gateway.Получить();
   КонецФункции

4. 4
   Вызов из кода

   Дальше функцию можно применять где угодно — например, сформировать краткое описание номенклатуры:

   bsl Копировать

   Описание = ЗапросКAI("Составь краткое описание товара: " + Наименование);

Какие модели подойдут

Для типовых задач учёта (описания, классификация, черновики писем) хватает быстрой недорогой модели; сложные разборы можно направить на флагман:

Частые вопросы