| Alistair 2007-05-22, 9:55 pm |
| On 21 May, 22:50, Doug C <NoS...@Spamblocker.org> wrote:
> C12420-TRAN-83-84.
> ALTER F00250 TO PROCEED TO F00280.
> ALTER F00310 TO PROCEED TO F00440.
> IF A-TRAN-84 ALTER F00490 TO PROCEED TO F00510 ALTER F00540
> TO PROCEED TO F00610 ELSE ALTER F00490 TO PROCEED TO
> F00560 ALTER F00590 TO PROCEED TO F00610.
> ALTER F00640 TO PROCEED TO F00930.
> ALTER F00970 TO PROCEED TO F00990.
> ALTER F01020 TO PROCEED TO F01080.
> ALTER F01100 TO PROCEED TO C12550.
> GO TO F00040.
>
> I am in GO TO HELL. Somebody shoot me.
>
> This is an actual paragraph from a program I was assigned for changes.
> There are 134 ALTER statements and 326 GO TO statements.
Good old ALTER.
Often used to direct program flow away from one-time processing (like
setting up data areas on the first read). I haven't seen one since
1987.
Bite the bullet and go for it.
Good luck.
|