Panel processing trace

Figure 1 shows an example of the trace generated when processing the PROC section of panel ISRUTIL after the number 4 was entered in the command field. Statements skipped as the result of a "false" condition on an IF or ELSE statement are never displayed. In addition, the panel trace always splits the value pairs for the TRANS functions into separate records, making the trace more readable. The result of an assignment statement is only shown when the assignment statement includes a dialog variable, an including panel control variable, or a panel function.

Panel REXX is not traced. This should be traced using normal REXX trace capabilities.

Figure 1. Sample PROCESS trace

TLD1 PrcR ISRUTIL  PROC         0  &ZCMDWRK=&Z
TLD1 PrcR ISRUTIL  PROC       ->   &ZCMDWRK=''
TLD1 PrcR ISRUTIL  PROC    T    0  IF(&ZCMD = &Z)
TLD1 PrcR ISRUTIL  PROC         0    &ZCMDWRK=TRUNC(&ZCMD,'.')
TLD1 PrcR ISRUTIL  PROC       ->     &ZCMDWRK=4
TLD1 PrcR ISRUTIL  PROC         0    &ZTRAIL=.TRAIL
TLD1 PrcR ISRUTIL  PROC       ->     &ZTRAIL=''
TLD1 PrcR ISRUTIL  PROC    F    0    IF(&ZCMDWRK = &Z)
TLD1 PrcR ISRUTIL  PROC         0  &ZSEL=TRANS(TRUNC(&ZCMD,'.')
TLD1 PrcR ISRUTIL  PROC    +             1,'PGM(ISRUDA) PARM(ISRUDA1) SCRNAME(LIBUTIL)'
TLD1 PrcR ISRUTIL  PROC    +             2,'PGM(ISRUDA) PARM(ISRUDA2) SCRNAME(DSUTIL)'
TLD1 PrcR ISRUTIL  PROC    +             3,'PGM(ISRUMC) SCRNAME(MCOPY)'
TLD1 PrcR ISRUTIL  PROC    +             4,'PGM(ISRUDL) PARM(ISRUDLP) SCRNAME(DSLIST)'
TLD1 PrcR ISRUTIL  PROC    +             5,'PGM(ISRURS) SCRNAME(RESET)'
TLD1 PrcR ISRUTIL  PROC    +             6,'PGM(ISRUHC) SCRNAME(HARDCOPY)'
TLD1 PrcR ISRUTIL  PROC    +             7,'PANEL(ISPUDL) SCRNAME(DOWNLOAD)'
TLD1 PrcR ISRUTIL  PROC    +             8,'PGM(ISRUOLP) SCRNAME(OUTLIST)'
TLD1 PrcR ISRUTIL  PROC    +             9,'PANEL(ISPUCMA) ADDPOP SCRNAME(CMDTABLE)'
TLD1 PrcR ISRUTIL  PROC    +             11,'PGM(ISRFMT) SCRNAME(FORMAT)'
TLD1 PrcR ISRUTIL  PROC    +             12,'PGM(ISRSSM) SCRNAME(SUPERC)'
TLD1 PrcR ISRUTIL  PROC    +             13,'PGM(ISRSEPRM) SCRNAME(SUPERCE) NOCHECK'
TLD1 PrcR ISRUTIL  PROC    +             14,'PGM(ISRSFM) SCRNAME(SRCHFOR)'
TLD1 PrcR ISRUTIL  PROC    +             15,'PGM(ISRSEPRM) PARM(S4) SCRNAME(SRCHFORE) NOCHECK'
TLD1 PrcR ISRUTIL  PROC    +             16,'PGM(ISRUTABL) NEWPOOL SCRNAME(TBLUTIL)'
TLD1 PrcR ISRUTIL  PROC    +             ' ',' '
TLD1 PrcR ISRUTIL  PROC    +             '*','?')
TLD1 PrcR ISRUTIL  PROC       ->   &ZSEL='PGM(ISRUDL) PARM(ISRUDLP) SCRNAME(DSLIST)'