Run the program in foreground
To modify and run the setup file so your program runs in the foreground, do the following steps:
- In panel EQA@PRIM, select 2. Press Enter.
- In panel EQAPFOR, select one of the following choices, depending
on which language you selected in step 2 in
topic Compiling or assembling your program by using IBM z/OS Debugger Utilities:
- For the COBOL program, use the following values for each field:
Project = prefix, Group=
SAMPLE
, Type=DTSF
, Member =WSU1
- For the PL/I program, use the following values for each field:
Project = prefix, Group =
SAMPLE
, Type=DTSF
, Member=WSU3
- For the C program, use the following values for each field: Project
= prefix, Group=
SAMPLE
, Type=DTSF
, Member=WSU4
- For the assembler program, use the following values for each field:
Project = prefix, Group=
SAMPLE
, Type=DTSF
, Member=WSU5
- For the COBOL program, use the following values for each field:
Project = prefix, Group=
- In panel EQAPFORS, do the following steps:
- Replace
&LOADDS.
with the name of the load data set from step 5 in topic Compiling or assembling your program by using IBM z/OS Debugger Utilities: - Replace
&EQAPRFX.
with the prefix your EQAW (z/OS® Debugger) library. - Replace
&CEEPRFX.
with the prefix your CEE (Language Environment®) library. - Enter "e" in Cmd field next to CMDS DD name. In the window
that is displayed, if there is a
QUIT ;
statement at the end of the data set, remove it. Press PF3 (Exit). - Type "run" in command line. Press Enter.
- Replace
- z/OS Debugger is started and the z/OS Debugger window is displayed. Enter any valid z/OS Debugger commands to verify that you can debug the program. Enter "qq" in the command line to stop z/OS Debugger and close the z/OS Debugger window.
- In panel EQAPFORS, check the return code message:
- For the COBOL program, the return code (RC) is 0.
- For the PL/I program, the return code (RC) is 1000.
- For the C program, the return code (RC) is 0.
- For the assembler program, the return code (RC) is 0.
- In panel EQAPFOR, press PF3 (Exit) to return to the panel EQA@PRIM.