Re: Generate a list of every RPG statement executed in a job, in sequence of execution

What exactly was the debug problem? Maybe someone here can help with that?

-----Original Message-----
From: Dan [mailto:dan27649@xxxxxxxxx]
Sent: Wednesday, July 25, 2018 9:14 AM
To: Websphere Development Studio Client for iSeries <wdsci-l@xxxxxxxxxxxx>; RPG400-L@xxxxxxxxxxxx
Subject: [WDSCI-L] Generate a list of every RPG statement executed in a job, in sequence of execution

(cross-posted to WDSC-L, RPG400-L)

I was banging my head trying to debug a program yesterday. Stepping through the RDi debugger was slow and tedious.

Is there something in RDi or some other system command that will generate a list of every RPG statement executed in a job, in sequence of execution? I think I understand that code coverage will show a summary of this; line
100.00 executed 20 times, line 101.00 executed 5 times, etc. But I'm looking for

0435.00 Dou %eof( CA8555RwL1);
0436.00 Reade #142AcctID CA8555RwL1;
0437.00 If not %eof( CA8555RwL1);
0438.00 y += 1;
0439.00 #142Pat(y) = w_su_PatID;
0440.00 #142Crg(y) = w_su_CrgID;
0442.00 If y = #maxCA0142Rparmarrayelements;
0446.00 Endif;
0447.00 Endif;
0448.00 Enddo;
0435.00 Dou %eof( CA8555RwL1);
0436.00 Reade #142AcctID CA8555RwL1;
0437.00 If not %eof( CA8555RwL1);
0438.00 y += 1;
0439.00 #142Pat(y) = w_su_PatID;
0440.00 #142Crg(y) = w_su_CrgID;
0442.00 If y = #maxCA0142Rparmarrayelements;
0443.00 Exsr Call_CA0142R_Update_CA8555RwL1;
0444.00 Clear CA0142Rout;
0445.00 y = 0;
0446.00 Endif;
0447.00 Endif;
0448.00 Enddo;

I'm looking for at least the source line numbers. Bonus if the code is included.

- Dan