Classic ASP
Merge SP-API JSON Order Arrays

Demonstrates how to merge JSON arrays for the case of Amazon SP-API orders.
Chilkat Classic ASP Downloads

Classic ASP
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
</head>
<body>
<%
success = 0

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

' Batch 2 File
a2 = "{""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"}]}

success = 1
set json1 = Server.CreateObject("Chilkat.JsonObject")
success = json1.Load(a1)

set json2 = Server.CreateObject("Chilkat.JsonObject")
success = json2.Load(a2)

' We're going to add the order records from json2 to json1.
' jarr1 is a Chilkat.JsonArray
Set jarr1 = json1.ArrayOf("payload.Orders")
' jarr2 is a Chilkat.JsonArray
Set jarr2 = json2.ArrayOf("payload.Orders")

i = 0
numOrders = jarr2.Size
Do While (i < numOrders)
    ' jOrder is a Chilkat.JsonObject
    Set jOrder = jarr2.ObjectAt(i)
    ' Assuming non-null return...
    success = jarr1.AddObjectCopyAt(-1,jOrder)
    i = i + 1
Loop

' Show the merged JSON.
json1.EmitCompact = 0
Response.Write "<pre>" & Server.HTMLEncode( json1.Emit()) & "</pre>"

' Result:

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

%>
</body>
</html>