RE: RPG /free

["Joel R. Cochran" <jrc@xxxxxxxxxxxxx>]

Ummmmm..........

Actually, /free and /end-free must begin in position 7 (not 6)or you will
receive the following error (in SEU...IknowIknow!) and code can start in
position 8.


 Message ID . . . . . . :   RNF0257       Severity . . . . . . . :   30
 Message type . . . . . :   Diagnostic

 Message . . . . :   Form-Type entry for main procedure not valid or out of
   sequence.
 Cause . . . . . :   The Form-Type entry (position 6) is not valid or the
   sequence of the specifications is not H, F, D, I, C, O. The specification
is
   ignored.
 Recovery  . . . :   Specify H, F, D, I, C, or O for the Form-Type entry
   (position 6) or establish the proper sequence of specifications. Compile
   again.



Joel R. Cochran
Director of Internet Services
VamaNet.com
(800)480-8810
mailto:custservice@vamanet.com

> -----Original Message-----
> From: rob@dekko.com [mailto:rob@dekko.com]
> Sent: Thursday, March 14, 2002 12:40 PM
> To: rpg400-l@midrange.com
> Subject: RE: RPG /free
>
>
>
> the word /free starts in column 6 - where all compiler
> directives start.
> the word /end-free starts in column 6.
> Everything in between starts in column 7 or later.
>
>
> Rob Berendt
> --
> "They that can give up essential liberty to obtain a little temporary
> safety deserve neither liberty nor safety."
> Benjamin Franklin
>
>
>
>                     "Bob Cozzi
>                     \(RPGIV\)"              To:
> <rpg400-l@midrange.com>
>                     <cozzi@rpgiv.com>       cc:
>                     Sent by:                Fax to:
>                     rpg400-l-admin@mi       Subject:     RE: RPG /free
>                     drange.com
>
>
>                     03/14/2002 12:23
>                     PM
>                     Please respond to
>                     rpg400-l
>
>
>
>
>
>
> Cool!
> So is it column 7 or 8 where the /FREE stuff needs to start?
>
> Bob Cozzi
> cozzi@rpgiv.com
> Visit the on-line  Midrange  Developer  forum at: http://www.rpgiv.com
>
>
> > -----Original Message-----
> > From: rpg400-l-admin@midrange.com
> [mailto:rpg400-l-admin@midrange.com]
> On
> > Behalf Of Buck Calabro
> > Sent: Thursday, March 14, 2002 11:12 AM
> > To: rpg400-l@midrange.com
> > Subject: RE: RPG /free
> >
> > >> In RPG free form are we limited to
> > >> 80 characters for entering free
> > >> form
> > >
> > >You are limited to 72 or 73 characters.
> > >Columns 7 (or is it 8?) through 80.
> >
> > It was easy enough to test, so I did.  On my V5R1 box I
> created a 240
> record
> > length source file (the largest SEU can handle) and shifted all the
> code
> > right 200 characters.  It compiles fine.  Not known to leave well
> enough
> > alone, I created a 1000 byte long source file and used Code
> to edit it
> and
> > shove statements out to the end.  That compiles too.
> >   --buck
> > _______________________________________________
> > This is the RPG programming on the AS400 / iSeries
> (RPG400-L) mailing
> list
> > To post a message email: RPG400-L@midrange.com
> > To subscribe, unsubscribe, or change list options,
> > visit: http://lists.midrange.com/cgi-bin/listinfo/rpg400-l
> > or email: RPG400-L-request@midrange.com
> > Before posting, please take a moment to review the archives
> > at http://archive.midrange.com/rpg400-l.
>
>
> _______________________________________________
> This is the RPG programming on the AS400 / iSeries (RPG400-L)
> mailing list
> To post a message email: RPG400-L@midrange.com
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/cgi-bin/listinfo/rpg400-l
> or email: RPG400-L-request@midrange.com
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/rpg400-l.
>
>
>
>
>
> _______________________________________________
> This is the RPG programming on the AS400 / iSeries (RPG400-L)
> mailing list
> To post a message email: RPG400-L@midrange.com
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/cgi-bin/listinfo/rpg400-l
> or email: RPG400-L-request@midrange.com
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/rpg400-l.
>