Реализация взаимодействия с API дисконтного сервера "Frontol discount unit"

14 Comments

1. PlZoo 07.05.2018 at 07:50

   Доброго времени суток.

   1) В вашей обработке не нашел пункт для вывода табличной формы, к примеру по вкладке: Карты клиентов. Чтоб можно было в Excel выгрузить. Как можно этот пункт добавить?

   Reply ↓
2. saiten 07.05.2018 at 09:42

   Щелкаете правой кнопкой на любой ячейке таблицы, выбираете пункт «Вывести список», выбираете колонки, которые вам нужны и нажимаете «ОК». Откроется табличный документ, который можно будет сохранить в Ексель.

   Reply ↓
3. s.matyukin_visma 09.08.2018 at 13:14

   Добрый день, скачал вашу обработку! Каким образом выгрузить из 1с список бонусных карт, так чтобы они появились FrontolDiscountUnit

   Reply ↓
4. s.matyukin_visma 09.08.2018 at 15:03

   Версия платформы 1С:Предприятие 8.3 (8.3.9.2033)

   При попытке авторизоваться выдает ошибку {ВнешняяОбработка.РаботаСFrontolDiscountUnit.МодульОбъекта(391)}: 400 Bad request:unexpected character (row: 1, column: 1)
   
   ВызватьИсключение «»+HTTPОтвет.КодСостояния+» «+HTTPОтвет.ПолучитьТелоКакСтроку(КодировкаТекста.UTF8);

   Данные авторизации» {
   
   «id»: «admin»,
   
   «password»: «b271df19c8b90ffb328332fa8d0f9542»
   
   }»// Login:admin password — moo

   В чем может быть проблема? Я переделал процедуру ниже из-за ошибке с переменной поток.

   Функция КодироватьСтрокуBase64(Строка) Экспорт
   //поток = новый ПотокВПамяти;
   //ЗаписьТекста = Новый ЗаписьТекста(поток, КодировкаТекста.UTF8);
   //
   //ЗаписьТекста.Записать(Строка);
   //ЗаписьТекста.Закрыть();
   //
   //
   //
   //ТекстБ64 = Base64Строка(поток.ЗакрытьИПолучитьДвоичныеДанные());
   
   ИмяВременногоФайла = ПолучитьИмяВременногоФайла();
   
   ЗаписьТекста = Новый ЗаписьТекста(ИмяВременногоФайла, КодировкаТекста.UTF8);
   ЗаписьТекста.Записать(Строка);
   ЗаписьТекста.Закрыть();
   
   
   мДвоичныеДанные = Новый ДвоичныеДанные(ИмяВременногоФайла);
   
   ТекстБ64 = Base64Строка(мДвоичныеДанные);
   
   
   Возврат СтрЗаменить(ТекстБ64,Символы.ВК+Символы.ПС,»»)
   КонецФункции

   Показать

   Reply ↓
5. s.matyukin_visma 09.08.2018 at 15:23

   Проблема решилась изменением кодировки привожу код ниже:

   ЗаписьТекста = Новый ЗаписьТекста(ИмяВременногоФайла, Кодировка_UTF8_NoBOM());
   ЗаписьТекста.Записать(Строка);
   ЗаписьТекста.Закрыть();
   
   
   мДвоичныеДанные = Новый ДвоичныеДанные(ИмяВременногоФайла);
   
   ТекстБ64 = Base64Строка(мДвоичныеДанные);
   
   
   Возврат СтрЗаменить(ТекстБ64,Символы.ВК+Символы.ПС,»»)
   КонецФункции

   Показать

   Функция Кодировка_UTF8_NoBOM()
   
   Возврат «CESU-8»;
   
   КонецФункции

   Reply ↓
6. saiten 14.08.2018 at 08:40

   (6) Выгрузка карт не предусмотрена, т.к. обработка не завязана ни на какую конфигурацию и неизвестно, есть ли в вашей конфигурации справочник карт клиента вообще. Функции, необходимые для выгрузки карт в модуле обработки есть, вы можете выгрузить карты, использовав примерно следующий код:
   

   ДанныеКарты = СтруктураКартаКлиента();
   ДанныеКарты.id = …
   ДанныеКарты.name = …
   //Заполняем нужные данные карты
   
   КартаНаСервере = КартаКлиентаПолучить(Соединение,Токен,ДанныеКарты.id);
   Если КартаНаСервере = Неопределено Тогда
   КартаКлиентаДобавить(Соединение, Токен
   ,ДанныеКарты.id
   ,ДанныеКарты);
   Иначе
   КартаКлиентаИзменить(Соединение, Токен
   ,ДанныеКарты.id
   ,ДанныеКарты);
   КонецЕсли;
   

   Показать

   Reply ↓
7. saiten 14.08.2018 at 08:55

   (8) Странно, у меня нормально работает с кодировкой UTF-8… Версия fdu последняя у вас? И какая ОС, если не секрет?

   Reply ↓
8. saiten 14.08.2018 at 09:04

   (6)Либо вручную добавлять строки в табличное поле обработки и заполнять нужные поля. Все изменения в этой таблице транслируются на сервер fdu.

   Reply ↓
9. user703392_cdman2005 24.10.2018 at 14:48

   Добрый день, у меня пустая форма открывается

   Reply ↓
10. saiten 25.10.2018 at 07:57

    Эта обработка под обычные формы (УТ 10.3). Для управляемого режима надо свою форму рисовать.

    Reply ↓
11. user703392_cdman2005 25.10.2018 at 07:59

    т.е. для нас она бесполезна? мы хотели привязать к ут 11.3

    Reply ↓
12. saiten 26.10.2018 at 07:56

    Вроде того. Чтобы использовать её с 11.3 надо форму управляемую нарисовать.

    Reply ↓
13. s.matyukin_visma 14.02.2019 at 16:19

    (10) Добрый день! Вернулись к задаче работы с fdu. Версия fdu 2.1.6.867,windows server 2008 r2.

    Reply ↓
14. ranis888 03.09.2019 at 11:08

    Ответ = Соединение.Получить(Запрос);
    
    по причине:
    
    Ошибка работы с Интернет: Не могу установить соединение

    Reply ↓