Упражнение 7.4: Использование отличающихся имён
Задание 4
В этом задании мы укажем, что при записи данных в файл JSON должны использоваться разные имена. Затем проверим чтение данных из файла JSON, тем самым подтвердив, что мы можем это сделать успешно.
|
Шаг |
Действие |
| 1 | Снова, в процедуре testJSON.p, добавьте комментарий к концу процедуры для нового тестового сценария.
/*---------------------------------- Тестирование использования отличающихся имён в файле JSON -------------------*/ |
| 2 | Добавьте код для указания различных имён следующим элементам объекта JSON:
DATASET dsPO:SERIALIZE-NAME = "POs".
TEMP-TABLE ttPurchaseOrder:SERIALIZE-NAME = "PO".
TEMP-TABLE ttPOLine:SERIALIZE-NAME = "POL".
BUFFER ttPurchaseOrder:BUFFER-FIELD("SupplierIDNum"):SERIALIZE-NAME = "SupNum".
BUFFER ttPOLine:BUFFER-FIELD("ExtendedPrice"):SERIALIZE-NAME = "Tot".
|
| 3 | Добавьте код для записи набора данных в JSON-файл с именем PurchaseOrders_newNames_nested_formatted.json с форматированием.
DATASET dsPO:WRITE-JSON("FILE", "C:\OpenEdge\WRK\ProDataSets\log\PurchaseOrders_newNames_nested_formatted.json",TRUE).
|
| 4 | Добавьте код для чтения файла PurchaseOrders_newNames_nested_formatted.json в набор данных dsPO с предварительной очисткой набора данных.
DATASET dsPO:READ-JSON("FILE","C:\OpenEdge\WRK\ProDataSets\log\PurchaseOrders_newNames_nested_formatted.json","EMPTY")
|
| 5 | Добавьте код для записи набора данных dsPO в файл JSON с именем PurchaseOrders_newNames_nested_formatted_read.json с форматированием.
DATASET dsPO:WRITE-JSON("FILE", "C:\OpenEdge\WRK\ProDataSets\log\PurchaseOrders_newNames_nested_formatted_read.json",TRUE).
|
| 6 | Сохраните эту процедуру, убедившись, что она компилируется без ошибок. |
| 7 | Выполните процедуру.
Содержит ли файл PurchaseOrders_newNames_nested_formatted.json данные с новыми именами? Содержит ли файл PurchaseOrders_newNames_nested_formatted_read.json те же данные? |