RE: Who the bloody eff still codes CABEQ in this century?!?!?!?

Wait a minute! You can GOTO from Detail to Total Calcs?

I admit (blushing) that on one of my first programs I actually did that, but
it was on a non-IBM RPG II compiler in '73. When we went to a S/3 in '74, I
think I tried it just for kicks and grins, and the compiler told me I was a
bad boy.

Branching from Detail to Total will, if you're using the Cycle, throw the
program into a loop. That's just not right!

Jerry C. Adams
Well, there was the Battle of the Bulge. -Warren Spahn when asked if he had
ever felt more pressure than pitching in the World Series
IBM i Programmer/Analyst
--
NMM&D
615-832-2730

-----Original Message-----
From: RPG400-L [mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Barbara
Morris
Sent: Monday, July 24, 2017 2:51 PM
To: rpg400-l@xxxxxxxxxxxx
Subject: Re: Who the bloody eff still codes CABEQ in this century?!?!?!?

On 2017-07-24 12:46 PM, Dan wrote:

On Fri, Jul 21, 2017 at 4:19 PM, Barbara Morris <bmorris@xxxxxxxxxx>

wrote:

...
Speaking of the venerated GOTO, I found this in the RPG reference:

Use a GOTO operation to specify a branch:
- From a detail calculation line to another detail calculation line
- From a total calculation line to another total calculation line
- From a detail calculation line to a total calculation line
- From a subroutine to a TAG or ENDSR within the same subroutine
- From a subroutine to a detail calculation line or to a total

calculation line.

I stumbled upon that last one in some old code a few weeks ago and was
dumbfounded. I never knew we had that feature (sic) in RPG.

Branching from detail calcs to total calcs seems almost as awful. "Sic"
indeed, heh.

I hereby concede that there are more situations than SQL WHENEVER where
GOTOs are difficult, if not impossible, to convert to free-form.

--
Barbara

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

Please contact support@xxxxxxxxxxxx for any subscription related questions.

Help support midrange.com by shopping at amazon.com with our affiliate link:
http://amzn.to/2dEadiD