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

I've also seen new free-format code with GOTO & TAGs just to do a simple loop!


Thanks,
Tommy Holden

-----Original Message-----
From: RPG400-L [mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Roger Harman
Sent: Wednesday, July 19, 2017 3:22 PM
To: RPG programming on the IBM i (AS/400 and iSeries) <rpg400-l@xxxxxxxxxxxx>
Subject: RE: Who the bloody eff still codes CABEQ in this century?!?!?!?

I feel your pain. A couple of weeks ago I saw a coworkers program (just written) that was 800 lines of mainline code. All comprised of if/endif blocks testing substrings of a giant text field.

When asked, he said it was a simple process that did not justify subroutines. I didn't even waste my breath asking about a data structure.



Sent from my Galaxy Tab(r) A


-------- Original message --------
From: Dan <dan27649@xxxxxxxxx>
Date: 7/19/17 12:46 PM (GMT-08:00)
To: "RPG programming on the IBM i (AS/400 and iSeries)" <rpg400-l@xxxxxxxxxxxx>
Subject: Re: Who the bloody eff still codes CABEQ in this century?!?!?!?

Makes sense. But, since this particular developer doesn't care much for using subroutines, it's not as much a concern here. <sigh>

- Dan

On Wed, Jul 19, 2017 at 3:42 PM, Jeff Young <jyoung0950@xxxxxxxxx> wrote:

Dan,
While you are at it, how about the CAS* op-codes.
Those are even *more* obscure.

:)

Jeff Young
Sr. Programmer Analyst

On Wed, Jul 19, 2017 at 3:33 PM, Dan <dan27649@xxxxxxxxx> wrote:

What are the chances we could get IBM / Barbara to get the compiler
to

puke

on any of the CAB* opcodes? At a minimum, the compiler should post
a message requiring a reply to the question, "How many years before
you retire?" and, if the response is greater than 1, tell the user
to drop

the

bloody CAB* opcodes and try again.

Perhaps less complex is to just update SEU one last time that flags
any
CAB* opcode as a syntax error. Cuz you damn well know they're not
using RDi!

Yes, there are other opcodes, including cousin GOTO (so flag that as
a syntax error as well), but CAB* opcodes are so obscure, I spend a
minute

or

two just trying to understand what is trying to be accomplished.

Is it 5:00 yet?

<Rant /done>

- Dan

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