Data structure using ExtName {Boggled}

Whoaeee,  I never knew I could use Display Files as
external definitions, let alone subfiles.
My mind is boggled.  :}{)
Frank Kolmann

Date: Fri, 4 May 2001 15:02:55 -0500
>   From: "Jade Richtsmeier" <jade.richtsmeier@mcis.cog.mn.us>
>   Subject: Data structure using ExtName(file:format)
>
>   Hello to all,
>
>   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?
>
>   Thanks!!
>   Jade Richtsmeier
>   jade.richtsmeier@mcis
 
__________________________________________________________________
Get your own FREE, personal Netscape Webmail account today at 
http://webmail.netscape.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
+---