Joined: 07 Nov 2005 Posts: 1104 Location: The Netherlands at Hole 19
The parameters belong to IMS (DFSRRC00). Via the MBR (in your case) you tell DFSRRC00 which program is to be executed. The only parameters you define in your linkage section are the PCB's. This needs to be done to be able to interact with IMS. IMS needs the PCB's in your DLI-call in order to know which database is to be accessed and returning the results to your program. For detailes about the parameters follow the first link in the sticky where to find info about IMS (is also the first link in my signature).
Joined: 28 Nov 2006 Posts: 305 Location: Deerfield IL
I do not doubt that a description of the parms is there somewhere, but having spent another 2 hours looking around the links in that link I still have not found them.
The DFSRRC00 parms I am looking at are parm 20 '&APARM', parm 27 '&PARM1' & 'parm 28 &PARM2' (parm numbers as I saw them on another WEB site. Will any of these parms allow me to pass my parms from the JCL to my COBOL program? A description of these 3 parms or more specific directions of where to find a description of the DFSRRC00 parms would also be helpful.
Joined: 07 Nov 2005 Posts: 1104 Location: The Netherlands at Hole 19
Quote:
APARM=
Specifies the 1 to 32-character parameter that is passed to the application program as part of the information returned in the INQY call with the ENVIRON subfunction. The parameter must be enclosed in single-quotes (') if special characters are used. Embedded commas (,) are not allowed.
For the rest look at it this way:
You execute a program with a number of parameters: let's say a, b and c. This would be input to the mainprogram. Then within your mainprogram you call another program which needs parameter d. Since your mainprogram has it's own parameter logic you can't pass additoinal parameters for your subsequently called program. It's the same with IMS. You pass parameters to DFSRRC00 (IMS) in order to tell how to behave. DFSRC00 has no ability to pass additional information to programs called by it.
You may like it or not but if you have to work on IMS you've got to live with it.