118
Приложение 3 Программный код модуля 1С: Предприятие
Функция ОпределитьТипЗапроса(Запрос)
Тип = Запрос.Параметры["type"];
ЗаписьJSON = Новый ЗаписьJSON;
ЗаписьJSON.УстановитьСтроку();
ЕСЛИ Тип РАВНО ПолучитьСписок Тогда
Результат = СформироватьСписокВысталвенныхСчетов(Запрос)
ДанныеМассив = Новый Массив();
Пока Результат.Следующий ()Цикл
Структура = Новый Структура ();
Структура.Вставить("invoiceNumber",Строка(Результат.НомерСчета));
Структура.Вставить("invoiceDate",Строка(Результат.Дата));
Структура.Вставить("invoiceDue",Строка(Результат.ОплатитьДо));
Структура.Вставить("sum",Срока(Результат.Сумма));
ДанныеМассив.Добавить(Структура);
КонецЦикла;
ЗаписатьJSON(ЗаписьJSON, ДанныеМассив);
СтрокаДляОтвета = ЗаписьJSON.Закрыть();