--CALL CopyMessageHeaders();
SET OutputRoot.MQMD.Format = MQFMT_IMS;
SET OutputRoot.MQMD.CodedCharSetId = 500;
--CALL CopyEntireMessage();
SET OutputRoot.MQIIH.Format = MQFMT_IMS_VAR_STRING;
SET OutputRoot.MQIIH.StrucLength = MQIIH_LENGTH_1;
SET OutputRoot.MQIIH.Encoding = 785;
SET OutputRoot.MQIIH.CodedCharSetId = 500;
SET OutputRoot.MQIIH.Authenticator=' ';
SET OutputRoot.MQIIH.CommitMode = '0';
SET OutputRoot.MQIIH.TranInstanceId = X'00000000000000000000000000000000';
SET OutputRoot.MQIIH.TranState = ' ';
SET OutputRoot.MQIIH.SecurityScope = 'C';
SET OutputRoot.MQIIH.Reserved = ' ';
SET OutputRoot.MQIIH.ReplyToFormat = MQFMT_IMS_VAR_STRING;
SET OutputRoot.MQIIH.Version = MQIIH_VERSION_1;
SET OutputRoot.MQIIH.Flags = 0;
SET OutputRoot.MQIIH.LTermOverride= ' ';
SET OutputRoot.MQIIH.MFSMapName = ' ';
DECLARE charData CHARACTER 'DSPALLI '||'303230326869';
DECLARE charData1 CHARACTER 'DSPALLI '||'0202Hi';
DECLARE charData2 CHARACTER '2902DSPALLI Hi';
DECLARE charData3 CHARACTER '02DSPALLI Hi';
SET OutputRoot.BLOB.BLOB = SUBSTRING( CAST (29 AS BLOB CCSID 500) FROM 7 FOR 2) ||
SUBSTRING( CAST ( 29 AS BLOB CCSID 500 ) FROM 1 FOR 2) || CAST (charData3 AS BLOB CCSID 500
ENCODING 785);
TCPServerInput - > Compute - > TCPServerOutput
parameters - localhost:1111
Compute - same code as above.
----------------------------------
Getting the error
Quote:
Invalid segment length (LL) of [29] in input object.
Please help. I am not sure what to do.
Infocenter has the below and I am trying to confirm to that.
Quote:
The message flow that contains the IMSRequest node ensures that the message that is received by the IMSRequest node has this structure where:
LLZZ is a four-byte field. The first two bytes indicate the length of the bit stream, and the other two bytes are reserved for use by IMS.
For request segments, the transaction code must follow. The transaction code can contain up to eight characters; if it contains less than eight characters, the transaction code must be delimited by a space. The response segments do not need to have the transaction name, but an IMS program can add it.
The rest of the data comprises anything else that the IMS program needs.
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