Ao construir cabeçalhos MQRFH2 em um nó Compute, existem dois tipos de campos:
Para diferenciar entre estes dois tipos de campos, você deve inserir um valor na frente do campo referido no campo MQRFH2 para identificar seu tipo (um valor para o buffer NameValue não é requerido porque este é o padrão). O valor que você deve especificar para a estrutura do cabeçalho é (MQRFH2.Field).
Por exemplo:
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