Posted: Sun Jul 01, 2012 7:20 pm Post subject: MQ Series - populate user defined value for MDPAN
Newbie
Joined: 09 Jun 2012 Posts: 5
HI,
I have the requirement to populate user defined value in the MDPAN field (MQ Header Level) for each message posted to MQ through AS400 Application program (RPGLE). Can anyone tell me whether it's possible to achieve the above logic? If so, please guide me how to achieve this?
I modified RPGLE program code to populate value for MDPAN before calling MQ API MQGET, but still in the MQ Header i see the value as jobname/jobnumber/username.
Below is the piece code modified to test.
C Eval MDPAN = '100001'
*
C Eval MDFmt = FmStr
C MoveL MINone MDMId
C MoveL CINone MDCId
C Eval Buffer = Wrk_Sendmsg
C Eval BufLen = %Len(%Trim(Buffer))
*
C CallP MQPUT(Hconn : Hobj : MQMd : MQPmo :
C BufLen : BufPtr : Ocode : Reason)
*
Posted: Tue Jul 10, 2012 2:56 am Post subject: MQ Series - populate user defined value for MDPAN
Newbie
Joined: 09 Jun 2012 Posts: 5
Can you please tell me exactly which parameter needs to changed in the MQMD & MQPMO structure in order to pass user defined value to Put application Identity parameter of each message?
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