John Mycroft wrote:
> If I call a program from Natural under CICS as in
> CALL 'MYPROG' #PARAM1 #PARAM2
> what should I expect to see in the COMMAREA when MYPROG gets control,
> please?
>
> Cheers - John Mycroft
It's been a long time, but I think the COMM area will have two fullword
addresses.
The first address points to a standard CALL parmlist with the hi-order
bit set in
the last entry. In your case this would have two entries.
The second address points to a table of 4 byte entries, one for each
parm.
The first byte (maybe 2 bytes) are the data type, and the last two bytes
are
the length.
Example
COMM AREA
DC A(PARMLIST)
DC A(TYPELIST)
PARMLIST DC A(#PARAM1)
DC A(#PARAM2)
TYPELIST DC CL2'A',FL2'4'
DC CL2'A',Fl2'16'
The "A" is for character data.
Richard Peurifoy
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html
