-- 将msgChar从开始截取字符串,获得xml格式的字符串@H_403_2@
DECLARE submsg CHAR SUBSTRING(msgChar FROM POSITION('' IN msgChar));@H_403_2@
-- 将xml格式的字符串放入Environment中的xml对象格式@H_403_2@
CREATE LASTCHILD OF Environment.MessageInfo.xmlContent Domain('XMLNSC') PARSE (CAST(submsg AS CHARACTER CCSID InputRoot.Properties.CodedCharSetId) Encoding InputRoot.Properties.Encoding CCSID InputRoot.Properties.CodedCharSetId);@H_403_2@