QA testing: need to prove line by line

["Bale, Dan" <D.Bale@xxxxxxxxxxxxx>]

As part of our newfound drive to QA, among MANY other things, one thing
I have an immediate need to do, but have no idea how, is to be able to
prove that sections of code are working as designed.  The absolute
immediate need is to prove the small (maximum 20 lines) modifications
being made to 10 CL applications.  I immediately thought that job
logging would suffice, but learned that our QA team is not happy with
not seeing *everything* that happens in the CL program.  An example is
an IF command execution, something that never shows up in a job log.
Another example is showing where variables are changed and what their
new values are.

Hopefully, the trace function in STRDBG is my starting point.  If so, I
haven't been able to find out where to proceed from there.

As an example, for the following code...

  IF   (&BRANCH *EQ &DETROIT *OR &BRANCH *EQ '073') DO
      OVRPRTF  FILE(QSYSPRT) OUTQ(&PRINTER)
      CPYF     FROMFILE(PAXAR) TOFILE(QSYSPRT)
  ENDDO
  CALL       PGM(ASN762R) PARM(&MEMO &RELEAS &ASN)

... I would like to see:

  IF   (&BRANCH *EQ &DETROIT *OR &BRANCH *EQ '073') DO
* Variable &BRANCH     = '077'
* Variable &DETROIT    = '077'
* IF statement tested true
      OVRPRTF  FILE(QSYSPRT) OUTQ(&PRINTER)
* Variable &PRINTER    = 'S0001P'
      CPYF     FROMFILE(PAXAR) TOFILE(QSYSPRT)
  ENDDO
  CALL       PGM(ASN762R) PARM(&MEMO &RELEAS &ASN)
* Variable &MEMO       = 1255014
* Variable &RELEAS     = 2444108
* Variable &ASN        = 1200000000469

... or in the case that the IF tested false, I would like to see:

  IF   (&BRANCH *EQ &DETROIT *OR &BRANCH *EQ '073') DO
* Variable &BRANCH     = '079'
* Variable &DETROIT    = '077'
* IF statement tested false
  CALL       PGM(ASN762R) PARM(&MEMO &RELEAS &ASN)
* Variable &MEMO       = 1255014
* Variable &RELEAS     = 2444108
* Variable &ASN        = 1200000000469

Can this be done?  Or something similar?

TIA.

Dan Bale
IT - AS/400
Handleman Company
248-362-4400  Ext. 4952
D.Bale@Handleman.com