RE: worst RPG ever seen? -- RPG400-L

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

...Because you know how easy it is for RPG to drop a decimal point or two
accidentally between a product and a subtraction. 

This makes perfect sense to me.  I'm sure the programmer also tied his shoe
laces with four bows, wore belt and suspenders and always closes the door to
his house twice when he leaves.



-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx]
On Behalf Of Jon Paris
Sent: Tuesday, February 28, 2006 10:54 AM
To: rpg400-l@xxxxxxxxxxxx
Subject: RE: worst RPG ever seen?


 >> Let me know if you have seen worse code.

Not sure if it is worse - but this is an example of the worst I've ever
seen.

     C     VAL1          ADD       VAL2          TOT1              7 2
     C     TOT1          SUB       VAL1          TMP               7 2
     C     TMP           COMP      VAL2                                   99
     C  N99              GOTO      ERR1
     C     VAL3          ADD       VAL4          TOT2              7 2
     C     TOT2          SUB       VAL3          TMP               7 2
     C     TMP           COMP      VAL4                                   99
     C  N99              GOTO      ERR2

If you're guessing that this was written by an accountant who didn't trust
computers you'd be right!  I was able to get rid of an awful lot of code
when I took over the program!
 

Jon Paris
Partner400

www.Partner400.com
www.RPGWorld.com

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.