Breakpoint Activities › The Backtrace Facility › Example

Example

If you pressed PF12 from the Source Listing Backtrace shown previously, the following screen appears.

CA InterTest  PROTDEM FILE SOURCE LISTING BACKTRACE            
COMMAND ===>                                                                   
Program= COBDEMO  Option #       Stmt #                             Margin= 01  
                                        Search=                                 
OPTS 1 Proc div  2 Work-stor 3 Link sect 4 D-map      5 Clst/Pmap More:   + 
     6 Data xref 7 Proc xref 8 Err msgs  9 Srch fwd  10 Srch bwd            
PFKS 1 Help      2 Summary   3 End        4 Profile    5 1st Stmt   6 Last Stmt 
     7 Backward  8 Forward   9 Prev Stmt 10 Next Stmt 11 Prev Bloc 12 Next Bloc 
========> Backtrace at #00897  (00897 > curr. executed     1 times) <========= 
     00885*          ENDEXEC.         
   _ 00886      MOVE ' 00604   ' TO DFHEIV0         
   _ ====>      CALL 'DFHEI1' USING DFHEIV0.         
   _ 00888     IF EIBAID = DFHENTER GO TO CONTINUETASK.       
   _ 00889     IF EIBAID = DFHCLEAR GO TO SENDENDMSG.         
   _ 00890     IF EIBAID = DFHPF3   GO TO SENDENDMSG.         
   _ 00891     IF EIBAID = DFHPF15  GO TO SENDENDMSG.         
   _ 00892     IF EIBAID = DFHPF2   GO TO EXPANDEDDEMO.        
   _ 00893     IF EIBAID = DFHPF14  GO TO EXPANDEDDEMO.        
   _ 00894     GO TO SENDFIRSTSCREEN.         
   _ 00895 CONTINUETASK.        
     00896**** TASKNUM *NOTE* FIELD MUST BE INITIALIZED          
  A   ==>     ADD +1 TO TASKNUM.         
   _ 00898     IF TASKNUM = 1          
   _ 00899         MOVE 'DMAPASR'  TO MAPNAME.