sHelp
                                     MM.PUR.FAC
     i   2
 default.facility
 main
   authorized.users
   corporations
   vendor.acct.no.map

 Ì     i   2
default.facility
&(M)MWD

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

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

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

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 corporation                  4 FREE     L  MIS.GL.CORP    gvCN                                                    
 corp.primary.fac             1 YN       L                 &(M)MW[mw]C[gvCN]|0                                         
 Ì   €   i   2
vendor.acct.no.map
[mnemonic,  vendor.num]
&(M)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                 &(M)MW[mw]VN[gr]                                            

 Index Files                        Subscripts/Physical Base

 corporation.x                      [corporation,mnemonic] = corp.primary.fac
                                      &(M)MWC[gvCN,mw]