Параметр

Обязательный

Описание

&НаСервере

Функция ПолучитьЗаявки(Знач Соединение, Знач Token)

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

            Заголовки.Вставить("Cookie", Token);

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

            Ответ = Соединение.ВызватьHTTPМетод("GET", Запрос);     

            ЧтениеJSON = Новый ЧтениеJSON();

            ЧтениеJSON.УстановитьСтроку(Ответ.ПолучитьТелоКакСтроку(КодировкаТекста.UTF8));

            Результат = ПрочитатьJSON(ЧтениеJSON);

            ЧтениеJSON.Закрыть();

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

                        Возврат Результат.value.content;

            Иначе

                        Возврат "";

            КонецЕсли;

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

&НаСервере

Процедура КомандаНаСервере()

            Адрес = "eds.mosreg.ru";               

            Соединение = Новый HTTPСоединение(Адрес,443,,,,30, Новый ЗащищенноеСоединениеOpenSSL);  

            Запрос = Новый HTTPЗапрос("/login?login-form-email=1234567&login-form-password=1234567");

            Ответ = Соединение.ВызватьHTTPМетод("POST", Запрос);    

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

                        Куки = Ответ.Заголовки.Получить("Set-Cookie");

                        Куки = СтрЗаменить(Куки, ";", Символы.ПС);

                        Token = СтрПолучитьСтроку(Куки, 1);                 

                        МассивЗаявок = ПолучитьЗаявки(Соединение, Token);

                        Для Каждого Эл Из МассивЗаявок Цикл

                                   ДобавитьЗаявкуВБазу(Эл);

                        КонецЦикла;

            Иначе            

            КонецЕсли;  

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

&НаКлиенте

Процедура Команда(Команда)

            КомандаНаСервере();

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