You can call any RPG program that receives parameters, with or without actually passing parameters to the program - by using the program status data structure and the *PARMS keyword within your I-specs. The program status data structure is set up like any other data structure except you specify an 'S' in column 18. The subfields of the data structure are defined by special keywords. In this case we use the keyword *PARMS (see 1). We assign field name INPARM to contain the value that is returned through the *PARM keyword. Whatever the field name assigned to the *PARM keyword, it will be a three-digit numeric field. It will contain the number of parameters that are passed to your RPG program from the calling program. If the value is zero (no parameters passed), you cannot access the name of the field that is in your *ENTRY-PLIST.

Because of the inability to indent in RPG, reading a section of code nested several layers deep can be a real pain. You can make things a little more legible by using positions 1 to 5 of the source statement as level number markers since SEU leaves these positions blank. 6 illustrates how I do this.