Create JSON with dynamic key (Progress 4GL)

I have a dataset defined for 2 temp-tables linked with some field (lets say : item). For example:

define temp-table items no-undo
field item as char.

define temp-table customer no-undo
field item as char serialize-hidden
field custname as char
field price as dec.

define dataset dsitemcust for items,customer
data-relation dr1 for items,customer relation-fields(item,item) nested.


This gives the json output like this:

{
"items": [
{
"item": "abc_item",
"customer": [
{
"custname": "uvw_cust",
"price": 123
},
{
"custname": "xyz_cust",
"price": 234
},
....
]
},
{
"item": "def_item",
"custname": [{},{},...]
}
...
]
}


But i want to get something like this: [item as key and, custname and price as value (in array of object where custnum is key again)]

{ "abc_item" : [{"uvw_cust" : 123}, {"xyz_cust" : 234}, ...],
"def_item" : [{}, .. ],
..
}


Is this possible/achievable in Progress openedge? (Progress version: 10.2B)

Continue reading...