在 Compute 节点中构造 MQRFH2 头时,有两种类型的字段:
为了区分这两个字段类型,请在 MQRFH2 字段中被引用字段的前面插入一个值,标识它的类型(NameValue 缓冲区不需要值,因为这是缺省值)。您为头结构指定的值为 (MQRFH2.Field)。
例如:
SET OutputRoot.MQRFH2.(MQRFH2.Field)Format = 'MQSTR ';
SET OutputRoot.MQRFH2.psc.Topic = 'department';
DECLARE I INTEGER 1; DECLARE J INTEGER CARDINALITY(InputRoot.*[]); WHILE I < J DO SET OutputRoot.*[I] = InputRoot.*[I]; SET I=I+1;END WHILE; SET OutputRoot.MQRFH2.(MQRFH2.Field)Version = 2; SET OutputRoot.MQRFH2.(MQRFH2.Field)Format = 'MQSTR'; SET OutputRoot.MQRFH2.(MQRFH2.Field)NameValueCCSID = 1208; SET OutputRoot.MQRFH2.psc.Command = 'RegSub'; SET OutputRoot.MQRFH2.psc.Topic = "InputRoot"."MRM"."topel"; SET OutputRoot.MQRFH2.psc.QMgrName = 'DebugQM'; SET OutputRoot.MQRFH2.psc.QName = 'PUBOUT'; SET OutputRoot.MQRFH2.psc.RegOpt = 'PersAsPub';
WHILE I < CARDINALITY(InputRoot.*[]) DO