RE: MOVE opcode in freeform (was Strange behavior w/%editc)

This probably flies in the face of the "all free or no free" convention, but
rather than perform mass conversions I have been slowly converting chunks of
code to /free as I work on them with all new development in /free.  This
allows me to migrate towards /free without a concentrated effort and without
feeling like I'm converting for conversions sake.  I don't usually do a line
at a time, but a small logic block like an if statement or a do loop.

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: Wednesday, February 27, 2002 11:20 AM
> To: rpg400-l@midrange.com
> Subject: RE: MOVE opcode in freeform (was Strange behavior w/%editc)
>
>
>
> The reason I do it that way is to allow for growth in the
> future.  If I
> didn't do the /free, /end-free for one line then the next person isn't
> going to convert it to free format when they add 'just one or
> two lines'.
> At which point DO they convert it to free format?
>
> 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:
> MOVE opcode in freeform (was Strange behavior w/%editc)
>                     drange.com
>
>
>                     02/27/2002 11:05
>                     AM
>                     Please respond to
>                     rpg400-l
>
>
>
>
>
>
> Does this prove my point on free form posted on this list?
>
> (From a recent posting...)
>
>      C/exec sql
>      C+ Select tptlib into :retFieldX
>      C+ from eis/tptype
>      C+ where tpttype=:xtptType
>      C/end-exec
>       /free
>        return retFieldX;
>       /end-free
>
>
>
> _______________________________________________
> 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.
>