Cuando crea cabeceras MQRFH2 en un nodo Compute, hay dos tipos de campos:
Para diferenciar entre estos dos tipos de campos, inserte un valor delante del campo al que se hace referencia en el campo MQRFH2 para identificar su tipo (no se necesita un valor para el almacenamiento intermedio NameValue ya que es el valor por omisión). El valor que especifique para la estructura de la cabecera es (MQRFH2.Field).
Por ejemplo:
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