Lianja

Merge SP-API JSON Order Arrays

See more Amazon SP-API Examples

Demonstrates how to merge JSON arrays for the case of Amazon SP-API orders. Lianja

llSuccess = .F.

// Batch 1 File
lcA1 = '{"payload": {"Orders": [{"AmazonOrderId": "1","OrderStatus": "Unshipped"},{"AmazonOrderId": "2","OrderStatus": "Unshipped"}]}'

// Batch 2 File
lcA2 = '{"payload": {"Orders": [{"AmazonOrderId": "3","OrderStatus": "Unshipped"},{"AmazonOrderId": "4","OrderStatus": "Unshipped"}]}'

// Required Merged File
// {"payload": {"Orders": [{"AmazonOrderId": "1","OrderStatus": "Unshipped"},{"AmazonOrderId": "2","OrderStatus": "Unshipped"},{"AmazonOrderId": "3","OrderStatus": "Unshipped"},{"AmazonOrderId": "4","OrderStatus": "Unshipped"}]}

llSuccess = .T.
loJson1 = createobject("CkJsonObject")
loJson1.Load(lcA1)

loJson2 = createobject("CkJsonObject")
loJson2.Load(lcA2)

// We're going to add the order records from json2 to json1.
loJarr1 = loJson1.ArrayOf("payload.Orders")
loJarr2 = loJson2.ArrayOf("payload.Orders")

i = 0
lnNumOrders = loJarr2.Size
do while (i < lnNumOrders)
    loJOrder = loJarr2.ObjectAt(i)
    // Assuming non-null return...
    loJarr1.AddObjectCopyAt(-1,loJOrder)
    i = i + 1
enddo

// Show the merged JSON.
loJson1.EmitCompact = .F.
? loJson1.Emit()

// Result:

// {
//   "payload": {
//     "Orders": [
//       {
//         "AmazonOrderId": "1",
//         "OrderStatus": "Unshipped"
//       },
//       {
//         "AmazonOrderId": "2",
//         "OrderStatus": "Unshipped"
//       },
//       {
//         "AmazonOrderId": "3",
//         "OrderStatus": "Unshipped"
//       },
//       {
//         "AmazonOrderId": "4",
//         "OrderStatus": "Unshipped"
//       }
//     ]
//   }
// }


release loJson1
release loJson2