sHelp
                                     MM.PUR.FAC
     i   2
   mm.pur.fac.default.facility
   mm.purch.fac.information
     mm.purch.fac.authorized.users
     mm.purch.fac.corporations
     vendor.acct.no.map

 Ì     i   2
mm.pur.fac.default.facility    (default.facility) 
&MWD

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 dft.facility                10 FREE     L                 &MWD|0                                                      
 dft.last.update             10 FREE     L                 &MWDUPD                                                     
 Ì     i   2
mm.purch.fac.information    (main) 
[mnemonic]
&MW[mw]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 mnemonic                    10 FREE     L                 mw                                                          
 active                       1 YN       L                 &MW[mw]|0                                                   
 ap.database                 12 FREE     L  MIS.APPL       &MW[mw]|6                                               
 deliv.addr1                 30 FREE     L                 &MW[mw]DA|0                                                 
 deliv.addr2                 30 FREE     L                 &MW[mw]DA|1                                                 
 deliv.addr3                 30 FREE     L                 &MW[mw]DA|2                                                 
 exempt.purch.cert           20 FREE     L                 &MW[mw]|2                                                   
 exempt.purch.cert.state      5 FREE     L                 &MW[mw]|3                                                   
 fac.addr1                   30 FREE     L                 &MW[mw]FA|0                                                 
 fac.addr2                   30 FREE     L                 &MW[mw]FA|1                                                 
 fac.addr3                   30 FREE     L                 &MW[mw]FA|2                                                 
 invoice.addr1               30 FREE     L                 &MW[mw]IA|0                                                 
 invoice.addr2               30 FREE     L                 &MW[mw]IA|1                                                 
 invoice.addr3               30 FREE     L                 &MW[mw]IA|2                                                 
 last.update                 10 FREE     L                 &MW[mw]UPD                                                  
 mis.pur.fac.ptr             10 FREE     L                 &MW[mw]|7                                                   
 name                        40 FREE     L                 &MW[mw]|1                                                   
 po.form.pgm                 15 FREE     L  MM.PROGRAM     &MW[mw]|4                                               
 return.po.pgm               15 FREE     L  MM.PROGRAM     &MW[mw]|5                                               
 Ì     i   2
mm.purch.fac.authorized.users    (authorized.users) 
[mnemonic, auth.user]
&MW[mw]U[gu]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 auth.user                   10 FREE     L  MIS.USER       gu                                                      
 Ì     i   2
mm.purch.fac.corporations    (corporations) 
[mnemonic, corporation]
&MW[mw]C[gn]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 corporation                  4 FREE     L  MIS.GL.CORP    gn                                                      
 corp.primary.fac             1 YN       L                 &MW[mw]C[gn]|0                                              
 Ì     i   2
vendor.acct.no.map    (vendor.acct.no.map) 
[mnemonic, vendor.num]
&MW[mw]VN[gr]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 vendor.num                  11 FREE     L  MIS.VEN        gr                                                      
 account.num                 20 FREE     L                 &MW[mw]VN[gr]                                               
 Ì       2
 INDEX FILE/INTERNAL NAME           SUBSCRIPTS/PHYSICAL BASE

 mm.purch.fac.corporation.index     [corporation,mnemonic] = corp.primary.fac
   corporation.x                      &MWC[gn,mw]