RE: Record Number

Even better, Joel, define a PF with the SDS fields, then just externally 
define a data structure like the PF.  That way every field is at your beck 
& call.   Steve Easton shows how:  (If you can't find it, let me  know.  I 
can send my copy to someone to post for everyone to scarf up if they 
like.)

     A***************************************************************** 
     A*                                                               * 
     A*   SYSTEM DATA STRUCTURE                            .          * 
     A*   Not Copyrighted                                             * 
     A*   Freeware, put into any and all programs as desired          * 
     A*   Give it away, distribute as part of any program             * 
     A*   Author, Steve Easton, Midrange System Design                * 
     A*   e-mail, easton@ionet.net                                    * 
     A*                                                               * 
     A*                                                               * 
     A*                                                               * 
     A***************************************************************** 
     A          R RSDS 
     A* THE FIELDS FOR THE DATA AREA: 
     A                                      TEXT('DATA AREA:') 
     A            PRGNAM        10          COLHDG('Program Name') 
     A                                      TEXT('ID') 

etc....
_______________________
Booth Martin
boothm@earth.goddard.edu
http://www.spy.net/~booth
_______________________




Joel Fritz <JFritz@sharperimage.com>
Sent by: owner-rpg400-l@midrange.com
02/16/2000 07:39 PM
Please respond to RPG400-L

 
        To:     "'RPG400-L@midrange.com'" <RPG400-L@midrange.com>
        cc: 
        Subject:        RE: Record Number
INFDS is real RPG arcana.  It is documented.  I keep a print out from the
manual on my desk along with the print out of edit codes.  A better
organized person than I would have a complete INFDS in his/her standard
program skeleton.


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