Re: Write packed number to program-described file using imbedded SQL

["Timothy Adair" <tadair@xxxxxxxxxxxxxxxx>]

I started my career with RPG II on a System/34, and when working on 
converting old programs I sometimes revert back to old techniques.

I'm just having a blast refereeing program-described-files-vs.-SQL. 
Thankfully we will be converting to externally-described files in the 
future.

TA

Romans 5:8




"Jon Paris" <jon.paris@xxxxxxxxxxxxxx> wrote in message 
news:mailman.3280.1260895985.31599.rpg400-l@xxxxxxxxxxxxxxx
> OK - but why not code it in the more obvious RPG IV length based  style? 
> The use of the Overlay keyword makes it really obvious that  they are two 
> versions of the same thing.
>
> From/To notation is so 1990s don't you think?
>
>
> i.e.
>
> >   D                 ds
> >   D Num                  7p 4
> >   D CharF                4     Overlay(Num)
>
> Jon Paris
>
> www.Partner400.com
> www.SystemiDeveloper.com
>
>
>
> On Dec 15, 2009, at 10:17 AM, rpg400-l-request@xxxxxxxxxxxx wrote:
>
> > That was it!  I finally got all the little ducks in a row, as in:
> >
> >   D                 ds
> >   D Num                  1      4p 4
> >   D CharF                  1      4
> >
> > Then set Num = My7digitnum