Re: How do I code a GOTO in free format

[Luis Rodriguez <luis.rodriguez2@xxxxxxxxx>]

Steve,

If you have WDSc/Rdi/CODE you can use an option to convert your fixed-format RPG code to free-format. It is not perfect, but is a good starting point and it codes your problem using the workaround suggested previously (using /free and /end-free tags).

As other posters commented, though, I would suggest checking if it is worth the effort of cleaning up the code, dividing it in smaller and more "structured" sections (easier to manage and maintain).

Regards,

Luis Rodriguez

IBM Certified Systems Expert
eServer i5 iSeries Technical Solutions


--------------------

How do I code a GOTO in free formatWednesday, July 22, 2009 5:38 PM
> From: "Steve Roper" <>
> To: rpg400-l@xxxxxxxxxxxxxx

> Can anyone help please I am converting an old RPG program
into RPG IV free format
> The program uses a GOTO and TAG to exit from the middle of a
three level nesting of IF's
> And needs to bypass much more code after the  highest ENDIF,
this is all dependent on a
> Flag returned from an external program.
>
> I cannot call the external program earlier or later in the
cycle as it would negate other checks



--- On Wed, 7/22/09, rpg400-l-request@xxxxxxxxxxxx <rpg400-l-