sHelp
                                     AP.CHECK
     i   2
   ap.check.file
     ap.check.activity
     ap.check.credit.memos
     ap.check.invoices
   ap.mc.check.schedule.bank.acc
       ap.mc.check.schedule.vendor
     ap.mc.check.sch.ven.ranges
   ap.check.schedule.bank.acc
     ap.check.schedule.vendor
     ap.check.schedule.ven.ranges

 Ì     i   2
ap.check.file    (main) 
[urn]
:KY[ky]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 urn                         20 URN      L                 ky                                                          
 address.override             1 YN       L                 :KY[ky]|11                                                  
 address.override.disp       10 FREE     L                 VAL=IF{@address.override="Y" "(Override)"}                  
 amount                      11 MONEY    R                 :KY[ky]|5                                                   
 bank.acc                    10 FREE     L  AP.BANK        :KY[ky]|0                                               
 check.number                10 PINT     L                 :KY[ky]|1                                                   
 date                         8 DATE     L                 :KY[ky]|4                                                   
 dd.compile.date              8 DATE     L                 :KY[ky]|17                                                  
 dd.number                   10 FREE     L                 :KY[ky]|16                                                  
 edi.session                  8 URN      L  AP.EDI         :KY[ky]|15                                              
 mc.payee.type               10 FREE     L  MIS.PY.TYP.DICT:KY[ky]|18                                              
 name.override                1 YN       L                 :KY[ky]|10                                                  
 name.override.disp          10 FREE     L                 VAL=IF{@name.override="Y" "(Override)"}                     
 new.payment                  1 YN       L                 :KY[ky]|12                                                  
 no.of.invoices               3 INT      R                 :KY[ky]|9                                                   
 payment.number               5 FREE     L                 :KY[ky]|8                                                   
 recon.by.tape                1 FREE     L                 :KY[ky]|14                                                  
 reg.date.subtitle           26 FREE     C                 VAL="FROM "_IF{b.date'=D(127) %Z.date.out(b.date);"BEG      
                                                           VAL=INNING"}_" TO "_IF{e.date'=D(127) %Z.date.out(e.da      
                                                           VAL=te);"END"}                                              
 reg.num.subtitle            29 FREE     C                 VAL="FROM "_IF{b.check.number'=D(127);"BEGINNING"}_" T      
                                                           VAL=O "_IF{e.check.number'=D(127);"END"}                    
 remit.addr.1                35 FREE     L                 :KY[ky]R|2                                                  
 remit.addr.2                35 FREE     L                 :KY[ky]R|3                                                  
 remit.addr.3                35 FREE     L                 :KY[ky]R|4                                                  
 remit.name                  35 FREE     L                 :KY[ky]R|0                                                  
 remit.name.2                35 FREE     L                 :KY[ky]R|1                                                  
 status                       9 CHOICE   L                 :KY[ky]|2                                                   
 status.comment              65 FREE     L                 :KY[ky]|7                                                   
 status.date                  8 DATE     L                 :KY[ky]|6                                                   
 system.flag                  1 FREE     L                 :KY[ky]|13                                                  
 vendor                      11 FREE     L  MIS.VEN        :KY[ky]|3                                               
 zcus.uk.remit.city          35 FREE     L                 :KY[ky]ZCUSR|0                                              
 zcus.uk.remit.postal        10 ZIP.POST L  MIS.ZIP        :KY[ky]ZCUSR|2                                          
 zcus.uk.remit.province      20 FREE     L                 :KY[ky]ZCUSR|1                                              

 Ì   €�   i   2
ap.check.activity    (activity) 
[urn, activity.date,activity.number]
:KY[ky]A[kyAD,kyAN]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 activity.date                8 DATE     L                 kyAD                                                        
 activity.number              5 PINT     R                 kyAN                                                        
 activity.status              9 CHOICE   L                 :KY[ky]A[kyAD,kyAN]|0                                       

 Ì   €�   i   2
ap.check.credit.memos    (credits) 
[urn, cr.inv.num]
:KY[ky]C[kzN]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 cr.inv.num                  15 FREE     L                 kzN                                                         
 cr.inv.balance              11 SMONEY   R                 :KY[ky]C[kzN]|2                                             
 cr.inv.balance.scheduled    11 SMONEY   R                 :KY[ky]C[kzN]|7                                             
 cr.inv.cancel.flag           1 YN       L                 :KY[ky]C[kzN]|10                                            
 cr.inv.date                  8 DATE     L                 :KY[ky]C[kzN]|1                                             
 cr.inv.discount             10 MONEY    R                 :KY[ky]C[kzN]|3                                             
 cr.inv.discount.claimed      1 YN       L                 :KY[ky]C[kzN]|6                                             
 cr.inv.last.txn              3 PINT     R                 :KY[ky]C[kzN]|8                                             
 cr.inv.payment              11 PMONEY   R                 :KY[ky]C[kzN]|4                                             
 cr.inv.remaining.balance    11 SMONEY   R                 VAL=(@cr.inv.balance-@cr.inv.discount-@cr.inv.payment:      
                                                           VAL=2D'=".00")                                              
 cr.inv.thru.txn.urn          3 PINT     R                 :KY[ky]C[kzN]|9                                             
 cr.inv.txn.urn               3 PINT     R                 :KY[ky]C[kzN]|5                                             
 cr.inv.urn                  20 PINT     R  AP.INV         :KY[ky]C[kzN]|0                                         

 Ì   €�   i   2
ap.check.invoices    (invoices) 
[urn, inv.num]
:KY[ky]I[kzN]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 inv.num                     15 FREE     L                 kzN                                                         
 inv.balance                 11 SMONEY   R                 :KY[ky]I[kzN]|2                                             
 inv.balance.scheduled       11 SMONEY   R                 :KY[ky]I[kzN]|7                                             
 inv.cancel.flag              1 YN       L                 :KY[ky]I[kzN]|10                                            
 inv.date                     8 DATE     L                 :KY[ky]I[kzN]|1                                             
 inv.discount                10 MONEY    R                 :KY[ky]I[kzN]|3                                             
 inv.discount.claimed         1 YN       L                 :KY[ky]I[kzN]|6                                             
 inv.last.txn                 3 PINT     R                 :KY[ky]I[kzN]|8                                             
 inv.payment                 11 PMONEY   R                 :KY[ky]I[kzN]|4                                             
 inv.remaining.balance       11 SMONEY   R                 VAL=(@inv.balance-@inv.discount-@inv.payment:2D'=".00"      
                                                           VAL=)                                                       
 inv.thru.txn.urn             3 PINT     R                 :KY[ky]I[kzN]|9                                             
 inv.txn.urn                  3 PINT     R                 :KY[ky]I[kzN]|5                                             
 inv.type                     3 CHOICE   L                                                                             
 inv.urn                     20 PINT     R  AP.INV         :KY[ky]I[kzN]|0                                         

 Ì     i   2
ap.mc.check.schedule.bank.acc    (mc.total.bank.acc) 
[mc.sch.bank.acc]
:KYSB.MC[kk]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 mc.sch.bank.acc             10 FREE     L  AP.BANK        kk                                                      
 mc.approval.started          1 YN       L                 :KYSB.MC[kk]|1                                              
 mc.begin.vendor.name        35 FREE     L                 :KYSB.MC[kk]|4                                              
 mc.end.vendor.name          35 FREE     L                 :KYSB.MC[kk]|5                                              
 mc.payment.due.date          8 DATE     L                 :KYSB.MC[kk]|2                                              
 mc.total.for.bank.acc       14 SMONEY   R                 :KYSB.MC[kk]|0                                              

 Ì     i   2
ap.mc.check.schedule.vendor    (mc.total.vendor) 
[mc.sch.bank.acc,mc.sch.payee.type, mc.sch.vendor]
:KYSB.MC[kk]P[gheo]V[gr]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 mc.sch.vendor               11 FREE     L  MIS.VEN        gr                                                      
 mc.no.of.payments            3 INT      R                 :KYSB.MC[kk]P[gheo]V[gr]|1                                  
 mc.total.for.vendor         14 SMONEY   R                 :KYSB.MC[kk]P[gheo]V[gr]|0                                  

 Ì   €�   i   2
ap.mc.check.sch.ven.ranges    (mc.total.vendor.ranges) 
[mc.sch.bank.acc, mc.vendor.range.begin]
:KYSB.MC[kk]VR[grA]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 mc.vendor.range.begin       35 FREE     L                 grA                                                         
 mc.vendor.range.end         35 FREE     L                 :KYSB.MC[kk]VR[grA]|0                                       

 Ì     i   2
ap.check.schedule.bank.acc    (total.sch.bank.acc) 
[sch.bank.acc]
:KYSB[kk]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 sch.bank.acc                10 FREE     L  AP.BANK        kk                                                      
 approval.started             1 YN       L                 :KYSB[kk]|1                                                 
 begin.vendor.name           35 FREE     L                 :KYSB[kk]|4                                                 
 discount.due.date            8 DATE     L                 :KYSB[kk]|3                                                 
 end.vendor.name             35 FREE     L                 :KYSB[kk]|5                                                 
 last.check.number           10 PINT     R                 VAL=@Last(check.number,check.x)                             
 payment.due.date             8 DATE     L                 :KYSB[kk]|2                                                 
 total.sch.for.bank.acc      14 SMONEY   R                 :KYSB[kk]|0                                                 
 ven.with.disc.only           1 YN       L                 :KYSB[kk]|6                                                 

 Ì   €�   i   2
ap.check.schedule.vendor    (total.sch.vendor) 
[sch.bank.acc, sch.vendor]
:KYSB[kk]V[gr]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 sch.vendor                  11 FREE     L  MIS.VEN        gr                                                      
 no.of.payments               3 INT      R                 :KYSB[kk]V[gr]|1                                            
 total.sch.for.vendor        14 SMONEY   R                 :KYSB[kk]V[gr]|0                                            

 Ì   €�   i   2
ap.check.schedule.ven.ranges    (total.sch.vendor.ranges) 
[sch.bank.acc, vendor.range.begin]
:KYSB[kk]VR[grA]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 vendor.range.begin          35 FREE     L                 grA                                                         
 vendor.range.end            35 FREE     L                 :KYSB[kk]VR[grA]|0                                          

 Ì       2
 INDEX FILE/INTERNAL NAME           SUBSCRIPTS/PHYSICAL BASE

 ap.check.activity.index            [bank.acc,activity.date,urn]
   activity.x                         ?KYA[kk,kyAD,ky]

 ap.check.approve.index             [bank.acc,MIS.VEN.ap.name,vendor,urn]
   check.approv.x                     ?KYCA[kk,grA,gr,ky]

 ap.check.date.index                [bank.acc,date,check.number] = urn
   check.date.x                       ?KYD[kk,kyD,kyCN]

 ap.check.unclaim.index             [bank.acc,check.number] = urn
   check.unclaim.x                    ?KYUC[kk,kyCN]

 ap.check.unrec.index               [bank.acc,check.number] = urn
   check.unrec.x                      ?KYU[kk,kyCN]

 ap.check.number.index              [bank.acc,check.number] = urn
   check.x                            ?KYC[kk,kyCN]

 ap.check.dd.number.x               [bank.acc,dd.number] = urn
   dd.number.x                        ?KYDN[kk,kyDN]

 ap.check.dd.pre.x                  [bank.acc,AP.DD.compile.date,urn]
   dd.pre.x                           ?KYDDP[kk,kdt,ky]

 ap.check.dd.x                      [bank.acc,AP.DD.compile.date,urn]
   dd.x                               ?KYDD[kk,kdt,ky]

 ap.mc.check.approve.index          [bank.acc,mc.payee.type,MIS.VEN.ap.name,vendor,urn]
   mc.check.approv.x                  ?KYCA.MC[kk,gheo,grA,gr,ky]

 ap.mc.check.date.index             [bank.acc,mc.payee.type,date,check.number] = urn
   mc.check.date.x                    ?KYD.MC[kk,gheo,kyD,kyCN]

 ap.mc.check.sch.pend.inv.x         [bank.acc,MIS.PY.TYP.DICT.mnemonic,vendor,inv.num] = urn
   mc.pending.invoice.x               ?KYPVI.MC[kk,gheo,gr,kzN]

 ap.mc.check.sch.pend.pmt.x         [bank.acc,MIS.PY.TYP.DICT.mnemonic,MIS.VEN.ap.name,vendor,payment.number] = urn
   mc.pending.payment.x               ?KYPVP.MC[kk,gheo,grA,gr,kyPN]

 ap.check.schedule.pend.inv.x       [bank.acc,vendor,inv.num] = urn
   pending.invoice.x                  ?KYPVI[kk,gr,kzN]

 ap.check.schedule.pend.pmt.x       [bank.acc,MIS.VEN.ap.name,vendor,payment.number] = urn
   pending.payment.x                  ?KYPVP[kk,grA,gr,kyPN]