The following example is intended only to illustrate what the various forms of the display override command can do. The DSPOVR command is typically entered interactively or added temporarily to a CL program, or to any high-level language program via QCMDEXC, to verify that the proper overrides are in effect at the time a program is called or a file is opened. Assume that commands 1, 2, 3, and 18 are entered at call level 1.
Program A (in the user default activation group)
Command 1 OVRPRTF FILE(PRTA) COPIES(3)
Command 2 OVRDBF FILE(DBC) WAITFILE(*IMMED)
Command 3 CALL PGM(B)
Program B (in activation group 5)
Command 4 OVRPRTF FILE(PRTB) TOFILE(PRTA) COPIES(6) +
OVRSCOPE(*CALLLVL)
Command 5 OVRDBF FILE(DBC) WAITFILE(60) OVRSCOPE(*CALLLVL)
Command 6 OVRDBF FILE(DBE) TOFILE(DBF) OVRSCOPE(*JOB)
Command 7 DSPOVR FILE(PRTB) MRGOVR(*YES)
Command 8 CALL PGM(C)
Program C (in activation group 5)
Command 9 CALL PGM(QCMDEXC) PARM('OVRDSPF FILE(DSPE) +
TOFILE(DSPF) OVRSCOPE(*CALLLVL)' 50)
Command 10 OVRDBF FILE(DBC) TOFILE(DBD) OVRSCOPE(*CALLLVL)
Command 11 DSPOVR FILE(DBC) MRGOVR(*NO) LVL(3)
Command 12 DSPOVR FILE(DBD) MRGOVR(*NO) LVL(2)
Command 13 MONMSG MSGID(CPF9842)
Command 14 OVRDSPF FILE(CREDITS) TOFILE(DEBITS)
Command 15 CALL PGM(QCMDEXC) PARM('DSPOVR FILE(*ALL) MRGOVR(*YES) +
LVL(*) OUTPUT(*)' 47)
Command 16 RETURN
Command 17 DSPOVR FILE(*ALL) MRGOVR(*NO)
Command 18 RETURN
Command 19 DSPOVR FILE(*ALL) MRGOVR(*NO) LVL(2) OUTPUT(*)
Command 1 overrides the value of the COPIES attribute of file PRTA at level 1 to 3.
Command 2 overrides the value of the WAITFILE attribute of file DBC at level 1 to *IMMED.
Command 3 calls program A and creates a new call level, 2.
Command 4 causes an override at level 2 from file PRTB to file PRTA. Also, the command overrides the value of the COPIES attribute to 6.
Command 5 overrides the the value of the WAITFILE attribute for file DBC at level 2 to 60.
Command 6 causes an override of file DBE to file DBF and scopes the override to the job level.
Command 7 displays a merged override for file PRTB at level 2 with text descriptions of each keyword and parameter, as shown in Figure 2. The to-file is PRTA because of command 4, and the COPIES attribute is 3 because of command 1.
Display Override with Printer File
File . . . . . . . . . . . . . . : PRTB
Call level . . . . . . . . . . . : *
Merged . . . . . . . . . . . . . : *YES
Keyword Value
Name of file being overridden . . : FILE PRTB
Overriding to printer file . . . : TOFILE PRTA
Library . . . . . . . . . . . . . : *LIBL
Number of copies . . . . . . . . : COPIES 3
Press Enter to continue.
F3=Exit F12=Cancel
Command 8 calls program B and creates the new call level 3.
Command 9 causes an override at level 3 from file DSPE to file DSPF. An override done via a call to the QCMDEXC program takes the call level of the program that called the QCMDEXC program.
Command 10 causes an override of file DBC to file DBD.
Command 11 displays all overrides for file DBC from the job level to level 3, as shown in Figure 3. The overrides specified by commands 10, 5, and 2 are displayed in keyword-parameter form. Observe that this form of the DSPOVR command shows all the overrides for the selected file, regardless of redirection. The three overrides that are shown would not be merged because of the name change at level 3.
Display All File Overrides Call level . . . . . . . . . . . : 3 Type options, press Enter. 5=Display override details Opt File Level Type Keyword Specifications _ DBC 3 DB TOFILE(*LIBL/DBD) _ 2 DB WAITFILE(60) _ 1 DB WAITFILE(*IMMED) F3=Exit F5=Refresh F12=Cancel
Command 12 attempts to display all file overrides for file DBD from the job level to level 2. Because no overrides for file DBD exist at levels 1 or 2, no overrides are displayed, and the override-not-found escape message (CPF9842) is sent.
Command 13 monitors for message CPF9842 on the preceding command. The monitor specifies no action to be taken, but will prevent a function check if the message is sent.
Command 14 causes an override of the display file CREDITS to the display file DEBITS. The override is scoped to the activation group level of activation group 5. OVRSCOPE(*ACTGRPDFN) is the default.
Command 15 displays the merged overrides at the job level to call level 3 for all files in keyword-parameter form, as shown in Figure 4. File DBC is overridden to file DBD because of command 10 (commands 5 and 2 are therefore not effective). File DSPE is overridden to file DSPF because of command 9. File PRTB is overridden to file PRTA and COPIES(3) because of commands 4 and 1. File DBE is overridden to file DBF because of command 6. The file DEBITS overrides the file CREDITS because of command 14.
Display All Merged File Overrides Call level . . . . . . . . . . . : * Type options, press Enter. 5=Display override details 8=Display contributing file overrides Opt File Type Keyword Specifications _ DSPE DSP TOFILE(*LIBL/DSPF) 8 PRTB PRT TOFILE(*LIBL/PRTA) COPIES(3) _ DBC DB TOFILE(*LIBL/DBD) _ PRTA PRT COPIES(3) _ DBE DB TOFILE(*LIBL/DBF) _ CREDITS DSPF TOFILE(*LIBL/DEBITS) F3=Exit F5=Refresh F11=All file overrides F12=Cancel
If you enter a 5 on the line for PRTB, you get a detail display like the one shown in Figure 2. If you enter an 8 on this same line, you get a display showing commands 4 and 1 on separate lines, as shown in Figure 5. These are the overrides that were merged to form the PRTB override.
Display Contributing File Overrides File . . . . . . . . . . . . . . : PRTB Call level . . . . . . . . . . . : * Type options, press Enter. 5=Display override details Opt Level Type Keyword Specifications _ 2 PRT TOFILE(*LIBL/PRTA) COPIES(6) _ 1 PRT COPIES(3) F3=Exit F5=Refresh F12=Cancel F14=Display previous override
Command 16 causes a return to level 2, and level 3 is deleted. The overrides issued at level 3 that are scoped to the call level are implicitly deleted. The override issued by command 14 is not deleted because it is scoped to the activation group level.
Command 17 displays all overrides issued for the job level to the current call level (level 2), as shown in Figure 6. The overrides specified in commands 1, 2, 4, 5, 6, and 14 display in keyword-parameter form. The override issued in command 10 is not displayed because call level 3 is no longer active. Pressing F11 on this display allows you to see a display that is similar to the one shown in Figure 4.
Display All File Overrides Call level . . . . . . . . . . . : * Type options, press Enter. 5=Display override details Opt File Level Type Keyword Specifications _ CREDITS *ACTGRP PRT TOFILE(*LIBL/DEBITS) _ PRTB 2 PRT TOFILE(*LIBL/PRTA) COPIES(6) _ DBC 2 DB WAITFILE(60) _ 1 DB WAITFILE(*IMMED) _ PRTA 1 PRT COPIES(3) _ DBE *JOB DB TOFILE(*LIBL/DBF) F3=Exit F5=Refresh F11=All merged file overrides F12=Cancel
Command 18 causes a return to level 1, and level 2 is deleted. The overrides issued at level 2 that are scoped to the call level are implicitly deleted. The override that is caused by command 14 (scoped to the activation group level) is implicitly deleted when activation group 5 ends. In this example, assume that activation group 5 is a nonpersistent activation group and that ends when command 18 processes. The override caused by command 6 is not deleted.
Command 19 displays all overrides for the job level to call level 2 in keyword-parameter form. Because level 2 is no longer active, only the overrides scoped to the job level (command 6) and those specified at level 1 in commands 1 and 2 are displayed.