Adding array elements...

Hi All,

I am using Scott's HTTPAPI program to consume a web service. I consume the
web service with
rc = http_url_post_xml(
urlEndPoint
: %addr(SOAP) + 2
: %len(SOAP)
: *NULL
: %paddr(Incoming)
: *NULL
: HTTP_TIMEOUT
: HTTP_USERAGENT
: 'text/xml'
: SoapAction);

Procedure Incoming is called for each element of the returned XML document.

I have created an array
d gs1Attribute s 256a varying Dim(600)
which I wish to populate with the (XML) element Incoming is currently
processing.

My question is how is the best way to populate the next element in the array
when Incoming is called.

Before calling http_url_post_xml I Clear gs1Attribute so all elements are
blank,
Then on each call of Incoming I want to add the (XML) element(attribute) to
the next element in the array.

The way in which I thought to do this was

nextElement = %Lookup(*blanks : gs1Attribute);
gs1Attribute(nextElement) = xmlElement;

Can anyone suggest an alternative way of doing this or is this a good
method?

Thanks,

Robert Rogerson