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



Gee that reminds me of the old fixed format
       1    CABEQ    1               MYTAG
At least it had no goto's  ;-)
Heaven forbid that you put a comment in there that it was a circumvention 
for the GOTO because if a manager ran his simple scanner for goto and he 
saw that in the comment, there'd be heck to pay.

Colin,
Your example almost has me believing that they should put GOTO's back in, 
and quick.  Just so as to stop baffling the programmers who have to code 
after you from trying to decipher your techniques to circumvent the coding 
police.

Hey IBM.  You tried.  You fought the good fight.  You did your best.  "You 
can lead a horse to water but you can't make him drink."  Please add the 
goto's back in to save us from the Colin's of the world.

Rob Berendt
-- 
Group Dekko Services, LLC
Dept 01.073
PO Box 2000
Dock 108
6928N 400E
Kendallville, IN 46755
http://www.dekko.com





Colin Williams <colin.williams@xxxxxxxxxxxx> 
Sent by: rpg400-l-bounces@xxxxxxxxxxxx
10/26/2004 02:52 AM
Please respond to
RPG programming on the AS400 / iSeries <rpg400-l@xxxxxxxxxxxx>


To
"'RPG programming on the AS400 / iSeries'" <rpg400-l@xxxxxxxxxxxx>
cc

Fax to

Subject
RE: RPGIV: RPGIII to get a facelift?






Reeve

It's the Programming Police. Your right, they should move everything over 
to
/FREE and get rid of the /FREE, /ENDFREE tags.

To get over the lack of goto's for display file processing, I use the FOR

Eg:

FOR I = 1 to 1

                 if x = true
                                 leave
                 endif

ENDFOR 

Works fine!

cheers
Colin.W
 
Extension   5800
Direct dial   0870 429 5800


-----Original Message-----
From: Reeve [mailto:rfritchman@xxxxxxxxx] 
Sent: 26 October 2004 08:15
To: rpgiv@xxxxxxxxxxxxxxx
Cc: RPG programming on the AS400 / iSeries
Subject: Re: RPGIV: RPGIII to get a facelift?


I think IBM should focus 100% of their efforts on completing /FREE. 
Until RPG is a completely free-form language, it's incomplete and it does
nothing to bring new recruits into the fold.  I've talked with several
"older" programmers who feel no need to move to /FREE because H, F, D, and 
O
specs are still fixed-format.  Younger programmers just turn their nose up
at the current neither-fish-nor-fowl /FREE implementation.

Seeing a moderately contemporary progam littered with /END-FREE and /FREE 
is
more than moderately annoying.  I can use my service program library to
handle MOVE issues (and others) but the lack of a free-form GOTO/TAG is a
burr under my coding saddle.  My standard structure for handling a rich
mixture of command keys, help panels, and lookups is not well-suited for 
the
glib suggestion in the Reference manual to "use other operation codes, 
such
as LEAVE, LEAVESR, ITER, and RETURN" instead of GOTO.  Is there a 
technical
reason GOTO and TAG can't be free-formed?  Or is this the Programming 
Police
in action, telling us a complex set of nested loops for flow control
promotes program readability?  I'm thinking about my customers' junior
programmers trying to make sense out of Nested Loop Soup.

Like most of us, I spent a lot of time in non-/FREE code, and I'd like to
convert it to /FREE without rewriting it.  It's well-structured code (not
spaghetti); then I use CODE (i.e. leave WDSC, hop into CODE) to convert 
it,
and it gets ugly with /END-FREE and /FREE from dealing with the 
unsupported
op codes.

We have a tool, /FREE, to cut through layers of to-do lists.  It would be 
a
better tool if it were sharper, and charging for the rusty blades of old,
less efficient tools doesn't serve any purpose other than to annoy the 
small
number of customers requiring the facility for program maintenance.

-reeve


On Mon, 25 Oct 2004 15:22:28 -0500, Bob Cozzi <cozzi@xxxxxxxxx> wrote:
> 
> I spent one day at COMMON last week and talked with several of the IBM 
> Canada RPG IV developers.  One of the questions that was asked was if 
> IBM could/should start charging for the RPGII and RPGIII compilers 
> (some people call RPGIII, "RPG400").
> 
> Anyway, I suggested that IBM should enhance RPG IV with two new 
> features:
> 
> 1) Allow blank lines in the source code
> 2) Support the compiler parameters in the H spec, and translate those 
> parms when the CVTRPGSRC command is used.
> 
> Without leading your responses: I'm wondering if you feel charging for 
> RPGIII would help/encourage you to move to RPGIV more aggressively?
> 
> -Bob
> 
> ------------------------ Yahoo! Groups Sponsor 
> --------------------~--> $9.95 domain names from Yahoo!. Register 
> anything. http://us.click.yahoo.com/J8kdrA/y20IAA/yQLSAA/saFolB/TM
> --------------------------------------------------------------------~-
> >
> 
> www.RPGxTools.com
> "Free your Limitations"
> Now with CGILIB - The best CGI RPG library available.
> 
> To unsubscribe from this list send and email to: 
> rpgiv-unsubscribe@xxxxxxxxxxxxxxx
> 
> Yahoo! Groups Links
> 
> <*> To visit your group on the web, go to:
>    http://groups.yahoo.com/group/RPGIV/
> 
> <*> To unsubscribe from this group, send an email to:
>    RPGIV-unsubscribe@xxxxxxxxxxxxxxx
> 
> <*> Your use of Yahoo! Groups is subject to:
>    http://docs.yahoo.com/info/terms/
> 
>
--
This is the RPG programming on the AS400 / 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 e-mail has been sent by a company of Bertram Group Ltd, whose 
registered office is 1 Broadland Business Park, Norwich, NR7 0WF. 
This message, and any attachments, are intended solely for the addressee 
and may contain privileged or confidential information.  If you are not 
the intended recipient, any disclosure, copying, distribution or any 
action taken or omitted to be taken in reliance on it, is prohibited and 
may be unlawful.  If you believe that you have received this email in 
error, please contact the sender immediately. Opinions, conclusions and 
statements of intent in this e-mail are those of the sender and will not 
bind a Bertram Group Ltd company unless confirmed in writing by a director 
independently of this message. 
Although we have taken steps to ensure that this email and any attachments 
are free from any virus, we advise that in keeping with good computing 
practice the recipient should ensure they are actually virus free.
--
This is the RPG programming on the AS400 / 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.



As an Amazon Associate we earn from qualifying purchases.

This thread ...

Replies:

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.