Re: Two unrelated questions

["Joep Beckeringh" <joep@xxxxxxxxxxxxxxxxxxx>]

> Question 2
>
> Dds_disc          ds             6
> DDC1WS                           2
> DDC2WS                           2
> DDC3WS                           2
> DarrDISCWS                1      6a   Dim(3)
>
> This data structure defines 3 fields which are from a display file. By
defining
> the array like this, the values from the screen are automatically moved
into it.
> For the life of me, I can't figure out how to define this if the same 3
fields
> were all packed decimals 2-long. Anyone know how to define this ?
>
>
> Regards
> John.

Just define them as zoned and Bob's your uncle.

Joep Beckeringh



+---
| This is the RPG/400 Mailing List!
| To submit a new message, send your mail to RPG400-L@midrange.com.
| To subscribe to this list send email to RPG400-L-SUB@midrange.com.
| To unsubscribe from this list send email to RPG400-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---