BatchRead Xojo Example
// This example requires the Chilkat API to have been previously unlocked.
// See Global Unlock Sample for sample code.
Dim rest As New Chilkat.Rest
Dim success As Boolean
Dim authAws As New Chilkat.AuthAws
authAws.AccessKey = "AWS_ACCESS_KEY"
authAws.SecretKey = "AWS_SECRET_KEY"
// Don't forget to change the region to your particular region. (Also make the same change in the call to Connect below.)
authAws.Region = "us-west-2"
authAws.ServiceName = "clouddirectory"
// SetAuthAws causes Chilkat to automatically add the following headers: Authorization, X-Amz-Date
success = rest.SetAuthAws(authAws)
// URL: https://clouddirectory.us-west-2.amazonaws.com/
// Use the same region as specified above.
success = rest.Connect("clouddirectory.us-west-2.amazonaws.com",443,True,True)
If (success <> True) Then
System.DebugLog("ConnectFailReason: " + Str(rest.ConnectFailReason))
System.DebugLog(rest.LastErrorText)
Return
End If
// The following code creates the JSON request body.
// The JSON created by this code is shown below.
// Use this online tool to generate code from sample JSON:
// Generate Code to Create JSON
Dim json As New Chilkat.JsonObject
success = json.UpdateString("Operations[0].GetLinkAttributes.AttributeNames[0]","string")
success = json.UpdateString("Operations[0].GetLinkAttributes.TypedLinkSpecifier.IdentityAttributeValues[0].AttributeName","string")
success = json.UpdateInt("Operations[0].GetLinkAttributes.TypedLinkSpecifier.IdentityAttributeValues[0].Value.BinaryValue",123)
success = json.UpdateInt("Operations[0].GetLinkAttributes.TypedLinkSpecifier.IdentityAttributeValues[0].Value.BooleanValue",123)
success = json.UpdateInt("Operations[0].GetLinkAttributes.TypedLinkSpecifier.IdentityAttributeValues[0].Value.DatetimeValue",123)
success = json.UpdateString("Operations[0].GetLinkAttributes.TypedLinkSpecifier.IdentityAttributeValues[0].Value.NumberValue","string")
success = json.UpdateString("Operations[0].GetLinkAttributes.TypedLinkSpecifier.IdentityAttributeValues[0].Value.StringValue","string")
success = json.UpdateString("Operations[0].GetLinkAttributes.TypedLinkSpecifier.SourceObjectReference.Selector","string")
success = json.UpdateString("Operations[0].GetLinkAttributes.TypedLinkSpecifier.TargetObjectReference.Selector","string")
success = json.UpdateString("Operations[0].GetLinkAttributes.TypedLinkSpecifier.TypedLinkFacet.SchemaArn","string")
success = json.UpdateString("Operations[0].GetLinkAttributes.TypedLinkSpecifier.TypedLinkFacet.TypedLinkName","string")
success = json.UpdateString("Operations[0].GetObjectAttributes.AttributeNames[0]","string")
success = json.UpdateString("Operations[0].GetObjectAttributes.ObjectReference.Selector","string")
success = json.UpdateString("Operations[0].GetObjectAttributes.SchemaFacet.FacetName","string")
success = json.UpdateString("Operations[0].GetObjectAttributes.SchemaFacet.SchemaArn","string")
success = json.UpdateString("Operations[0].GetObjectInformation.ObjectReference.Selector","string")
success = json.UpdateInt("Operations[0].ListAttachedIndices.MaxResults",123)
success = json.UpdateString("Operations[0].ListAttachedIndices.NextToken","string")
success = json.UpdateString("Operations[0].ListAttachedIndices.TargetReference.Selector","string")
success = json.UpdateString("Operations[0].ListIncomingTypedLinks.FilterAttributeRanges[0].AttributeName","string")
success = json.UpdateString("Operations[0].ListIncomingTypedLinks.FilterAttributeRanges[0].Range.EndMode","string")
success = json.UpdateInt("Operations[0].ListIncomingTypedLinks.FilterAttributeRanges[0].Range.EndValue.BinaryValue",123)
success = json.UpdateInt("Operations[0].ListIncomingTypedLinks.FilterAttributeRanges[0].Range.EndValue.BooleanValue",123)
success = json.UpdateInt("Operations[0].ListIncomingTypedLinks.FilterAttributeRanges[0].Range.EndValue.DatetimeValue",123)
success = json.UpdateString("Operations[0].ListIncomingTypedLinks.FilterAttributeRanges[0].Range.EndValue.NumberValue","string")
success = json.UpdateString("Operations[0].ListIncomingTypedLinks.FilterAttributeRanges[0].Range.EndValue.StringValue","string")
success = json.UpdateString("Operations[0].ListIncomingTypedLinks.FilterAttributeRanges[0].Range.StartMode","string")
success = json.UpdateInt("Operations[0].ListIncomingTypedLinks.FilterAttributeRanges[0].Range.StartValue.BinaryValue",123)
success = json.UpdateInt("Operations[0].ListIncomingTypedLinks.FilterAttributeRanges[0].Range.StartValue.BooleanValue",123)
success = json.UpdateInt("Operations[0].ListIncomingTypedLinks.FilterAttributeRanges[0].Range.StartValue.DatetimeValue",123)
success = json.UpdateString("Operations[0].ListIncomingTypedLinks.FilterAttributeRanges[0].Range.StartValue.NumberValue","string")
success = json.UpdateString("Operations[0].ListIncomingTypedLinks.FilterAttributeRanges[0].Range.StartValue.StringValue","string")
success = json.UpdateString("Operations[0].ListIncomingTypedLinks.FilterTypedLink.SchemaArn","string")
success = json.UpdateString("Operations[0].ListIncomingTypedLinks.FilterTypedLink.TypedLinkName","string")
success = json.UpdateInt("Operations[0].ListIncomingTypedLinks.MaxResults",123)
success = json.UpdateString("Operations[0].ListIncomingTypedLinks.NextToken","string")
success = json.UpdateString("Operations[0].ListIncomingTypedLinks.ObjectReference.Selector","string")
success = json.UpdateString("Operations[0].ListIndex.IndexReference.Selector","string")
success = json.UpdateInt("Operations[0].ListIndex.MaxResults",123)
success = json.UpdateString("Operations[0].ListIndex.NextToken","string")
success = json.UpdateString("Operations[0].ListIndex.RangesOnIndexedValues[0].AttributeKey.FacetName","string")
success = json.UpdateString("Operations[0].ListIndex.RangesOnIndexedValues[0].AttributeKey.Name","string")
success = json.UpdateString("Operations[0].ListIndex.RangesOnIndexedValues[0].AttributeKey.SchemaArn","string")
success = json.UpdateString("Operations[0].ListIndex.RangesOnIndexedValues[0].Range.EndMode","string")
success = json.UpdateInt("Operations[0].ListIndex.RangesOnIndexedValues[0].Range.EndValue.BinaryValue",123)
success = json.UpdateInt("Operations[0].ListIndex.RangesOnIndexedValues[0].Range.EndValue.BooleanValue",123)
success = json.UpdateInt("Operations[0].ListIndex.RangesOnIndexedValues[0].Range.EndValue.DatetimeValue",123)
success = json.UpdateString("Operations[0].ListIndex.RangesOnIndexedValues[0].Range.EndValue.NumberValue","string")
success = json.UpdateString("Operations[0].ListIndex.RangesOnIndexedValues[0].Range.EndValue.StringValue","string")
success = json.UpdateString("Operations[0].ListIndex.RangesOnIndexedValues[0].Range.StartMode","string")
success = json.UpdateInt("Operations[0].ListIndex.RangesOnIndexedValues[0].Range.StartValue.BinaryValue",123)
success = json.UpdateInt("Operations[0].ListIndex.RangesOnIndexedValues[0].Range.StartValue.BooleanValue",123)
success = json.UpdateInt("Operations[0].ListIndex.RangesOnIndexedValues[0].Range.StartValue.DatetimeValue",123)
success = json.UpdateString("Operations[0].ListIndex.RangesOnIndexedValues[0].Range.StartValue.NumberValue","string")
success = json.UpdateString("Operations[0].ListIndex.RangesOnIndexedValues[0].Range.StartValue.StringValue","string")
success = json.UpdateString("Operations[0].ListObjectAttributes.FacetFilter.FacetName","string")
success = json.UpdateString("Operations[0].ListObjectAttributes.FacetFilter.SchemaArn","string")
success = json.UpdateInt("Operations[0].ListObjectAttributes.MaxResults",123)
success = json.UpdateString("Operations[0].ListObjectAttributes.NextToken","string")
success = json.UpdateString("Operations[0].ListObjectAttributes.ObjectReference.Selector","string")
success = json.UpdateInt("Operations[0].ListObjectChildren.MaxResults",123)
success = json.UpdateString("Operations[0].ListObjectChildren.NextToken","string")
success = json.UpdateString("Operations[0].ListObjectChildren.ObjectReference.Selector","string")
success = json.UpdateInt("Operations[0].ListObjectParentPaths.MaxResults",123)
success = json.UpdateString("Operations[0].ListObjectParentPaths.NextToken","string")
success = json.UpdateString("Operations[0].ListObjectParentPaths.ObjectReference.Selector","string")
success = json.UpdateInt("Operations[0].ListObjectParents.MaxResults",123)
success = json.UpdateString("Operations[0].ListObjectParents.NextToken","string")
success = json.UpdateString("Operations[0].ListObjectParents.ObjectReference.Selector","string")
success = json.UpdateInt("Operations[0].ListObjectPolicies.MaxResults",123)
success = json.UpdateString("Operations[0].ListObjectPolicies.NextToken","string")
success = json.UpdateString("Operations[0].ListObjectPolicies.ObjectReference.Selector","string")
success = json.UpdateString("Operations[0].ListOutgoingTypedLinks.FilterAttributeRanges[0].AttributeName","string")
success = json.UpdateString("Operations[0].ListOutgoingTypedLinks.FilterAttributeRanges[0].Range.EndMode","string")
success = json.UpdateInt("Operations[0].ListOutgoingTypedLinks.FilterAttributeRanges[0].Range.EndValue.BinaryValue",123)
success = json.UpdateInt("Operations[0].ListOutgoingTypedLinks.FilterAttributeRanges[0].Range.EndValue.BooleanValue",123)
success = json.UpdateInt("Operations[0].ListOutgoingTypedLinks.FilterAttributeRanges[0].Range.EndValue.DatetimeValue",123)
success = json.UpdateString("Operations[0].ListOutgoingTypedLinks.FilterAttributeRanges[0].Range.EndValue.NumberValue","string")
success = json.UpdateString("Operations[0].ListOutgoingTypedLinks.FilterAttributeRanges[0].Range.EndValue.StringValue","string")
success = json.UpdateString("Operations[0].ListOutgoingTypedLinks.FilterAttributeRanges[0].Range.StartMode","string")
success = json.UpdateInt("Operations[0].ListOutgoingTypedLinks.FilterAttributeRanges[0].Range.StartValue.BinaryValue",123)
success = json.UpdateInt("Operations[0].ListOutgoingTypedLinks.FilterAttributeRanges[0].Range.StartValue.BooleanValue",123)
success = json.UpdateInt("Operations[0].ListOutgoingTypedLinks.FilterAttributeRanges[0].Range.StartValue.DatetimeValue",123)
success = json.UpdateString("Operations[0].ListOutgoingTypedLinks.FilterAttributeRanges[0].Range.StartValue.NumberValue","string")
success = json.UpdateString("Operations[0].ListOutgoingTypedLinks.FilterAttributeRanges[0].Range.StartValue.StringValue","string")
success = json.UpdateString("Operations[0].ListOutgoingTypedLinks.FilterTypedLink.SchemaArn","string")
success = json.UpdateString("Operations[0].ListOutgoingTypedLinks.FilterTypedLink.TypedLinkName","string")
success = json.UpdateInt("Operations[0].ListOutgoingTypedLinks.MaxResults",123)
success = json.UpdateString("Operations[0].ListOutgoingTypedLinks.NextToken","string")
success = json.UpdateString("Operations[0].ListOutgoingTypedLinks.ObjectReference.Selector","string")
success = json.UpdateInt("Operations[0].ListPolicyAttachments.MaxResults",123)
success = json.UpdateString("Operations[0].ListPolicyAttachments.NextToken","string")
success = json.UpdateString("Operations[0].ListPolicyAttachments.PolicyReference.Selector","string")
success = json.UpdateInt("Operations[0].LookupPolicy.MaxResults",123)
success = json.UpdateString("Operations[0].LookupPolicy.NextToken","string")
success = json.UpdateString("Operations[0].LookupPolicy.ObjectReference.Selector","string")
// The JSON request body created by the above code:
// {
// "Operations": [
// {
// "GetLinkAttributes": {
// "AttributeNames": [
// "string"
// ],
// "TypedLinkSpecifier": {
// "IdentityAttributeValues": [
// {
// "AttributeName": "string",
// "Value": {
// "BinaryValue": blob,
// "BooleanValue": boolean,
// "DatetimeValue": number,
// "NumberValue": "string",
// "StringValue": "string"
// }
// }
// ],
// "SourceObjectReference": {
// "Selector": "string"
// },
// "TargetObjectReference": {
// "Selector": "string"
// },
// "TypedLinkFacet": {
// "SchemaArn": "string",
// "TypedLinkName": "string"
// }
// }
// },
// "GetObjectAttributes": {
// "AttributeNames": [
// "string"
// ],
// "ObjectReference": {
// "Selector": "string"
// },
// "SchemaFacet": {
// "FacetName": "string",
// "SchemaArn": "string"
// }
// },
// "GetObjectInformation": {
// "ObjectReference": {
// "Selector": "string"
// }
// },
// "ListAttachedIndices": {
// "MaxResults": number,
// "NextToken": "string",
// "TargetReference": {
// "Selector": "string"
// }
// },
// "ListIncomingTypedLinks": {
// "FilterAttributeRanges": [
// {
// "AttributeName": "string",
// "Range": {
// "EndMode": "string",
// "EndValue": {
// "BinaryValue": blob,
// "BooleanValue": boolean,
// "DatetimeValue": number,
// "NumberValue": "string",
// "StringValue": "string"
// },
// "StartMode": "string",
// "StartValue": {
// "BinaryValue": blob,
// "BooleanValue": boolean,
// "DatetimeValue": number,
// "NumberValue": "string",
// "StringValue": "string"
// }
// }
// }
// ],
// "FilterTypedLink": {
// "SchemaArn": "string",
// "TypedLinkName": "string"
// },
// "MaxResults": number,
// "NextToken": "string",
// "ObjectReference": {
// "Selector": "string"
// }
// },
// "ListIndex": {
// "IndexReference": {
// "Selector": "string"
// },
// "MaxResults": number,
// "NextToken": "string",
// "RangesOnIndexedValues": [
// {
// "AttributeKey": {
// "FacetName": "string",
// "Name": "string",
// "SchemaArn": "string"
// },
// "Range": {
// "EndMode": "string",
// "EndValue": {
// "BinaryValue": blob,
// "BooleanValue": boolean,
// "DatetimeValue": number,
// "NumberValue": "string",
// "StringValue": "string"
// },
// "StartMode": "string",
// "StartValue": {
// "BinaryValue": blob,
// "BooleanValue": boolean,
// "DatetimeValue": number,
// "NumberValue": "string",
// "StringValue": "string"
// }
// }
// }
// ]
// },
// "ListObjectAttributes": {
// "FacetFilter": {
// "FacetName": "string",
// "SchemaArn": "string"
// },
// "MaxResults": number,
// "NextToken": "string",
// "ObjectReference": {
// "Selector": "string"
// }
// },
// "ListObjectChildren": {
// "MaxResults": number,
// "NextToken": "string",
// "ObjectReference": {
// "Selector": "string"
// }
// },
// "ListObjectParentPaths": {
// "MaxResults": number,
// "NextToken": "string",
// "ObjectReference": {
// "Selector": "string"
// }
// },
// "ListObjectParents": {
// "MaxResults": number,
// "NextToken": "string",
// "ObjectReference": {
// "Selector": "string"
// }
// },
// "ListObjectPolicies": {
// "MaxResults": number,
// "NextToken": "string",
// "ObjectReference": {
// "Selector": "string"
// }
// },
// "ListOutgoingTypedLinks": {
// "FilterAttributeRanges": [
// {
// "AttributeName": "string",
// "Range": {
// "EndMode": "string",
// "EndValue": {
// "BinaryValue": blob,
// "BooleanValue": boolean,
// "DatetimeValue": number,
// "NumberValue": "string",
// "StringValue": "string"
// },
// "StartMode": "string",
// "StartValue": {
// "BinaryValue": blob,
// "BooleanValue": boolean,
// "DatetimeValue": number,
// "NumberValue": "string",
// "StringValue": "string"
// }
// }
// }
// ],
// "FilterTypedLink": {
// "SchemaArn": "string",
// "TypedLinkName": "string"
// },
// "MaxResults": number,
// "NextToken": "string",
// "ObjectReference": {
// "Selector": "string"
// }
// },
// "ListPolicyAttachments": {
// "MaxResults": number,
// "NextToken": "string",
// "PolicyReference": {
// "Selector": "string"
// }
// },
// "LookupPolicy": {
// "MaxResults": number,
// "NextToken": "string",
// "ObjectReference": {
// "Selector": "string"
// }
// }
// }
// ]
// }
success = rest.AddHeader("Content-Type","application/x-amz-json-1.1")
success = rest.AddHeader("X-Amz-Target","BatchRead")
Dim sbRequestBody As New Chilkat.StringBuilder
success = json.EmitSb(sbRequestBody)
Dim sbResponseBody As New Chilkat.StringBuilder
success = rest.FullRequestSb("POST","/amazonclouddirectory/2017-01-11/batchread",sbRequestBody,sbResponseBody)
If (success <> True) Then
System.DebugLog(rest.LastErrorText)
Return
End If
Dim respStatusCode As Int32
respStatusCode = rest.ResponseStatusCode
System.DebugLog("response status code = " + Str(respStatusCode))
If (respStatusCode <> 200) Then
System.DebugLog("Response Header:")
System.DebugLog(rest.ResponseHeader)
System.DebugLog("Response Body:")
System.DebugLog(sbResponseBody.GetAsString())
Return
End If
Dim jResp As New Chilkat.JsonObject
success = jResp.LoadSb(sbResponseBody)
// The following code parses the JSON response.
// A sample JSON response is shown below the sample code.
// Use this online tool to generate parsing code from sample JSON:
// Generate Parsing Code from JSON
Dim Message As String
Dim v_Type As String
Dim ObjectIdentifier As String
Dim NextToken As String
Dim ListIncomingTypedLinksNextToken As String
Dim ListIndexNextToken As String
Dim ListObjectAttributesNextToken As String
Dim v_String As String
Dim ListObjectChildrenNextToken As String
Dim ListObjectParentPathsNextToken As String
Dim ListObjectParentsNextToken As String
Dim ListObjectPoliciesNextToken As String
Dim ListOutgoingTypedLinksNextToken As String
Dim ListPolicyAttachmentsNextToken As String
Dim LookupPolicyNextToken As String
Dim j As Int32
Dim count_j As Int32
Dim FacetName As String
Dim Name As String
Dim SchemaArn As String
Dim BinaryValue As Int32
Dim BooleanValue As Int32
Dim DatetimeValue As Int32
Dim NumberValue As String
Dim StringValue As String
Dim KeyFacetName As String
Dim KeyName As String
Dim KeySchemaArn As String
Dim ValueBinaryValue As Int32
Dim ValueBooleanValue As Int32
Dim ValueDatetimeValue As Int32
Dim ValueNumberValue As String
Dim ValueStringValue As String
Dim k As Int32
Dim count_k As Int32
Dim Selector As String
Dim TargetObjectReferenceSelector As String
Dim TypedLinkFacetSchemaArn As String
Dim TypedLinkName As String
Dim AttributeName As String
Dim Path As String
Dim strVal As String
Dim LinkName As String
Dim SourceObjectReferenceSelector As String
Dim TypedLinkFacetTypedLinkName As String
Dim PolicyId As String
Dim PolicyType As String
Dim i As Int32
i = 0
Dim count_i As Int32
count_i = jResp.SizeOfArray("Responses")
While i < count_i
jResp.I = i
Message = jResp.StringOf("Responses[i].ExceptionResponse.Message")
v_Type = jResp.StringOf("Responses[i].ExceptionResponse.Type")
ObjectIdentifier = jResp.StringOf("Responses[i].SuccessfulResponse.GetObjectInformation.ObjectIdentifier")
NextToken = jResp.StringOf("Responses[i].SuccessfulResponse.ListAttachedIndices.NextToken")
ListIncomingTypedLinksNextToken = jResp.StringOf("Responses[i].SuccessfulResponse.ListIncomingTypedLinks.NextToken")
ListIndexNextToken = jResp.StringOf("Responses[i].SuccessfulResponse.ListIndex.NextToken")
ListObjectAttributesNextToken = jResp.StringOf("Responses[i].SuccessfulResponse.ListObjectAttributes.NextToken")
v_String = jResp.StringOf("Responses[i].SuccessfulResponse.ListObjectChildren.Children.string")
ListObjectChildrenNextToken = jResp.StringOf("Responses[i].SuccessfulResponse.ListObjectChildren.NextToken")
ListObjectParentPathsNextToken = jResp.StringOf("Responses[i].SuccessfulResponse.ListObjectParentPaths.NextToken")
ListObjectParentsNextToken = jResp.StringOf("Responses[i].SuccessfulResponse.ListObjectParents.NextToken")
ListObjectPoliciesNextToken = jResp.StringOf("Responses[i].SuccessfulResponse.ListObjectPolicies.NextToken")
ListOutgoingTypedLinksNextToken = jResp.StringOf("Responses[i].SuccessfulResponse.ListOutgoingTypedLinks.NextToken")
ListPolicyAttachmentsNextToken = jResp.StringOf("Responses[i].SuccessfulResponse.ListPolicyAttachments.NextToken")
LookupPolicyNextToken = jResp.StringOf("Responses[i].SuccessfulResponse.LookupPolicy.NextToken")
j = 0
count_j = jResp.SizeOfArray("Responses[i].SuccessfulResponse.GetLinkAttributes.Attributes")
While j < count_j
jResp.J = j
FacetName = jResp.StringOf("Responses[i].SuccessfulResponse.GetLinkAttributes.Attributes[j].Key.FacetName")
Name = jResp.StringOf("Responses[i].SuccessfulResponse.GetLinkAttributes.Attributes[j].Key.Name")
SchemaArn = jResp.StringOf("Responses[i].SuccessfulResponse.GetLinkAttributes.Attributes[j].Key.SchemaArn")
BinaryValue = jResp.IntOf("Responses[i].SuccessfulResponse.GetLinkAttributes.Attributes[j].Value.BinaryValue")
BooleanValue = jResp.IntOf("Responses[i].SuccessfulResponse.GetLinkAttributes.Attributes[j].Value.BooleanValue")
DatetimeValue = jResp.IntOf("Responses[i].SuccessfulResponse.GetLinkAttributes.Attributes[j].Value.DatetimeValue")
NumberValue = jResp.StringOf("Responses[i].SuccessfulResponse.GetLinkAttributes.Attributes[j].Value.NumberValue")
StringValue = jResp.StringOf("Responses[i].SuccessfulResponse.GetLinkAttributes.Attributes[j].Value.StringValue")
j = j + 1
Wend
j = 0
count_j = jResp.SizeOfArray("Responses[i].SuccessfulResponse.GetObjectAttributes.Attributes")
While j < count_j
jResp.J = j
KeyFacetName = jResp.StringOf("Responses[i].SuccessfulResponse.GetObjectAttributes.Attributes[j].Key.FacetName")
KeyName = jResp.StringOf("Responses[i].SuccessfulResponse.GetObjectAttributes.Attributes[j].Key.Name")
KeySchemaArn = jResp.StringOf("Responses[i].SuccessfulResponse.GetObjectAttributes.Attributes[j].Key.SchemaArn")
ValueBinaryValue = jResp.IntOf("Responses[i].SuccessfulResponse.GetObjectAttributes.Attributes[j].Value.BinaryValue")
ValueBooleanValue = jResp.IntOf("Responses[i].SuccessfulResponse.GetObjectAttributes.Attributes[j].Value.BooleanValue")
ValueDatetimeValue = jResp.IntOf("Responses[i].SuccessfulResponse.GetObjectAttributes.Attributes[j].Value.DatetimeValue")
ValueNumberValue = jResp.StringOf("Responses[i].SuccessfulResponse.GetObjectAttributes.Attributes[j].Value.NumberValue")
ValueStringValue = jResp.StringOf("Responses[i].SuccessfulResponse.GetObjectAttributes.Attributes[j].Value.StringValue")
j = j + 1
Wend
j = 0
count_j = jResp.SizeOfArray("Responses[i].SuccessfulResponse.GetObjectInformation.SchemaFacets")
While j < count_j
jResp.J = j
FacetName = jResp.StringOf("Responses[i].SuccessfulResponse.GetObjectInformation.SchemaFacets[j].FacetName")
SchemaArn = jResp.StringOf("Responses[i].SuccessfulResponse.GetObjectInformation.SchemaFacets[j].SchemaArn")
j = j + 1
Wend
j = 0
count_j = jResp.SizeOfArray("Responses[i].SuccessfulResponse.ListAttachedIndices.IndexAttachments")
While j < count_j
jResp.J = j
ObjectIdentifier = jResp.StringOf("Responses[i].SuccessfulResponse.ListAttachedIndices.IndexAttachments[j].ObjectIdentifier")
k = 0
count_k = jResp.SizeOfArray("Responses[i].SuccessfulResponse.ListAttachedIndices.IndexAttachments[j].IndexedAttributes")
While k < count_k
jResp.K = k
KeyFacetName = jResp.StringOf("Responses[i].SuccessfulResponse.ListAttachedIndices.IndexAttachments[j].IndexedAttributes[k].Key.FacetName")
KeyName = jResp.StringOf("Responses[i].SuccessfulResponse.ListAttachedIndices.IndexAttachments[j].IndexedAttributes[k].Key.Name")
KeySchemaArn = jResp.StringOf("Responses[i].SuccessfulResponse.ListAttachedIndices.IndexAttachments[j].IndexedAttributes[k].Key.SchemaArn")
ValueBinaryValue = jResp.IntOf("Responses[i].SuccessfulResponse.ListAttachedIndices.IndexAttachments[j].IndexedAttributes[k].Value.BinaryValue")
ValueBooleanValue = jResp.IntOf("Responses[i].SuccessfulResponse.ListAttachedIndices.IndexAttachments[j].IndexedAttributes[k].Value.BooleanValue")
ValueDatetimeValue = jResp.IntOf("Responses[i].SuccessfulResponse.ListAttachedIndices.IndexAttachments[j].IndexedAttributes[k].Value.DatetimeValue")
ValueNumberValue = jResp.StringOf("Responses[i].SuccessfulResponse.ListAttachedIndices.IndexAttachments[j].IndexedAttributes[k].Value.NumberValue")
ValueStringValue = jResp.StringOf("Responses[i].SuccessfulResponse.ListAttachedIndices.IndexAttachments[j].IndexedAttributes[k].Value.StringValue")
k = k + 1
Wend
j = j + 1
Wend
j = 0
count_j = jResp.SizeOfArray("Responses[i].SuccessfulResponse.ListIncomingTypedLinks.LinkSpecifiers")
While j < count_j
jResp.J = j
Selector = jResp.StringOf("Responses[i].SuccessfulResponse.ListIncomingTypedLinks.LinkSpecifiers[j].SourceObjectReference.Selector")
TargetObjectReferenceSelector = jResp.StringOf("Responses[i].SuccessfulResponse.ListIncomingTypedLinks.LinkSpecifiers[j].TargetObjectReference.Selector")
TypedLinkFacetSchemaArn = jResp.StringOf("Responses[i].SuccessfulResponse.ListIncomingTypedLinks.LinkSpecifiers[j].TypedLinkFacet.SchemaArn")
TypedLinkName = jResp.StringOf("Responses[i].SuccessfulResponse.ListIncomingTypedLinks.LinkSpecifiers[j].TypedLinkFacet.TypedLinkName")
k = 0
count_k = jResp.SizeOfArray("Responses[i].SuccessfulResponse.ListIncomingTypedLinks.LinkSpecifiers[j].IdentityAttributeValues")
While k < count_k
jResp.K = k
AttributeName = jResp.StringOf("Responses[i].SuccessfulResponse.ListIncomingTypedLinks.LinkSpecifiers[j].IdentityAttributeValues[k].AttributeName")
ValueBinaryValue = jResp.IntOf("Responses[i].SuccessfulResponse.ListIncomingTypedLinks.LinkSpecifiers[j].IdentityAttributeValues[k].Value.BinaryValue")
ValueBooleanValue = jResp.IntOf("Responses[i].SuccessfulResponse.ListIncomingTypedLinks.LinkSpecifiers[j].IdentityAttributeValues[k].Value.BooleanValue")
ValueDatetimeValue = jResp.IntOf("Responses[i].SuccessfulResponse.ListIncomingTypedLinks.LinkSpecifiers[j].IdentityAttributeValues[k].Value.DatetimeValue")
ValueNumberValue = jResp.StringOf("Responses[i].SuccessfulResponse.ListIncomingTypedLinks.LinkSpecifiers[j].IdentityAttributeValues[k].Value.NumberValue")
ValueStringValue = jResp.StringOf("Responses[i].SuccessfulResponse.ListIncomingTypedLinks.LinkSpecifiers[j].IdentityAttributeValues[k].Value.StringValue")
k = k + 1
Wend
j = j + 1
Wend
j = 0
count_j = jResp.SizeOfArray("Responses[i].SuccessfulResponse.ListIndex.IndexAttachments")
While j < count_j
jResp.J = j
ObjectIdentifier = jResp.StringOf("Responses[i].SuccessfulResponse.ListIndex.IndexAttachments[j].ObjectIdentifier")
k = 0
count_k = jResp.SizeOfArray("Responses[i].SuccessfulResponse.ListIndex.IndexAttachments[j].IndexedAttributes")
While k < count_k
jResp.K = k
KeyFacetName = jResp.StringOf("Responses[i].SuccessfulResponse.ListIndex.IndexAttachments[j].IndexedAttributes[k].Key.FacetName")
KeyName = jResp.StringOf("Responses[i].SuccessfulResponse.ListIndex.IndexAttachments[j].IndexedAttributes[k].Key.Name")
KeySchemaArn = jResp.StringOf("Responses[i].SuccessfulResponse.ListIndex.IndexAttachments[j].IndexedAttributes[k].Key.SchemaArn")
ValueBinaryValue = jResp.IntOf("Responses[i].SuccessfulResponse.ListIndex.IndexAttachments[j].IndexedAttributes[k].Value.BinaryValue")
ValueBooleanValue = jResp.IntOf("Responses[i].SuccessfulResponse.ListIndex.IndexAttachments[j].IndexedAttributes[k].Value.BooleanValue")
ValueDatetimeValue = jResp.IntOf("Responses[i].SuccessfulResponse.ListIndex.IndexAttachments[j].IndexedAttributes[k].Value.DatetimeValue")
ValueNumberValue = jResp.StringOf("Responses[i].SuccessfulResponse.ListIndex.IndexAttachments[j].IndexedAttributes[k].Value.NumberValue")
ValueStringValue = jResp.StringOf("Responses[i].SuccessfulResponse.ListIndex.IndexAttachments[j].IndexedAttributes[k].Value.StringValue")
k = k + 1
Wend
j = j + 1
Wend
j = 0
count_j = jResp.SizeOfArray("Responses[i].SuccessfulResponse.ListObjectAttributes.Attributes")
While j < count_j
jResp.J = j
KeyFacetName = jResp.StringOf("Responses[i].SuccessfulResponse.ListObjectAttributes.Attributes[j].Key.FacetName")
KeyName = jResp.StringOf("Responses[i].SuccessfulResponse.ListObjectAttributes.Attributes[j].Key.Name")
KeySchemaArn = jResp.StringOf("Responses[i].SuccessfulResponse.ListObjectAttributes.Attributes[j].Key.SchemaArn")
ValueBinaryValue = jResp.IntOf("Responses[i].SuccessfulResponse.ListObjectAttributes.Attributes[j].Value.BinaryValue")
ValueBooleanValue = jResp.IntOf("Responses[i].SuccessfulResponse.ListObjectAttributes.Attributes[j].Value.BooleanValue")
ValueDatetimeValue = jResp.IntOf("Responses[i].SuccessfulResponse.ListObjectAttributes.Attributes[j].Value.DatetimeValue")
ValueNumberValue = jResp.StringOf("Responses[i].SuccessfulResponse.ListObjectAttributes.Attributes[j].Value.NumberValue")
ValueStringValue = jResp.StringOf("Responses[i].SuccessfulResponse.ListObjectAttributes.Attributes[j].Value.StringValue")
j = j + 1
Wend
j = 0
count_j = jResp.SizeOfArray("Responses[i].SuccessfulResponse.ListObjectParentPaths.PathToObjectIdentifiersList")
While j < count_j
jResp.J = j
Path = jResp.StringOf("Responses[i].SuccessfulResponse.ListObjectParentPaths.PathToObjectIdentifiersList[j].Path")
k = 0
count_k = jResp.SizeOfArray("Responses[i].SuccessfulResponse.ListObjectParentPaths.PathToObjectIdentifiersList[j].ObjectIdentifiers")
While k < count_k
jResp.K = k
strVal = jResp.StringOf("Responses[i].SuccessfulResponse.ListObjectParentPaths.PathToObjectIdentifiersList[j].ObjectIdentifiers[k]")
k = k + 1
Wend
j = j + 1
Wend
j = 0
count_j = jResp.SizeOfArray("Responses[i].SuccessfulResponse.ListObjectParents.ParentLinks")
While j < count_j
jResp.J = j
LinkName = jResp.StringOf("Responses[i].SuccessfulResponse.ListObjectParents.ParentLinks[j].LinkName")
ObjectIdentifier = jResp.StringOf("Responses[i].SuccessfulResponse.ListObjectParents.ParentLinks[j].ObjectIdentifier")
j = j + 1
Wend
j = 0
count_j = jResp.SizeOfArray("Responses[i].SuccessfulResponse.ListObjectPolicies.AttachedPolicyIds")
While j < count_j
jResp.J = j
strVal = jResp.StringOf("Responses[i].SuccessfulResponse.ListObjectPolicies.AttachedPolicyIds[j]")
j = j + 1
Wend
j = 0
count_j = jResp.SizeOfArray("Responses[i].SuccessfulResponse.ListOutgoingTypedLinks.TypedLinkSpecifiers")
While j < count_j
jResp.J = j
SourceObjectReferenceSelector = jResp.StringOf("Responses[i].SuccessfulResponse.ListOutgoingTypedLinks.TypedLinkSpecifiers[j].SourceObjectReference.Selector")
TargetObjectReferenceSelector = jResp.StringOf("Responses[i].SuccessfulResponse.ListOutgoingTypedLinks.TypedLinkSpecifiers[j].TargetObjectReference.Selector")
TypedLinkFacetSchemaArn = jResp.StringOf("Responses[i].SuccessfulResponse.ListOutgoingTypedLinks.TypedLinkSpecifiers[j].TypedLinkFacet.SchemaArn")
TypedLinkFacetTypedLinkName = jResp.StringOf("Responses[i].SuccessfulResponse.ListOutgoingTypedLinks.TypedLinkSpecifiers[j].TypedLinkFacet.TypedLinkName")
k = 0
count_k = jResp.SizeOfArray("Responses[i].SuccessfulResponse.ListOutgoingTypedLinks.TypedLinkSpecifiers[j].IdentityAttributeValues")
While k < count_k
jResp.K = k
AttributeName = jResp.StringOf("Responses[i].SuccessfulResponse.ListOutgoingTypedLinks.TypedLinkSpecifiers[j].IdentityAttributeValues[k].AttributeName")
ValueBinaryValue = jResp.IntOf("Responses[i].SuccessfulResponse.ListOutgoingTypedLinks.TypedLinkSpecifiers[j].IdentityAttributeValues[k].Value.BinaryValue")
ValueBooleanValue = jResp.IntOf("Responses[i].SuccessfulResponse.ListOutgoingTypedLinks.TypedLinkSpecifiers[j].IdentityAttributeValues[k].Value.BooleanValue")
ValueDatetimeValue = jResp.IntOf("Responses[i].SuccessfulResponse.ListOutgoingTypedLinks.TypedLinkSpecifiers[j].IdentityAttributeValues[k].Value.DatetimeValue")
ValueNumberValue = jResp.StringOf("Responses[i].SuccessfulResponse.ListOutgoingTypedLinks.TypedLinkSpecifiers[j].IdentityAttributeValues[k].Value.NumberValue")
ValueStringValue = jResp.StringOf("Responses[i].SuccessfulResponse.ListOutgoingTypedLinks.TypedLinkSpecifiers[j].IdentityAttributeValues[k].Value.StringValue")
k = k + 1
Wend
j = j + 1
Wend
j = 0
count_j = jResp.SizeOfArray("Responses[i].SuccessfulResponse.ListPolicyAttachments.ObjectIdentifiers")
While j < count_j
jResp.J = j
strVal = jResp.StringOf("Responses[i].SuccessfulResponse.ListPolicyAttachments.ObjectIdentifiers[j]")
j = j + 1
Wend
j = 0
count_j = jResp.SizeOfArray("Responses[i].SuccessfulResponse.LookupPolicy.PolicyToPathList")
While j < count_j
jResp.J = j
Path = jResp.StringOf("Responses[i].SuccessfulResponse.LookupPolicy.PolicyToPathList[j].Path")
k = 0
count_k = jResp.SizeOfArray("Responses[i].SuccessfulResponse.LookupPolicy.PolicyToPathList[j].Policies")
While k < count_k
jResp.K = k
ObjectIdentifier = jResp.StringOf("Responses[i].SuccessfulResponse.LookupPolicy.PolicyToPathList[j].Policies[k].ObjectIdentifier")
PolicyId = jResp.StringOf("Responses[i].SuccessfulResponse.LookupPolicy.PolicyToPathList[j].Policies[k].PolicyId")
PolicyType = jResp.StringOf("Responses[i].SuccessfulResponse.LookupPolicy.PolicyToPathList[j].Policies[k].PolicyType")
k = k + 1
Wend
j = j + 1
Wend
i = i + 1
Wend
// A sample JSON response body parsed by the above code:
// {
// "Responses": [
// {
// "ExceptionResponse": {
// "Message": "string",
// "Type": "string"
// },
// "SuccessfulResponse": {
// "GetLinkAttributes": {
// "Attributes": [
// {
// "Key": {
// "FacetName": "string",
// "Name": "string",
// "SchemaArn": "string"
// },
// "Value": {
// "BinaryValue": blob,
// "BooleanValue": boolean,
// "DatetimeValue": number,
// "NumberValue": "string",
// "StringValue": "string"
// }
// }
// ]
// },
// "GetObjectAttributes": {
// "Attributes": [
// {
// "Key": {
// "FacetName": "string",
// "Name": "string",
// "SchemaArn": "string"
// },
// "Value": {
// "BinaryValue": blob,
// "BooleanValue": boolean,
// "DatetimeValue": number,
// "NumberValue": "string",
// "StringValue": "string"
// }
// }
// ]
// },
// "GetObjectInformation": {
// "ObjectIdentifier": "string",
// "SchemaFacets": [
// {
// "FacetName": "string",
// "SchemaArn": "string"
// }
// ]
// },
// "ListAttachedIndices": {
// "IndexAttachments": [
// {
// "IndexedAttributes": [
// {
// "Key": {
// "FacetName": "string",
// "Name": "string",
// "SchemaArn": "string"
// },
// "Value": {
// "BinaryValue": blob,
// "BooleanValue": boolean,
// "DatetimeValue": number,
// "NumberValue": "string",
// "StringValue": "string"
// }
// }
// ],
// "ObjectIdentifier": "string"
// }
// ],
// "NextToken": "string"
// },
// "ListIncomingTypedLinks": {
// "LinkSpecifiers": [
// {
// "IdentityAttributeValues": [
// {
// "AttributeName": "string",
// "Value": {
// "BinaryValue": blob,
// "BooleanValue": boolean,
// "DatetimeValue": number,
// "NumberValue": "string",
// "StringValue": "string"
// }
// }
// ],
// "SourceObjectReference": {
// "Selector": "string"
// },
// "TargetObjectReference": {
// "Selector": "string"
// },
// "TypedLinkFacet": {
// "SchemaArn": "string",
// "TypedLinkName": "string"
// }
// }
// ],
// "NextToken": "string"
// },
// "ListIndex": {
// "IndexAttachments": [
// {
// "IndexedAttributes": [
// {
// "Key": {
// "FacetName": "string",
// "Name": "string",
// "SchemaArn": "string"
// },
// "Value": {
// "BinaryValue": blob,
// "BooleanValue": boolean,
// "DatetimeValue": number,
// "NumberValue": "string",
// "StringValue": "string"
// }
// }
// ],
// "ObjectIdentifier": "string"
// }
// ],
// "NextToken": "string"
// },
// "ListObjectAttributes": {
// "Attributes": [
// {
// "Key": {
// "FacetName": "string",
// "Name": "string",
// "SchemaArn": "string"
// },
// "Value": {
// "BinaryValue": blob,
// "BooleanValue": boolean,
// "DatetimeValue": number,
// "NumberValue": "string",
// "StringValue": "string"
// }
// }
// ],
// "NextToken": "string"
// },
// "ListObjectChildren": {
// "Children": {
// "string": "string"
// },
// "NextToken": "string"
// },
// "ListObjectParentPaths": {
// "NextToken": "string",
// "PathToObjectIdentifiersList": [
// {
// "ObjectIdentifiers": [
// "string"
// ],
// "Path": "string"
// }
// ]
// },
// "ListObjectParents": {
// "NextToken": "string",
// "ParentLinks": [
// {
// "LinkName": "string",
// "ObjectIdentifier": "string"
// }
// ]
// },
// "ListObjectPolicies": {
// "AttachedPolicyIds": [
// "string"
// ],
// "NextToken": "string"
// },
// "ListOutgoingTypedLinks": {
// "NextToken": "string",
// "TypedLinkSpecifiers": [
// {
// "IdentityAttributeValues": [
// {
// "AttributeName": "string",
// "Value": {
// "BinaryValue": blob,
// "BooleanValue": boolean,
// "DatetimeValue": number,
// "NumberValue": "string",
// "StringValue": "string"
// }
// }
// ],
// "SourceObjectReference": {
// "Selector": "string"
// },
// "TargetObjectReference": {
// "Selector": "string"
// },
// "TypedLinkFacet": {
// "SchemaArn": "string",
// "TypedLinkName": "string"
// }
// }
// ]
// },
// "ListPolicyAttachments": {
// "NextToken": "string",
// "ObjectIdentifiers": [
// "string"
// ]
// },
// "LookupPolicy": {
// "NextToken": "string",
// "PolicyToPathList": [
// {
// "Path": "string",
// "Policies": [
// {
// "ObjectIdentifier": "string",
// "PolicyId": "string",
// "PolicyType": "string"
// }
// ]
// }
// ]
// }
// }
// }
// ]
// }
