Re: Indicating Total Time in Free Form when using RPG Cycle

This is what I do:

/END-FREE
CL1 Exsr EndCust
CL2 Exsr EndSlsRep
CLR Exsr EndJob
/FREE

It's the least amount of fixed form I've been able to come up with.



On Wed, Jan 23, 2013 at 11:31 AM, Jeff Young <jyoung0950@xxxxxxxxx> wrote:

All,
I have an RPGLE program that prints a report and uses the Cycle for Level
Breaks.
Other than breaking out of free form to indicate Total Time processing
using CL0 If *InLx, then back to Free Form until the end
of total processing with /End-Free, CL0 EndIf, Is there any
way to do this only in Free Form?

I know, the RPG Cycle is *old style*, but sometimes, it is the best tool
for the job and I do not want to roll my own level breaks here just to be
"modern".

Thanks,

--
Jeff Young
Sr. Programmer Analyst
--
This is the RPG programming on the IBM i (AS/400 and iSeries) (RPG400-L)
mailing list
To post a message email: RPG400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.