create lastchild of Environment.refData DOMAIN 'XML' NAME 'msg';
while index < 5 do
set Environment.refData.msg.RefDataRequest.row[index].domainCode = domainCode;
set Environment.refData.msg.RefDataRequest.row[index].domainValue = domainValue;
set index= index+1;
end while;
-- cast to CHAR
set Environment.refData.XMLMsg = cast(asbitstream(Environment.refData.msg) as char CCSID InputRoot.MQMD.CodedCharSetId ENCODING InputRoot.MQMD.Encoding);
The resulting Environment.refData.XMLMsg is always empty.
You cannot post new topics in this forum You cannot reply to topics in this forum You cannot edit your posts in this forum You cannot delete your posts in this forum You cannot vote in polls in this forum