|
I have never understood the File Informational Data Structure to be printer files only. But there are fields in the data structure that are for data files only and other fields for printer files only. The following clip is the data structure I keyed in years ago, and have occassionially used. Sorry I didn't document each field (see RPG/400 Reference Manual). I've added some text for some of the obvious ones. Sorry for the bad cut & paste from Client Access. FXYZ IP E K DISK INFDS(XYZDS) D* * * * * * * * * * * * * * * * * * * * * D* * D* FILE INFORMATION DATA STRUCTURE * D* * D* * * * * * * * * * * * * * * * * * * * * D XYZDS DS D @FILE 1 8 D @OPEN 9 9 D @EOF 10 10 D @ISTAT 11 15 0 D @OCODE 16 21 D @ROUTE 22 29 D @ISEQ# 30 37 D @RECD 38 45 D @ERROR 46 52 D @MIODT 53 56 D @UN#1 57 80 D @ODPTY 81 82 D @NFILE 83 92 D @LIB 93 102 Library D @SPLDF 103 112 Spool File D @SFLIB 113 122 Spool File Lib D @SPLF# 123 124B 0 Spool File number D @PRECL 125 126B 0 D @SRECL 127 128B 0 D @MBRNM 129 138 member name D @IBUFL 139 142B 0 D @OBUFL 143 146B 0 D @DEVCL 147 148B 0 D @DKTLC 149 151 D @ROW 152 153B 0 row (on screen) D @COL 154 155B 0 column (on screen) D @#RCDS 156 159B 0 #records in file D @ACCES 160 161 D @DUPKY 162 162 D @SOURC 163 163 D @UCFBP 164 173 D @UCFBO 174 183 D @OFSET 184 185B 0 D @#RCDX 186 187B 0 D @OF# 188 189B 0 D @UN#2 190 240 D @OFFST 241 242B 0 D @PCNT 243 246B 0 D @GCNT 247 250B 0 D @PGCNT 251 254B 0 D @IOCNT 255 258B 0 D @CUROP 259 260 D @RFMT 261 270 D @DEVCL 271 272 D @DEVNM 273 282 D @IOLEN 283 286B 0 D @RTGNG 287 366 D @LINE# 367 368B 0 D @AID 369 369 D @UN#3 370 370 D @#XMIT 371 372B 0 D @UN#4 373 375 D @SFRRN 376 377B 0 D @UN#5 378 396 D @DBRRN 397 400B 0 File relative record # (rrn) D @DBKEY 401 528 hope this helps Jim ----- Original Message ----- From: "Mark A. Manske" <mmanske@minter-weisman.com> To: <RPG400-L@midrange.com> Sent: Friday, December 29, 2000 11:36 AM Subject: RE: QDMRTVFO API won't work - help > Thanks Scott, > > This did just what I needed it to do now - > > Anton mentioned the IFDS "Open Feedback Information" - > his point is a good one about the ovrscope; however; > as I have discovered this another point of IBM manuals mis-leading me - > reading online it appears to me that it is only valid for printer files - > I wish they had one spot(I have not seen one) that showed the entire > contents of the IFDS for all file types with positions/special names; > I am too quick to read and judge the examples(hmm I may have to slow down > on that one from now on) > > > Thank you all for the insight and help > and I wish you a save and happy new year... > > > Mark A. Manske > [mailto:mmanske@minter-weisman.com] > Sr. Project Lead > Minter-Weisman > > > +--- > | 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 > +--- +--- | 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 +---
As an Amazon Associate we earn from qualifying purchases.
This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].
Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.
midrange.com
