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

If you don't rewrite the entire logic you will, whatever you do, end up
with overcomplicating
already complicated code.

Why not just leave it as it is?

On Tue, Jul 25, 2017 at 12:11 AM, John Yeung <gallium.arsenide@xxxxxxxxx>
wrote:

On Mon, Jul 24, 2017 at 12:46 PM, Dan <dan27649@xxxxxxxxx> 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.

This kind of thing really accentuates the similarity between RPG and
assembly. A branch is a branch. There is minimal enforcement of
structure. Visually and conceptually, I always found the "factor1,
opcode, factor2, result" columns reminiscent of typical assembly
language:

<https://en.wikipedia.org/wiki/Assembly_language#/media/
File:Motorola_6800_Assembly_Language.png>

The CABxx opcodes (which started this thread) are also lifted straight
out of assembly.

At my first job, we did have a form of code review. In one case I will
never forget, my manager/mentor told me "oh, you can handle this bit
of logic simply by using GOTO to here" as he proceeded to scrawl a tag
inside an ELSE "block" to serve as a target from outside of that ELSE
block. He said my attempt to make it more structured was acceptable,
though needlessly complicated.

I was mortified. I hoped he was joking, but he wasn't.

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