× The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.


  1.  Home
  2. RPG400-L
  3. January 2013

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

On 1/23/2013 11:31 AM, Jeff Young wrote:

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".

I use

/end-free
CL1 EXSR L1TOTCALC
CL2 EXSR L2TOTCALC
c/free

begsr l1totcalc;
...
endsr;
--buck


As an Amazon Associate we earn from qualifying purchases.

This thread ...
Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].

Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.