Create successful ePaper yourself
Turn your PDF publications into a flip-book with our unique Google optimized e-Paper software.
Because the display overrides function uses a copy of the internal control blocks,<br />
overrides that were deleted between the time the display overrides function was<br />
called and the time the output was produced may not be reflected in the output.<br />
This can occur only when the overrides in another job are being displayed.<br />
Displaying overrides: comprehensive scenario<br />
The following example is intended only to illustrate what the various forms of the<br />
display override command can do. The DSPOVR command is typically entered<br />
interactively or added temporarily to a CL program, or to any high-level language<br />
program via QCMDEXC, to verify that the proper overrides are in effect at the<br />
time a program is called or a file is opened. Assume that commands 1, 2, 3, and 18<br />
are entered at call level 1:<br />
Program A (in the user default activation group)<br />
Command 1 OVRPRTF FILE(PRTA) COPIES(3)<br />
Command 2 OVRDBF FILE(DBC) WAITFILE(*IMMED)<br />
Command 3 CALL PGM(B)<br />
Program B (in activation group 5)<br />
Command 4 OVRPRTF FILE(PRTB) TOFILE(PRTA) COPIES(6) +<br />
OVRSCOPE(*CALLLVL)<br />
Command 5 OVRDBF FILE(DBC) WAITFILE(60) OVRSCOPE(*CALLLVL)<br />
Command 6 OVRDBF FILE(DBE) TOFILE(DBF) OVRSCOPE(*JOB)<br />
Command 7 DSPOVR FILE(PRTB) MRGOVR(*YES)<br />
Command 8 CALL PGM(C)<br />
Program C (in activation group 5)<br />
Command 9 CALL PGM(QCMDEXC) PARM('OVRDSPF FILE(DSPE) +<br />
TOFILE(DSPF) OVRSCOPE(*CALLLVL)' 50)<br />
Command 10 OVRDBF FILE(DBC) TOFILE(DBD) OVRSCOPE(*CALLLVL)<br />
Command 11 DSPOVR FILE(DBC) MRGOVR(*NO) LVL(3)<br />
Command 12 DSPOVR FILE(DBD) MRGOVR(*NO) LVL(2)<br />
Command 13 MONMSG MSGID(CPF9842)<br />
Command 14 OVRDSPF FILE(CREDITS) TOFILE(DEBITS)<br />
Command 15 CALL PGM(QCMDEXC) PARM('DSPOVR FILE(*ALL) MRGOVR(*YES) +<br />
LVL(*) OUTPUT(*)' 47)<br />
Command 16 RETURN<br />
Command 17 DSPOVR FILE(*ALL) MRGOVR(*NO)<br />
Command 18 RETURN<br />
Command 19 DSPOVR FILE(*ALL) MRGOVR(*NO) LVL(2) OUTPUT(*)<br />
Command 1 overrides the value of the COPIES attribute of file PRTA at level 1 to<br />
3.<br />
Command 2 overrides the value of the WAITFILE attribute of file DBC at level 1 to<br />
*IMMED.<br />
Command 3 calls program A and creates a new call level, 2.<br />
Command 4 causes an override at level 2 from file PRTB to file PRTA. Also, the<br />
command overrides the value of the COPIES attribute to 6.<br />
Command 5 overrides the the value of the WAITFILE attribute for file DBC at level<br />
2to60.<br />
Command 6 causes an override of file DBE to file DBF and scopes the override to<br />
the job level.<br />
Chapter 3. Using overrides 59
Change language