You ar enot connecting to *MSG, so for bytes 17 onwards you need to consult the *ASYNCMD section in the CP programming services manual
2010/5/13 Frank M. Ramaekers <[email protected]> > Actually, I having trouble finding out all the fields that are returned. > For instance, I have a PIPE: > > /* */ > Trace "O" > !._UserID="AILTEST" > RC=CP_For("QUERY VIRTUAL XASD",!._UserID) > Say "RC="RC "EOC="_ForCmd._EOC "Result='"_ForCmd._Result"'" > Do i=1 to _For.0;Say _For.i;End > > Exit > /*====================================================================*/ > CP_For: Procedure expose !. _For. _ForCmd. > Parse arg ForCmd,ForUser > ForRC=0 > ForToken=Right(random(),16,"0") > "PIPE (endchar ?)", > " STARMSG *ASYNCMD", > "|CONSOLE", > "| SPECS 9-* 1", > "| FIND" ForUser||, > "| ZONE 9.16 FIND" ForToken||, > "| SPEC 25-* 1", > "|l:locate 1.1 /1/", > "| VAR _ForCmd._EOC", > "| PIPESTOP", > "?", > " LITERAL FOR" ForUser "PATH * TOKEN" ForToken "CMD" ForCmd, > "|c:CP", > "| STEM _ForCmd._Result", > "?c:", > "| VAR ForRC", > "| NLOCATE 1.1 /0/", > "| PIPESTOP", > "?l:", > "| SPEC 10-* 1.80", > "| STEM _FOR." > If ForRC==0 then > _ForCmd._Result="" > Return(ForRC) > ------------------------------------------------------------------------ > - > ....+....1....+....2....+....3....+....4....+....5....+....6....+....7.. > 00000000AILTEST 00000000000007670HCP0022EA virtual device number was not > supplied or it was invalid. > 00000000AILTEST 0000000000000767100220000 > > RC=0 EOC=100220000 Result='' > > A virtual device number was not supplied or it was invalid. > > > Okay, I see the first 8 bytes are the message class (as mentioned > before). > Next, (9-16) is the user id. (no problem) > Lastly, 17 (onward) is suppose to be the message text. > > Now this last part, does not seem to be completely composed of TEXT. > The first part of this section seems to be a sequential number (for 16 > bytes) > Next, appears to be a 0 or 1 (not sure what for) > Lastly, seems to be the error message number if the above was a zero > or a return code and reason code? If it's 1. > > > Frank M. Ramaekers Jr. > > > > -----Original Message----- > From: CMSTSO Pipelines Discussion List > [mailto:[email protected]] On Behalf Of Kris Buelens > Sent: Thursday, May 13, 2010 11:45 AM > To: [email protected] > Subject: Re: [CMS-PIPELINES] *STARMSG stage > > Look in the PROP documentation, or in the CP programming services > manual, > IUCV *MSG service. > For example class 3 is asynchroneous CP output, such as "RDR file from", > or > "xyz logged off" > There are other classes that allows you to know that the message was > sent > with MSG or SMSG (MSG is class 1, SMSG Class 4 I think, ) > > 2010/5/13 Frank M. Ramaekers <[email protected]> > > > Can someone enlighten me about the output from *STARMSG? From the > > documentation: > > > > > > > > Primary Output Stream > > > > > > > > STARMSG writes lines from a CP message service to its primary output > > stream as follows: > > > > > > > > Columns Contents > > > > 1-8 Message class (in > > hexadecimal format) > > > > 9-16 User ID > > > > 17 to end Text of the message The message class is converted to > > hexadecimal format and is prefixed to the user ID and message text > from > > CP. > > > > > > > > Where is the "Message class" defined? > > > > > > > > Frank M. Ramaekers Jr. > > > > > > > > Systems Programmer > > > > MCP, MCP+I, MCSE & RHCE > > > > American Income Life Insurance Co. > > > > Phone: (254)761-6649 > > > > 1200 Wooded Acres Dr. > > > > Fax: (254)741-5777 > > > > Waco, Texas 76701 > > > > > > > > > > > > > > _____________________________________________________ > > This message contains information which is privileged and confidential > and > > is solely for the use of the > > intended recipient. If you are not the intended recipient, be aware > that > > any review, disclosure, > > copying, distribution, or use of the contents of this message is > strictly > > prohibited. If you have > > received this in error, please destroy it immediately and notify us at > > [email protected]. > > > > > > -- > Kris Buelens, > IBM Belgium, VM customer support > > _____________________________________________________ > This message contains information which is privileged and confidential and > is solely for the use of the > intended recipient. If you are not the intended recipient, be aware that > any review, disclosure, > copying, distribution, or use of the contents of this message is strictly > prohibited. If you have > received this in error, please destroy it immediately and notify us at > [email protected]. > -- Kris Buelens, IBM Belgium, VM customer support
