Once statement information is saved in the trace table, use the PREV and ADVANCE commands to determine the execution path of the program, by stepping backward and forward through the executed statements.
Use the PREV, or P, command to cause the display to back up one or more entries in the statement trace table. Consider the following breakpoint:
CA InterTest for CICS r8.5 - PROTSYM FILE SOURCE LISTING BREAKPOINT COMMAND ===> prev Program= COB2DEMO Option # Stmt # Margin= 01 Search= ------------------------------------------------------------------------------- _____ TASKNUM | 000000 ---------+--------------------------------------------------------------------- _ 000531 CONTINUE-TASK. 000532**** TASKNUM *NOTE* FIELD MUST BE INITIALIZED A ==> ADD +1 TO TASKNUM. ==> ==> ASRA ABEND (0C7) detected and prevented. Caused by invalid decimal ==> arithmetic data format. ==> ==> Press PF1 for a detailed description. ==> _ 000534 IF TASKNUM = 1 _ 000535 MOVE 'DMAPASR' TO MAPNAME. _ 000536 IF TASKNUM = 2 _ 000537 MOVE 'DMAPSUM' TO MAPNAME. _ 000538 IF TASKNUM GREATER 2 _ 000539 GO TO SEND-END-MSG. _ 000540 GO TO REWRITE-TSQ.
The PREV command will back up to the previous entry in the table, resulting in the following display:
CA InterTest for CICS r8.5 - PROTSYM FILE SOURCE LISTING BREAKPOINT COMMAND ===> prev Program= COB2DEMO Option # Stmt # Margin= 01 Search= ------------------------------------------------------------------------------- _____ TASKNUM | 000000 ---------+--------------------------------------------------------------------- 000522 MOVE ' 00209 ' TO DFHEIV0 _ 000523 CALL 'DFHEI1' USING DFHEIV0. _ 000524 IF EIBAID = DFHENTER GO TO CONTINUE-TASK. _ 000525 IF EIBAID = DFHCLEAR GO TO SEND-END-MSG. _ 000526 IF EIBAID = DFHPF3 GO TO SEND-END-MSG. _ 000527 IF EIBAID = DFHPF15 GO TO SEND-END-MSG. _ 000528 IF EIBAID = DFHPF2 GO TO EXPANDED-DEMO. _ 000529 IF EIBAID = DFHPF14 GO TO EXPANDED-DEMO. _ 000530 GO TO SEND-FIRST-SCREEN. _ 000531 CONTINUE-TASK. 000532**** TASKNUM *NOTE* FIELD MUST BE INITIALIZED A ==> ADD +1 TO TASKNUM. _ 000534 IF TASKNUM = 1 _ 000535 MOVE 'DMAPASR' TO MAPNAME. _ 000536 IF TASKNUM = 2 _ 000537 MOVE 'DMAPSUM' TO MAPNAME.
Statement number 524 was the last statement executed prior to the abend at statement number 533. To back up 10 entries in the table, specify PREV 10. After using the PREV command to back up one or more entries in the statement trace table, use the ADVANCE, or A, command step forward through the table. Return at any time to the current statement using the CS command or the clear key.
|
Copyright © 2012 CA.
All rights reserved.
|
|