EDF 示例: 在开始执行 CICS 命令时

此示例显示 CICS® 命令执行开始时的显示。 EDF 显示命令,包括关键字,选项和参数值。

开始执行 CICS 命令时的典型 EDF 显示如 图 1所示。 您可以通过按 PF2以十六进制或字符格式显示信息 (并从一个切换到另一个)。 如果请求字符格式,那么数字参数将以带符号数字字符格式显示。

图 1。 典型 EDF 在开始执行 CICS 命令时显示
TRANSACTION: AC20 PROGRAM: DFH0VT1 TASK: 00032 APPLID:
1234567 DISPLAY:00
STATUS: ABOUT TO EXECUTE COMMAND
EXEC CICS SEND MAP
MAP ('T1 ')
FROM ('.............................................................'..)
LENGTH (154)
MAPSET ('DFH0T1 ')
CURSOR
TERMINAL
ERASE
NOFLUSH
NOHANDLE




OFFSET:X'002522' LINE:00673 EIBFN=X'1804'

ENTER: CONTINUE
PF1 : UNDEFINED PF2 : SWITCH HEX/CHAR PF3 : UNDEFINED
PF4 : SUPPRESS DISPLAYS PF5 : WORKING STORAGE PF6 : USER DISPLAY
PF7 : SCROLL BACK PF8 : SCROLL FORWARD PF9 : STOP CONDITIONS
PF10: PREVIOUS DISPLAY PF11: EIB DISPLAY PF12: ABEND USER TASK

图 2 显示了使用 Db2®运行的 EXEC SQL 命令的 开始执行 的类似屏幕。

图 2。 开始执行 SQL 命令时的典型 SQL 显示
TRANSACTION: LOKO PROGRAM: TLOKO TASK: 00082 APPLID: 1234567
DISPLAY:00
STATUS: ABOUT TO EXECUTE COMMAND
CALL TO RESOURCE MANAGER DSNCSQL
EXEC SQL UPDATE
DBRM=TLOK0, STMT=00242, SECT=00001
IVAR 001: TYPE=CHAR, LEN=00010 AT X'001E5A99'
DATA=X'F0F0F0F0F0F1F0F0F0F0'









OFFSET:X'000298' LINE: UNKNOWN EIBFN= X'0A02'
ENTER: CONTINUE
PF1 : UNDEFINED PF2 : UNDEFINED PF3 : UNDEFINED
PF4 : SUPPRESS DISPLAYS PF5 : WORKING STORAGE PF6 : USER DISPLAY
PF7 : SCROLL BACK PF8 : SCROLL FORWARD PF9 : STOP CONDITIONS
PF10: PREVIOUS DISPLAY PF11: EIB DISPLAY PF12: ABEND USER TASK

除选项和值外,该命令由其在程序中的十六进制偏移量标识。 如果程序是使用 DEBUG 转换程序选项翻译的,那么也会显示行号,如 图 1中所示。 (请参阅 定义转换程序选项 以获取有关此选项的信息。)

在 EXEC SQL 或 EXEC DLI 命令启动时, EDF 屏幕的主体向您显示命令转换为的 CALL 的参数列表。 如果 DLI 命令生成多个 CALL 语句,那么您只会看到最后一个 CALL 语句。