Re: Data structure using ExtName(file:format)

[boldt@xxxxxxxxxx]

Jade wrote:
>   I have three data sturctures defined as follows:
>
>   d $sfs_sfmods   e ds                    extname(mtntmpfld:sfl01)
>   d                                                 occurs(96)
>   d                                                 prefix($sfs_)
>   d                                                 export
>   d $sfs_sfFMT01  e ds                 extname(mtntmpfld:fmt01)
>   d                                                 prefix($sfs_)
>   d                                                 export
>   d $sfs_sfSFL01F e ds                 extname(mtntmpfld:sfl01f)
>   d                                                 prefix($sfs_)
>   d                                                 export
>
>   My problem is that it won't bring in all of the fields from
>   each of the formats when the program is compiled.
>   The data structure defined as an MODS brings in all of the
>   fields from the subfile; fields defined for both input
>   & output, output only and hidden.
>   The second and third data structures only bring in the fields
>   defined for both input & output and the hidden, but
>   excludes the output only fields.
>   Fmt01 is the control record of my subfile
>   and Sfl01F is the footer of the subfile.
>   Why would that make any difference?  What am I missing here?

Jade:

Currently, the RPG IV compiler only brings in the
input-capable fields for externally-described data
structures.

Hopefully, we can change that in a future release.
We'd like to enhance EXTNAME to allow you to specify
exactly which fields to include in the EDS.  (Input,
output, all, keys.)  This was actually item #8 in our
last enhancement poll.  However, only 41 people voted
for it, placing it in 4th last place in the standings.

Cheers!  Hans

Hans Boldt, ILE RPG Development, IBM Toronto Lab, boldt@ca.ibm.com

+---
| 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
+---