[[{“value”:”What I call totally free RPG and what IBM calls modern RPG has been around for nine years. This type of RPG always needs the **FREE directive starting in the first position of the source line. And what follows is the free form RPG, where the source line can start in any position.
…+… 1 …+… 2 …+… 3 …+… 4 …+… 5 …+… 6 …+… 7 …+… 8
01 **free
02 dcl-s Statement1 varchar(100) inz(‘Entered in free format RPG’) ;
Marc Raynor informed me of another directive that “ends” the free format RPG, **END-FREE. After that directive all valid RPG must be entered in the sixth position for fixed format code, and later for the not completely free format code.
Having been told this I had to try it:
Read more »”}]] Read More
