Occasionally, users bring me an old report in need of modification. After a little research, I sometimes find that the hard-coded RPG program name on the report is incorrect. Does the situation sound familiar?

Using the program data structure, you can retrieve the RPG program name and place it in a 10 byte alphanumeric field (see 6). This field can then be placed in your output specs, alleviating the need to hard-code the program name.

Using the program data structure, you can retrieve the RPG program name and place it in a 10 byte alphanumeric field (see Figure 6). This field can then be placed in your output specs, alleviating the need to hard-code the program name.

Retrieving an RPG Program Name

Figure 6 RPG Program Name Retrieval

 *. 1 ...+... 2 ...+... 3 ...+... 4 ...+... 5 ...+... 6 ...+... 7 I SDS I *PROGRAM PRGNAM