Упражнение 7.1: Запись данных в JSON
На этом практическом занятии вы напишите ABL-код для записи данных из набора данных в файл JSON, для чтения JSON-данных в набор данных, а также настроите способ записи данных JSON. Затем запишите вложенные данные и данные с разными именами и, наконец, запишите подмножество полей из временной таблицы в файл JSON.
Это занятие состоит из пяти заданий, на выполнение которых отводится примерно 30 минут.
Задание 1
В этом задании мы запишем данные из набора данных в файл JSON.
Шаг |
Действие |
1 | В Progress Developer Studio в каталоге Client/src/PurchaseOrder создайте новую процедуру с именем testJSON.p. |
2 | Скопируйте следующие части из процедуры access_dsPO_procs.p в процедуру testJSON.p:
|
3 | Добавьте комментарий к концу процедуры testJSON.p для данного тестового сценария, в котором вы будете тестировать запись набора данных в файл JSON.
Добавьте его перед комментарием «clean up» /*---------------------------------- Тестирование записи набора данных в JSON -------------------*/ |
4 | После комментария добавьте код для извлечения всех записей PurchaseOrder/POLine со значениями в поле PONum меньше или равное 8005.
Для этого используйте процедуру get_dsPO. RUN get_dsPO IN hProc ("PONum <= 8005","",OUTPUT DATASET dsPO). |
5 | Запишите набор данных в файл JSON с именем PurchaseOrders.json используя настройки по умолчанию для записи JSON. Файл можно разместить в любом удобном для вас месте.
DATASET dsPO:WRITE-JSON("FILE","C:\OpenEdge\WRK\ProDataSets\log\PurchaseOrders.json"). |
6 | Добавьте код записи набора данных в файл JSON в форматированном виде. Используйте имя файла PurchaseOrders_formatted.json.
DATASET dsPO:WRITE-JSON("FILE","C:\OpenEdge\WRK\ProDataSets\log\PurchaseOrders_formatted.json", TRUE). |
7 | Сохраните эту процедуру, убедившись, что она компилируется без ошибок. |
8 | Выполните процедуру.
Были ли созданы два файла с содержимым, как это было задумано? |