sHelp
                                     MIS.VEN
     i   2
   mis.vendor
     mis.vendor.ap.contacts
       mis.ven.ap.contact.email
     mis.ven.dict.queries
       mis.ven.dict.mult.queries
     mis.vendor.direct.deposit.bank
     mis.vendor.mm.contacts
       MIS.VEN.mm.contacts.email
     mis.vendor.name.and.addr.email
     mis.vendor.email.addr.ap
     mis.vendor.name.and.addr.remit
       mis.ven.name.and.add.remit.eml
     mis.vendor.pha.contacts
       mis.ven.pha.contact.email
     mis.vendor.terms.discounts
     mis.ven.vf.main
       mis.ven.vf.ap.contacts
         mis.ven.vf.ap.contact.email
       mis.ven.vf.mm.contacts
         mis.ven.vf.contact.email
       mis.ven.vf.name.and.add.emails
       mis.vendor.vf.email.addr.ap
       mis.ven.vf.name.and.add.remit
         mis.ven.vf.name.add.remit.eml
       mis.ven.vf.pha.contacts
       mis.ven.vf.terms.discounts
   mis.ven.cds.file
     mis.ven.cds.mnemonic.file

 Ì     i   2
mis.vendor    (main) 
[number]
\GR[gr]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 number                      11 FREE     L                 gr                                                          
 account.number              17 FREE     L                 \GR[gr]DD|0                                                 
 account.type                 1 CHOICE   L                 \GR[gr]DD|1                                                 
 active                       1 YN       L                 \GR[gr]|0                                                   
 addr.1                      35 FREE     L                 \GR[gr]P|2                                                  
 addr.2                      35 FREE     L                 \GR[gr]P|3                                                  
 addr.3                      35 FREE     L                 \GR[gr]P|4                                                  
 addr.alt                    35 FREE     L                 \GR[gr]P["ALT"]|0                                           
 allow.jit                    1 YN       L                 \GR[gr]M|2                                                  
 ap.addr.1                   35 FREE     L                 \GR[gr]A|2                                                  
 ap.addr.2                   35 FREE     L                 \GR[gr]A|3                                                  
 ap.addr.3                   35 FREE     L                 \GR[gr]A|4                                                  
 ap.addr.alt                 35 FREE     L                 \GR[gr]A["ALT"]|0                                           
 ap.city                     20 FREE     L                 \GR[gr]A["A"]|0                                             
 ap.name                     35 FREE     L                 \GR[gr]A|0                                                  
 ap.name.2                   35 FREE     L                 \GR[gr]A|1                                                  
 ap.name.and.number          48 FREE     L                 VAL=(@MIS.VEN.ap.name_"  "_@MIS.VEN.val.number'="  ")       
 ap.postal.code              10 FREE     L                 \GR[gr]A["A"]|2                                             
 ap.state                     2 FREE     L                 \GR[gr]A["A"]|1                                             
 auto.hold                    1 YN       L                 \GR[gr]|3                                                   
 autoverify.po                1 YN       L                 \GR[gr]M|4                                                  
 bank.acc                    10 FREE     L  AP.BANK        \GR[gr]|5                                               
 bill.to.account             20 FREE     L                 \GR[gr]M|3                                                  
 block.activity               1 YN       L                 \GR[gr]|21                                                  
 city                        20 FREE     L                 \GR[gr]P["A"]|0                                             
 contract                     1 YN       L                 \GR[gr]M|1                                                  
 dft.po.interface            15 FREE     L  MM.EDI.PROGRAM \GR[gr]|15                                              
 expense.type                15 FREE     L  MIS.EXP.TYPE   \GR[gr]|20                                              
 fax.attention               25 FREE     L                 \GR[gr]F|1                                                  
 fax.number                  24 PHONE    L                 \GR[gr]F|0                                                  
 fed.id.num                  12 FREE     L                 \GR[gr]|7                                                   
 fed.id.num.type              3 CHOICE   L                 \GR[gr]|19                                                  
 filing.database             12 FREE     L  MIS.APPL       \GR[gr]|12                                              
 filing.user                 10 FREE     L  MIS.USER       \GR[gr]|13                                              
 fob                         35 FREE     L                 \GR[gr]|9                                                   
 foreign.1099                 1 YN       L                 \GR[gr]|24                                                  
 index.id                    35 FREE     L                                                                             
 inv.ee                       1 YN       L                 \GR[gr]|11                                                  
 last.update                 50 FREE     L                 \GR[gr]UPD                                                  
 main.phone.number           18 PHONE    L                 \GR[gr]M|0                                                  
 max.inv.amnt                11 MONEY    R                 \GR[gr]|2                                                   
 misc                         1 YN       L                 \GR[gr]|16                                                  
 mm.expected.delivery.days    3 INT      R                 \GR[gr]MM|0                                                 
 mnemonic                    10 FREE     L                 \GR[gr]|1                                                   
 name                        35 FREE     L                 \GR[gr]P|0                                                  
 name.2                      35 FREE     L                 \GR[gr]P|1                                                  
 name.and.number             48 FREE     L                 VAL=(@MIS.VEN.name_"  "_@MIS.VEN.val.number'="  ")          
 no.tax.rate                  1 YN       L                 VAL=IF{@tax.rate_.=. "Y";"N"}                               
 note.account                17 FREE     L                 \GR[gr]DD|3                                                 
 note.bank.acc               10 FREE     L  AP.BANK        \GR[gr]DD|2                                             
 note.date                    8 DATE     L                 \GR[gr]DD|5                                                 
 note.type                    1 CHOICE   L                 \GR[gr]DD|4                                                 
 our.acct.number             20 FREE     L                 \GR[gr]|6                                                   
 pha.list.ck                  1 YN       L                 VAL=IF{IF{/BY=1 index.id=@mnemonic;/BY=2 index.id=@nam      
                                                           VAL=e!(index.id=@remit.name);index.id=number} "Y";"N"}      
 pha.min.ord.amt              8 MONEY    R                 \GR[gr]PHA|0                                                
 postal.code                 10 FREE     L                 \GR[gr]P["A"]|2                                             
 print.1099                   1 YN       L                 \GR[gr]|17                                                  
 registration.number         15 FREE     L                 \GR[gr]|18                                                  
 remit.override               1 YN       L                 \GR[gr]|4                                                   
 send.cover.page              1 YN       L                 \GR[gr]|22                                                  
 state                        2 FREE     L                 \GR[gr]P["A"]|1                                             
 tax.rate                     6 DEC3     R                 \GR[gr]|14                                                  
 tax.rate.3d                  6 DEC3     R                 VAL=(@tax.rate:3D)                                          
 terms.desc                  35 FREE     L                 \GR[gr]|8                                                   
 terms.net                   15 FREE     L                 \GR[gr]T|1                                                  
 terms.type                   3 FREE     L                 \GR[gr]T|0                                                  
 transit.number               9 INT      R                 \GR[gr]DD|6                                                 
 val.number                  11 FREE     L                 \GR[gr]|10                                                  
 vf.fac.count                 3 PINT     R                 \GR[gr]V|0                                                  
 Ì     i   2
mis.vendor.ap.contacts    (ap.contacts) 
[number, ap.contact]
\GR[gr]C[grC]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 ap.contact                   2 PINT     R                 grC                                                         
 ap.contact.comment          30 FREE     L                 \GR[gr]C[grC]|2                                             
 ap.contact.name             20 FREE     L                 \GR[gr]C[grC]|0                                             
 ap.contact.phone            20 PHONE    L                 \GR[gr]C[grC]|1                                             
 ap.contact.view              0 FREE     L                 VAL=IF{@W.yes.no("View Contacts? ") %MIS.VEN.view.ap.c      
                                                           VAL=ontacts.S("")}                                          
 Ì     i   2
mis.ven.ap.contact.email    (ap.contact.email) 
[number,ap.contact, ap.contact.email.seq]
\GR[gr]C[grC]EM[grEMA]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 ap.contact.email.seq         1 PINT     R                 grEMA                                                       
 ap.contact.email.address    40 FREE     L                 \GR[gr]C[grC]EM[grEMA]|0                                    
 Ì     i   2
mis.ven.dict.queries    (customer.defined.queries) 
[number, cd.query]
\GR[gr]CD[ggv]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 cd.query                    10 FREE     L  MIS.QUERY      ggv                                                     
 cd.response                 75 QRY.RESP L                 \GR[gr]CD[ggv]|0                                            
 view.cds                     0 FREE     L                 VAL=IF{%MIS.SCREEN.kernel(@customer.defined.screen,^@R      
                                                           VAL=oot(@customer.defined.queries[number]),"","",6,0,I      
                                                           VAL=F{QRY "NV0";"YV0"},QRY,"NN")^QRY#0P^@Z.lastkey,QRY      
                                                           VAL=|1^QRY,""}                                              
 view.cds.screen              0 FREE     L                 VAL=%MIS.VEN.view.cds.S("")                                 
 Ì     i   2
mis.ven.dict.mult.queries    (multiple.queries) 
[number,cd.query, cdm.seq.no]
\GR[gr]CD[ggv]M[ggvN]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 cdm.seq.no                   3 PINT     R                 ggvN                                                        
 cdm.response                75 QRY.RESP L                 \GR[gr]CD[ggv]M[ggvN]|0                                     
 Ì     i   2
mis.vendor.direct.deposit.bank    (direct.deposits.by.bank) 
[number, bb.bank.acct]
\GR[gr]DDB[kk]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 bb.bank.acct                10 FREE     L  AP.BANK        kk                                                      
 bb.account.number           17 FREE     L                 \GR[gr]DDB[kk]|2                                            
 bb.account.type              1 CHOICE   L                 \GR[gr]DDB[kk]|3                                            
 bb.active                    1 YN       L                 \GR[gr]DDB[kk]|0                                            
 bb.note.account             17 FREE     L                 \GR[gr]DDB[kk]|5                                            
 bb.note.bank.acc            10 FREE     L                 \GR[gr]DDB[kk]|4                                            
 bb.note.date                 8 DATE     L                 \GR[gr]DDB[kk]|7                                            
 bb.note.type                 1 CHOICE   L                 \GR[gr]DDB[kk]|6                                            
 bb.transit.number            9 INT      R                 \GR[gr]DDB[kk]|1                                            
 Ì     i   2
mis.vendor.mm.contacts    (mm.contacts) 
[number, mm.contact]
\GR[gr]CM[grC]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 mm.contact                   2 PINT     R                 grC                                                         
 mm.contact.comment          30 FREE     L                 \GR[gr]CM[grC]|2                                            
 mm.contact.name             20 FREE     L                 \GR[gr]CM[grC]|0                                            
 mm.contact.phone            20 PHONE    L                 \GR[gr]CM[grC]|1                                            
 mm.contact.view              0 FREE     L                 VAL=IF{@W.yes.no("View Contacts? ") %MIS.VEN.view.mm.c      
                                                           VAL=ontacts.S("")}                                          
 Ì     i   2
MIS.VEN.mm.contacts.email    (mm.contacts.email) 
[number,mm.contact, mm.contacts.email.q]
\GR[gr]CM[grC]EM[grEQ]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 mm.contacts.email.q          2 PINT     R                 grEQ                                                        
 mm.contacts.email.addr      40 FREE     L                 \GR[gr]CM[grC]EM[grEQ]|0                                    
 Ì     i   2
mis.vendor.name.and.addr.email    (name.and.add.emails) 
[number, email.seq]
\GR[gr]P["EM",grEMQ]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 email.seq                    3 INT      R                 grEMQ                                                       
 email.addr                  40 FREE     L                 \GR[gr]P["EM",grEMQ]|0                                      
 Ì     i   2
mis.vendor.email.addr.ap    (name.and.add.ap.emails) 
[number, ap.email.seq]
\GR[gr]A["EM",grEMB]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 ap.email.seq                 3 INT      R                 grEMB                                                       
 ap.email.addr               40 FREE     L                 \GR[gr]A["EM",grEMB]|0                                      
 Ì     i   2
mis.vendor.name.and.addr.remit    (name.and.add.remit) 
[number, remit.seq.no]
\GR[gr]R[grn]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 remit.seq.no                 3 INT      R                 grn                                                         
 remit.1099                   1 YN       L                 \GR[gr]R[grn]|9                                             
 remit.addr.1                35 FREE     L                 \GR[gr]R[grn]|2                                             
 remit.addr.2                35 FREE     L                 \GR[gr]R[grn]|3                                             
 remit.addr.3                35 FREE     L                 \GR[gr]R[grn]|4                                             
 remit.addr.alt              35 FREE     L                 \GR[gr]R[grn]ALT|0                                          
 remit.city                  20 FREE     L                 \GR[gr]R[grn]A|0                                            
 remit.dft                    1 YN       L                 \GR[gr]R[grn]|8                                             
 remit.mnemonic              12 FREE     L                 \GR[gr]R[grn]|7                                             
 remit.name                  35 FREE     L                 \GR[gr]R[grn]|0                                             
 remit.name.2                35 FREE     L                 \GR[gr]R[grn]|1                                             
 remit.postal.code           10 FREE     L                 \GR[gr]R[grn]A|2                                            
 remit.print                125 FREE     L                 VAL=@remit.name_" "_@remit.name.2_" "_@remit.addr.1_"       
                                                           VAL="_@remit.addr.2_" "_@remit.city_" "_@remit.state_"      
                                                           VAL= "_@remit.postal.code_" "_@remit.email.addr[1]          
 remit.state                  2 FREE     L                 \GR[gr]R[grn]A|1                                            
 Ì     i   2
mis.ven.name.and.add.remit.eml    (name.and.add.remit.emails) 
[number,remit.seq.no, remit.email.seq]
\GR[gr]R[grn]EM[grEMD]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 remit.email.seq              3 INT      R                 grEMD                                                       
 remit.email.addr            40 FREE     L                 \GR[gr]R[grn]EM[grEMD]|0                                    
 Ì     i   2
mis.vendor.pha.contacts    (pha.contacts) 
[number, pha.contact]
\GR[gr]CP[grC]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 pha.contact                  2 PINT     R                 grC                                                         
 pha.contact.comment         30 FREE     L                 \GR[gr]CP[grC]|2                                            
 pha.contact.name            20 FREE     L                 \GR[gr]CP[grC]|0                                            
 pha.contact.phone           20 PHONE    L                 \GR[gr]CP[grC]|1                                            
 Ì     i   2
mis.ven.pha.contact.email    (pha.contact.email) 
[number,pha.contact, pha.contact.email.addr]
\GR[gr]CP[grC]EM[grEMP]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 pha.contact.email.addr       1 PINT     R                 grEMP                                                       
 pha.contact.email.address   40 FREE     L                 \GR[gr]CP[grC]EM[grEMP]|0                                   
 Ì     i   2
mis.vendor.terms.discounts    (terms.discounts) 
[number, terms.date]
\GR[gr]T["D",grTD]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 terms.date                  15 FREE     L                 grTD                                                        
 terms.percent               10 PDEC     R                 \GR[gr]T["D",grTD]                                          
 Ì     i   2
mis.ven.vf.main    (vf.main) 
[number, vf.pur.fac]
\GR[gr]VF[mw]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 vf.pur.fac                  10 FREE     L  MIS.PUR.FAC    mw                                                      
 vf.account.number           17 FREE     L                 \GR[gr]VF[mw]DD|0                                           
 vf.account.type              1 CHOICE   L                 \GR[gr]VF[mw]DD|1                                           
 vf.active                    1 YN       L                 \GR[gr]VF[mw]|0                                             
 vf.addr.1                   35 FREE     L                 \GR[gr]VF[mw]P|2                                            
 vf.addr.2                   35 FREE     L                 \GR[gr]VF[mw]P|3                                            
 vf.addr.3                   35 FREE     L                 \GR[gr]VF[mw]P|4                                            
 vf.addr.alt                 35 FREE     L                 \GR[gr]VF[mw]P["ALT"]|0                                     
 vf.allow.jit                 1 YN       L                 \GR[gr]VF[mw]|22                                            
 vf.ap.addr.1                35 FREE     L                 \GR[gr]VF[mw]A|2                                            
 vf.ap.addr.2                35 FREE     L                 \GR[gr]VF[mw]A|3                                            
 vf.ap.addr.3                35 FREE     L                 \GR[gr]VF[mw]A|4                                            
 vf.ap.addr.alt              35 FREE     L                 \GR[gr]VF[mw]A["ALT"]|0                                     
 vf.ap.city                  20 FREE     L                 \GR[gr]VF[mw]A["A"]|0                                       
 vf.ap.name                  35 FREE     L                 \GR[gr]VF[mw]A|0                                            
 vf.ap.name.2                35 FREE     L                 \GR[gr]VF[mw]A|1                                            
 vf.ap.state                  2 FREE     L                 \GR[gr]VF[mw]A["A"]|1                                       
 vf.ap.zip                   10 FREE     L                 \GR[gr]VF[mw]A["A"]|2                                       
 vf.auto.hold                 1 YN       L                 \GR[gr]VF[mw]|3                                             
 vf.autoverify.po             1 YN       L                 \GR[gr]VF[mw]M|4                                            
 vf.bank.acc                 10 FREE     L  AP.BANK        \GR[gr]VF[mw]|5                                         
 vf.bill.to.account          20 FREE     L                 \GR[gr]VF[mw]M|3                                            
 vf.block.activity            1 YN       L                 \GR[gr]VF[mw]|21                                            
 vf.city                     20 FREE     L                 \GR[gr]VF[mw]P["A"]|0                                       
 vf.contract                  1 YN       L                 \GR[gr]VF[mw]M|1                                            
 vf.dft.po.interface         15 FREE     L  MM.EDI.PROGRAM \GR[gr]VF[mw]|15                                        
 vf.expense.type             15 FREE     L  MIS.EXP.TYPE   \GR[gr]VF[mw]|20                                        
 vf.fax.attention            25 FREE     L                 \GR[gr]VF[mw]F|1                                            
 vf.fax.number               24 PHONE    L                 \GR[gr]VF[mw]F|0                                            
 vf.fax.send.cover.sheet      1 YN       L                 \GR[gr]VF[mw]F|2                                            
 vf.fed.id.num               12 FREE     L                 \GR[gr]VF[mw]|7                                             
 vf.fed.id.num.type           3 CHOICE   L                 \GR[gr]VF[mw]|19                                            
 vf.filing.database          12 FREE     L  MIS.APPL       \GR[gr]VF[mw]|12                                        
 vf.filing.user              10 FREE     L  MIS.USER       \GR[gr]VF[mw]|13                                        
 vf.fob                      35 FREE     L                 \GR[gr]VF[mw]|9                                             
 vf.foreign.1099              1 YN       L                 \GR[gr]VF[mw]|24                                            
 vf.id.flag                   1 FREE     L                 VAL=IF{@p.vf.active[number,CD] "Y"}                         
 vf.inv.ee                    1 YN       L                 \GR[gr]VF[mw]|11                                            
 vf.last.update              50 FREE     L                 \GR[gr]VF[mw]UPD                                            
 vf.main.phone.number        18 PHONE    L                 \GR[gr]VF[mw]M|0                                            
 vf.max.inv.amnt             11 MONEY    R                 \GR[gr]VF[mw]|2                                             
 vf.misc                      1 YN       L                 \GR[gr]VF[mw]|16                                            
 vf.mm.expected.del.days      3 INT      R                 \GR[gr]VF[mw]|23                                            
 vf.mnemonic                 10 FREE     L                 \GR[gr]VF[mw]|1                                             
 vf.name                     35 FREE     L                 \GR[gr]VF[mw]P|0                                            
 vf.name.2                   35 FREE     L                 \GR[gr]VF[mw]P|1                                            
 vf.no.tax.rate               1 YN       L                 VAL=IF{@vf.tax.rate_.=. "Y";"N"}                            
 vf.note.account             17 FREE     L                 \GR[gr]VF[mw]DD|3                                           
 vf.note.bank.acc            10 FREE     L  AP.BANK        \GR[gr]VF[mw]DD|2                                       
 vf.note.date                 8 DATE     L                 \GR[gr]VF[mw]DD|5                                           
 vf.note.type                 1 CHOICE   L                 \GR[gr]VF[mw]DD|4                                           
 vf.number                   11 FREE     L                                                                             
 vf.our.acct.number          20 FREE     L                 \GR[gr]VF[mw]|6                                             
 vf.print.1099                1 YN       L                 \GR[gr]VF[mw]|17                                            
 vf.registration.number      15 FREE     L                 \GR[gr]VF[mw]|18                                            
 vf.remit.override            1 YN       L                 \GR[gr]VF[mw]|4                                             
 vf.state                     2 FREE     L                 \GR[gr]VF[mw]P["A"]|1                                       
 vf.tax.rate                  6 DEC3     R                 \GR[gr]VF[mw]|14                                            
 vf.tax.rate3d                6 DEC3     R                 VAL=(@vf.tax.rate:3D)                                       
 vf.terms.desc               35 FREE     L                 \GR[gr]VF[mw]|8                                             
 vf.terms.net                15 FREE     L                 \GR[gr]VF[mw]T|1                                            
 vf.terms.type                3 FREE     L                 \GR[gr]VF[mw]T|0                                            
 vf.val.number               11 FREE     L                 \GR[gr]VF[mw]|10                                            
 vf.zip                      10 FREE     L                 \GR[gr]VF[mw]P["A"]|2                                       
 Ì     i   2
mis.ven.vf.ap.contacts    (vf.ap.contacts) 
[number,vf.pur.fac, vf.ap.contact]
\GR[gr]VF[mw]C[grC]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 vf.ap.contact                2 PINT     R                 grC                                                         
 vf.ap.contact.comment       30 FREE     L                 \GR[gr]VF[mw]C[grC]|2                                       
 vf.ap.contact.name          20 FREE     L                 \GR[gr]VF[mw]C[grC]|0                                       
 vf.ap.contact.phone         20 PHONE    L                 \GR[gr]VF[mw]C[grC]|1                                       
 vf.ap.contact.view           0 FREE     L                 VAL=IF{@W.yes.no("View Contacts?") %MIS.VEN.view.ap.co      
                                                           VAL=ntacts.f.S("")}                                         
 Ì     i   2
mis.ven.vf.ap.contact.email    (vf.ap.contact.email) 
[number,vf.pur.fac,vf.ap.contact, vf.ap.contact.email.addr]
\GR[gr]VF[mw]C[grC]EM[grEVA]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 vf.ap.contact.email.addr     1 PINT     R                 grEVA                                                       
 vf.ap.contact.email.addrs   40 FREE     L                 \GR[gr]VF[mw]C[grC]EM[grEVA]|0                              
 Ì     i   2
mis.ven.vf.mm.contacts    (vf.mm.contacts) 
[number,vf.pur.fac, vf.mm.contact]
\GR[gr]VF[mw]CM[grC]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 vf.mm.contact                2 PINT     R                 grC                                                         
 vf.mm.contact.comment       30 FREE     L                 \GR[gr]VF[mw]CM[grC]|2                                      
 vf.mm.contact.name          20 FREE     L                 \GR[gr]VF[mw]CM[grC]|0                                      
 vf.mm.contact.phone         20 PHONE    L                 \GR[gr]VF[mw]CM[grC]|1                                      
 vf.mm.contact.view           0 FREE     L                 VAL=IF{@W.yes.no("View Contacts? ") %MIS.VEN.view.mm.c      
                                                           VAL=ontacts.f.S("")}                                        
 Ì     i   2
mis.ven.vf.contact.email    (vf.mm.contact.email) 
[number,vf.pur.fac,vf.mm.contact, vf.mm.contact.email.addr]
\GR[gr]VF[mw]CM[grC]EM[grECA]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 vf.mm.contact.email.addr     1 PINT     R                 grECA                                                       
 vf.mm.contact.email.addrs   40 FREE     L                 \GR[gr]VF[mw]CM[grC]EM[grECA]|0                             
 Ì     i   2
mis.ven.vf.name.and.add.emails    (vf.name.and.add.emails) 
[number,vf.pur.fac, vf.email.seq]
\GR[gr]VF[mw]P["EM",grEVQ]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 vf.email.seq                 3 INT      R                 grEVQ                                                       
 vf.email.addr               40 FREE     L                 \GR[gr]VF[mw]P["EM",grEVQ]|0                                
 Ì     i   2
mis.vendor.vf.email.addr.ap    (vf.name.and.add.ap.emails) 
[number,vf.pur.fac, vf.ap.email.seq]
\GR[gr]VF[mw]A["EM",grEVB]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 vf.ap.email.seq              3 INT      R                 grEVB                                                       
 vf.ap.email.addr            40 FREE     L                 \GR[gr]VF[mw]A["EM",grEVB]|0                                
 Ì     i   2
mis.ven.vf.name.and.add.remit    (vf.name.and.add.remit) 
[number,vf.pur.fac, vf.remit.seq.no]
\GR[gr]VF[mw]R[grn]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 vf.remit.seq.no              3 INT      R                 grn                                                         
 vf.remit.addr.1             35 FREE     L                 \GR[gr]VF[mw]R[grn]|2                                       
 vf.remit.addr.2             35 FREE     L                 \GR[gr]VF[mw]R[grn]|3                                       
 vf.remit.addr.3             35 FREE     L                 \GR[gr]VF[mw]R[grn]|4                                       
 vf.remit.addr.alt           35 FREE     L                 \GR[gr]VF[mw]R[grn]ALT|0                                    
 vf.remit.city               20 FREE     L                 \GR[gr]VF[mw]R[grn]A|0                                      
 vf.remit.dft                 1 YN       L                 \GR[gr]VF[mw]R[grn]|8                                       
 vf.remit.mnemonic           12 FREE     L                 \GR[gr]VF[mw]R[grn]|7                                       
 vf.remit.name               35 FREE     L                 \GR[gr]VF[mw]R[grn]|0                                       
 vf.remit.name.2             35 FREE     L                 \GR[gr]VF[mw]R[grn]|1                                       
 vf.remit.print             125 FREE     L                 VAL=@vf.remit.name_" "_@vf.remit.name.2_" "_@vf.remit.      
                                                           VAL=addr.1_" "_@vf.remit.addr.2_" "_@vf.remit.city_" "      
                                                           VAL=_@vf.remit.state_" "_@vf.remit.zip_" "_@vf.remit.e      
                                                           VAL=mail.addr[1]                                            
 vf.remit.state               2 FREE     L                 \GR[gr]VF[mw]R[grn]A|1                                      
 vf.remit.zip                10 FREE     L                 \GR[gr]VF[mw]R[grn]A|2                                      
 Ì     i   2
mis.ven.vf.name.add.remit.eml    (vf.name.and.add.remit.eml) 
[number,vf.pur.fac,vf.remit.seq.no, vf.remit.email.seq]
\GR[gr]VF[mw]R[grn]EM[grEVD]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 vf.remit.email.seq           3 INT      R                 grEVD                                                       
 vf.remit.email.addr         40 FREE     L                 \GR[gr]VF[mw]R[grn]EM[grEVD]|0                              
 Ì     i   2
mis.ven.vf.pha.contacts    (vf.pha.contacts) 
[number,vf.pur.fac, vf.pha.contact]
\GR[gr]VF[mw]CP[grC]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 vf.pha.contact               2 PINT     R                 grC                                                         
 vf.pha.contact.comment      30 FREE     L                 \GR[gr]VF[mw]CP[grC]|2                                      
 vf.pha.contact.name         20 FREE     L                 \GR[gr]VF[mw]CP[grC]|0                                      
 vf.pha.contact.phone        20 PHONE    L                 \GR[gr]VF[mw]CP[grC]|1                                      
 Ì     i   2
mis.ven.vf.terms.discounts    (vf.terms.discounts) 
[number,vf.pur.fac, vf.terms.date]
\GR[gr]VF[mw]T["D",grTD]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 vf.terms.date               15 FREE     L                 grTD                                                        
 vf.terms.percent            10 PDEC     R                 \GR[gr]VF[mw]T["D",grTD]                                    
 Ì     i   2
mis.ven.cds.mnemonic.file    (screen.mnemonics) 
[vendor.cds]
\GR.CDS["S",gr]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 vendor.cds                  11 FREE     L  MIS.VEN        gr                                                      
 customer.defined.screen     15 FREE     L  MIS.SCREEN     \GR.CDS["S",gr]                                         
 Ì       2
 INDEX FILE/INTERNAL NAME           SUBSCRIPTS/PHYSICAL BASE

 mis.vendor.ap.name.index           [ap.name,number] = active
   ap.name.x                          \GRA[grA,gr]

 mis.vendor.id.index                [index.id,number] = active
   id.x                               \GRI[grI,gr]

 mis.vendor.name.index              [name,number] = active
   name.x                             \GRN[grN,gr]