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

Multi Functional Card Unit?

Jeff Young wrote:

S/3.... Wow, I did not think anyone remembered that system. :)
Now, do you remember what MFCU *really* meant?


On Wed, Jan 23, 2013 at 12:28 PM, Jerry C. Adams <midrange@xxxxxxxx>

wrote:

Look Ahead? I *think* that I *may* have done those on a /36, which I
haven't programmed since '93. For sure on a S/3 on an MFCU1 card deck;

it

looked like it was stuttering. Field level testing? Probably that same
S/3
program.

Jerry C. Adams
IBM i Programmer/Analyst
I take pride in my personal appearance. My standards just happen to be
exceptionally low.
--
Home Office: 615-832-2730
email: midrange@xxxxxxxx


-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:

rpg400-l-bounces@xxxxxxxxxxxx]

On Behalf Of Jeff Young
Sent: Wednesday, January 23, 2013 10:59 AM
To: RPG programming on the IBM i (AS/400 and iSeries)
Subject: Re: Indicating Total Time in Free Form when using RPG Cycle

Matching Records????
Now you are REALLY going Waaaaaaaaaaaaaaaaaayyyyyyyyyyyyyyyyyyyyyy

back!!!!

:)
But when did you last use Look Ahead fields????????? :-) or how about
field
level testing for + - 0 ???

Ahhhaaa, those were the days.

Is'nt RPG great?
You have the best of both worlds...the Cycle when it is appropriate, and
full procedural (walk through the file yourself) when that is the best

fit.

On Wed, Jan 23, 2013 at 11:50 AM, Jerry C. Adams <midrange@xxxxxxxx>
wrote:

Unless one is checking for the control break on Detail time, I haven't
come across one. Although I've never felt a need to use L0. Why not

just:

CL9 CALLP (whatever)

At least this way one only has the one disjointed calc-spec.

A couple of years ago I reached into the Wayback Machine and actually
coded a program using level breaks *and* matching records. Could have
(probably) done it without using the Cycle, but it was soooo much

easier.

Jerry C. Adams
IBM i Programmer/Analyst
The guy in the biggest hurry is often the one who's going nowhere fast.
--
Home Office: 615-832-2730
email: midrange@xxxxxxxx


-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx
[mailto:rpg400-l-bounces@xxxxxxxxxxxx]
On Behalf Of Jeff Young
Sent: Wednesday, January 23, 2013 10:31 AM
To: RPG programming on the IBM i / System i
Subject: Indicating Total Time in Free Form when using RPG Cycle

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.


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

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


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

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