The function keys that you can use at each point are displayed in a menu at the bottom of every EDF display.
Functions that apply to all displays are always assigned to the same key, but definitions of some keys depend on the display and the intercept point. To select an option, press the indicated function key. Where a terminal has 24 function keys, EDF treats PF13 through PF24 as duplicates of PF1 through PF12. If your terminal has no PF keys, place the cursor under the option you want and press the ENTER key.
- ABEND USER TASK
- Terminates
the task being monitored. The message ENTER ABEND CODE AND
REQUEST ABEND AGAIN is displayed to confirm this action. Enter
the abend code at the cursor position, then request this function
again to abend the task with a transaction dump identified by the
specified code. If you enter NO, the task is
abended without a dump and with the 4-character default abend code
of four question marks (????).
Abend codes that start with the character A are reserved for use by CICS®. Using a CICS abend code might cause unpredictable results.
You cannot use this function if an abend is already in progress, or the task is terminating.
- BROWSE TEMP STORAGE
- Produces a display of the temporary storage queue CEBRxxxx, where xxxx is the terminal identifier of the terminal running EDF. This function is only available from the working storage (PF5) screen. You can use CEBR commands to display or modify temporary storage queues and to read or write transient data queues.
- CONTINUE
- Redisplays the current screen to incorporate any changes. If you made no changes, CONTINUE causes the transaction under test to resume execution up to the next intercept point. To continue, press ENTER.
- CURRENT DISPLAY
- Redisplays the current screen to incorporate any changes. If you made no changes, EDF displays the command screen for the last intercept point. To execute this function, press ENTER from the appropriate screen.
- DIB DISPLAY
- Shows the contents of the DL/I interface block (DIB). This function is only available from the working-storage screen (PF5). See IMS: Application programming for EXEC DLI for information about DIB fields.
- EIB DISPLAY
- Displays the contents of the EXEC interface block (EIB). For an example of an EIB display, see Figure 1. For programming information about the EIB, see EIB fields. If COMMAREA exists, EDF also displays its address and one line of data in the dump format.
- INVOKE CECI
- Accesses the command-level interpreter (CECI). This function is only available from the working storage (PF5) screen. See Figure 1 for an example of the screen from which CECI is invoked. You can then use CECI commands, discussed in Command-level interpreter (CECI). These CECI commands include INQUIRE and SET commands against the resources referenced by the original command before and after command execution. See inbound reply mode for restrictions when running CECI in dual-screen mode. The use of CECI from this panel is like the use of CEBR within CEDF.
- END EDF SESSION
- Ends the EDF control of the transaction. The transaction continues running from that point but no longer runs in EDF mode.
- NEXT DISPLAY
- If you returned to a previous display, displays the next one forward and increases the display number by one. This option is the reverse of PREVIOUS DISPLAY.
- PREVIOUS DISPLAY
- Sends the previous display to the screen, unless you saved other displays. The number of the display from the current intercept point is always 00. As you request previous displays, the display number decreases by 1 to -01 for the first previous display, -02 for the one before that, and so on, down to the oldest display, -10. When no more previous screens are available, the PREVIOUS option is no longer available on the menu, and the corresponding function key is inoperative.
- REGISTERS AT ABEND
Displays
storage that contains the values of the registers if a local ASRA
abend occurs. The layout of the storage is 64-bit registers, followed
by 16-byte program status word (PSW) at abend. Figure 1 shows a typical screen. In some cases, when a second program check occurs in the region before EDF has captured the values of the registers, this function does not appear on the menu of the abend display. If this situation occurs, a second test run might provide more information.
Figure 1. Typical EDF display for REGISTERS AT ABENDTRANSACTION: UT PROGRAM: ASRA31 TASK: 0000487 APPLID: IYK2ZKE1 DISPLAY: 00 ADDRESS: 0006F010 0006F010 000000 00000000 00000090 00000000 0010003C ................ 1 0006F020 000010 00000000 00041800 00000000 AE410028 ................ 1 0006F030 000020 00000000 2C2E35A8 00000000 00000000 .......y........ 1 0006F040 000030 00000000 2C2D7800 00000000 7F2C9918 ............".r. 1 0006F050 000040 00000000 2E410000 00000000 2C2D7818 ................ 1 0006F060 000050 00000000 00100008 00000000 00100100 ................ 1 0006F070 000060 00000000 009AF000 00000000 00100690 ......0......... 1 0006F080 000070 00000000 AE410158 00000000 00100690 ................ 1 0006F090 000080 079D0000 80000000 00000000 2E410178 ................ 2 0006F0A0 000090 00040004 00000000 00000000 00000000 ................ 0006F0B0 0000A0 00000000 00000000 00000000 00000000 ................ 0006F0C0 0000B0 00000000 00000000 00000000 00000000 ................ 0006F0D0 0000C0 00000000 00000000 00000000 00000000 ................ 0006F0E0 0000D0 00000000 00000000 D4F0F0F0 F0F4F8F9 ........M0000489 0006F0F0 0000E0 D4F0F0F0 F0F4F8F9 00000000 00000000 M0000489........ 0006F100 0000F0 00000000 000000E4 E3404000 00F00000 .......UT ..0.. ENTER: CURRENT DISPLAY PF1 : UNDEFINED PF2 : BROWSE TEMP STORAGE PF3 : UNDEFINED PF4 : EIB DISPLAY PF5 : INVOKE CECI PF6 : USER DISPLAY PF7 : SCROLL BACK HALF PF8 : SCROLL FORWARD HALF PF9 : UNDEFINED PF10: SCROLL BACK FULL PF11: SCROLL FORWARD FULL PF12: REMEMBER DISPLAYNotes:- Register values
- PSW
- REMEMBER DISPLAY
- Places a display that would not typically be kept in memory, such as an EIB display, in the EDF memory. EDF automatically saves the displays at the start and completion of each command. The memory can hold up to 10 displays. The displays are numbered in reverse chronological order (that is, -10 is the oldest display, and -01 is the newest). All pages associated with the display are kept in memory and can be scrolled when recalled. Note, however, that if you save a working-storage display, only the screen on view is saved.
- SCROLL BACK
- View the previous screen in the display. This function applies to an EIB, DIB, or command display that does not all fit on one screen. When the screen on view is not the first one of the display, and there is a plus sign (+) before the first option or field, select this function to view previous screens in the display. See Figure 1 for an example.
- SCROLL FORWARD
- View the next screen in the display. This function applies to an EIB, DIB, or command display that does not all fit on one screen. When the display does not fit, a plus sign (+) appears after the last option or field in the display, to show that there are more screens. Select this function to display the next screen.
- SCROLL BACK FULL
- View the previous screen in a working-storage display. This function applies to displays of working storage and is similar to the SCROLL BACK option for EIB and DIB displays. SCROLL BACK FULL gives a working-storage display one full screen backward, showing addresses lower in storage than those addresses on the current screen.
- SCROLL FORWARD FULL
- View the next screen in a working-storage display. This function applies to displays of working storage and is similar to the SCROLL FORWARD option for EIB and DIB displays. SCROLL FORWARD FULL gives a working-storage display one full screen forward, showing addresses higher in storage than those addresses on the current screen.
- SCROLL BACK HALF
- Reverse the display of working storage by half a screen. This function is similar to SCROLL BACK FULL, except that the display of working storage is reversed by only half a screen.
- SCROLL FORWARD HALF
- Advance the display of working storage by half a screen. This function is similar to SCROLL FORWARD FULL, except that the display of working storage is advanced by only half a screen.
- STOP CONDITIONS
- Specify which conditions cause EDF to resume displays after using
the SUPPRESS DISPLAYS function. The menu screen shown in Figure 2 is displayed. You can use the STOP
CONDITIONS and SUPPRESS DISPLAYS functions together to reduce the
interaction when you check a program that you know is partly working.
Figure 2. Typical EDF display for STOP CONDITIONS
TRANSACTION: AC20 PROGRAM: DFH0VT1 TASK: 0086 APPLID: 1234567 DISPLAY: 00 DISPLAY ON CONDITION:- COMMAND: EXEC CICS OFFSET: X'......' LINE NUMBER: CICS EXCEPTION CONDITION: ERROR ANY CICS CONDITION NO TRANSACTION ABEND YES NORMAL TASK TERMINATION YES ABNORMAL TASK TERMINATION YES DLI ERROR STATUS: ANY DLI ERROR STATUS ENTER: CURRENT DISPLAY PF1 : UNDEFINED PF2 : UNDEFINED PF3 : UNDEFINED PF4 : SUPPRESS DISPLAYS PF5 : WORKING STORAGE PF6 : USER DISPLAY PF7 : UNDEFINED PF8 : UNDEFINED PF9 : UNDEFINED PF10: UNDEFINED PF11: UNDEFINED PF12: REMEMBER DISPLAYBy default, EDF resumes displays if any of the following conditions occur, as shown in Figure 2:- Any CICS exception condition
- Transaction abend
- Normal task termination
- Abnormal task termination
You can specify any or all these events as STOP CONDITIONS:- A specific type of function and option, such as READNEXT file or ENQ resource, is encountered; for example, FEPI ADD or GDS ASSIGN.
- The command at a specific offset or on a specific line number (assuming that the program was translated with the DEBUG option) is encountered.
- Any DL/I error status occurs, or a specific DL/I error status occurs.
- A specific exception condition occurs. When ERROR (the default)
is specified for CICS EXCEPTION CONDITION, EDF redisplays a screen
in response to any error condition (for example, NOTOPEN, EOF, or
INVREQ). If you specify a specific condition, such as EOF, for CICS
EXCEPTION CONDITION, and NO (the default) is specified for ANY CICS
CONDITION, EDF redisplays the screen only when that condition (EOF)
occurs.
If you specify YES for ANY CICS CONDITION, EDF overrides the CICS exception conditions and redisplays a screen whenever any command results in a non-zero EIBRESP value such as NOTOPEN, EOF, or QBUSY.
- Any exception condition occurs for which the CICS action is to raise ERROR; for example, INVREQ or NOTFND.
- An abend occurs.
- The task ends normally.
- The task ends abnormally.
When you use an offset for STOP CONDITIONS, you must specify the offset of the BALR instruction corresponding to a command. The offset can be determined from the code listing produced by the compiler or assembler. In COBOL, C, C++, or PL/I, you must use the compiler option that produces the assembler listing to determine the relevant BALR instruction.
When you use a line number, you must specify it exactly as it appears on the listing, including leading zeros, and it must be the line on which a command starts. If you have used the NUM or the SEQUENCE translator options, the translator uses your line numbers as they appear in the source. Otherwise, the translator assigns line numbers.
Line numbers can be found in the translator listing (SYSPRINT in the translator step) if you have used either the SOURCE or VBREF translator options. If you have used the DEBUG translator option, as you must to use line numbers for STOP CONDITIONS, the line number also appears in your compilation (assembly) listing, embedded in the translated form of the command, as a parameter in the CALL statement.
You can specify that EDF resumes displays at DL/I commands as well as at CICS commands. Type over the CICS qualifier on the command line with DLI and enter the type of DL/I command at which you want display suppression to stop. You must be running a DL/I program or have executed one earlier in the same task. You can suppress DL/I commands as early as the program initiation panel.
You can also stop display suppression when a particular DL/I status code occurs. For information about the status codes that you can use, see the list of codes in the DL/I interface block (DIB) in IMS: Application programming for EXEC DLI.
- SUPPRESS DISPLAYS
- Suppresses all EDF displays until one of the specified STOP CONDITIONS occurs. When the condition occurs, however, you still have access to the ten previous command displays, even though they were not sent to the screen when they were originally created.
- SWITCH HEX/CHAR
- Switches displays between character and hexadecimal form. The
switch applies only to the command display and does not affect previously
remembered displays, STOP CONDITIONS displays, or working storage
displays.
In DL/I command displays that contain the WHERE option, only the key values (the expressions that follow each comparison operator) can be converted to hexadecimal.
- UNDEFINED
- The indicated function key is not defined for the current display at the current intercept point.
- USER DISPLAY
- Displays what would be on the screen if the transaction was not running in EDF mode. (You can use it only for single terminal checkout.) To return to EDF after using this key, press the ENTER key.
- WORKING STORAGE
- Shows the contents of the 24-bit or 31-bit working storage area
in your program or of any other address in the CICS region. Figure 3 shows
a typical working storage screen. This function does
not support 64-bit storage.Figure 3. Typical EDF display for working storage
TRANSACTION: AC20 PROGRAM: DFH0VT1 TASK: 00030 APPLID: 1234567 DISPLAY:00 ADDRESS: 035493F0 WORKING STORAGE 035493F0 000000 E3F14040 00000000 00010000 00000000 T1 ........... 03549400 000010 00000000 00000000 F1000000 00000000 ........1....... 03549410 000020 F0000000 00000000 F0000000 00000000 0.......0....... 03549420 000030 F0000000 00000000 F0000000 00000000 0.......0....... 03549430 000040 00000000 00000000 00000000 00000000 ................ 03549440 000050 D7C1D5D3 00000000 D9C5C3C4 00000000 PANL....RECD.... 03549450 000060 D3C9E2E3 00000000 C8C5D3D7 00000000 LIST....HELP.... 03549460 000070 84000000 00000000 A4000000 00000000 d.......u....... 03549470 000080 82000000 00000000 C4000000 00000000 b.......D....... 03549480 000090 E4000000 00000000 C2000000 00000000 U.......B....... 03549490 0000A0 D5000000 00000000 E2000000 00000000 N.......S....... 035494A0 0000B0 7B000000 00000000 6C000000 00000000 #.......%....... 035494B0 0000C0 4A000000 00000000 F1000000 00000000 ¢.......1....... 035494C0 0000D0 F2000000 00000000 F3000000 00000000 2.......3....... ENTER: CURRENT DISPLAY PF1 : UNDEFINED PF2 : BROWSE TEMP STORAGE PF3 : UNDEFINED PF4 : EIB DISPLAY PF5 : INVOKE CECI PF6 : USER DISPLAY PF7 : SCROLL BACK HALF PF8 : SCROLL FORWARD HALF PF9 : UNDEFINED PF10: SCROLL BACK FULL PF11: SCROLL FORWARD FULL PF12: REMEMBER DISPLAY
The working storage contents are displayed in a form like that of a dump listing; that is, in both hexadecimal and character representation. The address of working storage is displayed at the top of the screen. You can browse through the entire area using the scroll commands, or you can enter a new address at the top of the screen. This address can be anywhere in the CICS region. The working storage display provides two additional scrolling keys, and a key to display the EIB (the DIB if the command is a DL/I command).
The meaning of working storage depends on the programming language of the application program, as follows:
- COBOL
- All data storage defined in the WORKING-STORAGE section of the program
- C, C++ and PL/I
- The dynamic storage area (DSA) of the current procedure
- Assembler language
- The storage defined in the current DFHEISTG DSECT
Assembler language programs do not always acquire working storage; for example, it might not be required if the program does not issue CICS commands. When you LINK to such a program, the following message might be issued: Register 13 does not address DFHEISTG. This message does not necessarily mean an error, but there is no working storage to look at.
Except for COBOL programs, working storage starts with
a 72 byte standard format save area; that is, registers 14 to 12 begin
at offset 12, and register 13 is stored at offset 4. For AMODE(64)
programs, working storage starts with a format 4 save area (F4SA);
registers 14 to 12 begin at offset 8, and register 13 is stored at
offset 128.
Working storage can be changed at the screen; ou can use either the hexadecimal section or the character section. You can type over the ADDRESS field at the head of the display with a hexadecimal address; storage starting at that address is then displayed when you press ENTER. You can examine any location in the address space. For more information, see Using EDF to change information.
If you are examining program storage that is not part of the working storage of the program currently running, which is unique to the particular transaction under test, the corresponding field on the screen is protected to prevent you from overwriting storage that might belong to or affect another task.
If the initial part of a working storage display line is blank, the blank portion is not part of working storage. This situation can occur because the display is doubleword aligned.
At the beginning and end of a task, working storage is not available. In these circumstances, EDF generates a blank storage display so that you can still examine any storage area in the region by typing over the address field.
If you terminate a PL/I or Language Environment® program with an ordinary non-CICS return, EDF does not intercept the return, and you cannot see working storage. If you use a RETURN command instead, you get an EDF display before execution and at program termination.
If you are using a Language Environment-enabled program, working storage is freed at program termination if the program is terminated using a non-CICS return. In this case, working storage is not available for display.
