Re: Free format D spec question

[Jon Paris <jon.paris@xxxxxxxxxxxxxx>]

Off the top of my pointy little head:

dcl ttl_grand like(ttl_owner: 2);


On 2014-06-02, at 5:30 PM, "Englander, Douglas" <Douglas_Englander@xxxxxxxxxxxxx> wrote:

> I was able to get the PTF installed, and now the source is compiling. Now I have another question:
>
> In fixed form ILERPG, I can define a field LIKE() another field, and tell the system to add two positions to it such as:
>
>
>     d ttl_grand                     +2    like(ttl_owner)    
>
>
> Is there an equivalent syntax for a free format D spec to perform the above function? I want to make a grand total field larger (by two) than the individual fields that it accumulates to prevent an overflow situation.
>
> Thank you,
>
> Doug
>
> -- 
> This is the RPG programming on the IBM i (AS/400 and iSeries) (RPG400-L) mailing list
> To post a message email: RPG400-L@xxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
> or email: RPG400-L-request@xxxxxxxxxxxx
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/rpg400-l.

Jon Paris

www.partner400.com
www.SystemiDeveloper.com