sHelp
                                     AP.INV
     i   2
 gl.dist.amounts
 mc.xfer.top
 old.ven.inv.x
 top
   input.itc.lines
   payment.schedule
   transactions
     txn.distribution
     txn.itc.lines
     wheld.taxes

 Ì     i   2
gl.dist.amounts
[gl.dist.period.date,gl.dist.account,gl.dist.vendor,gl.dist.ref.num,gl.dist.inv.date,gl.dist.in
*(K)KZG[gpD,ga,gr,kzR,kzD,kzN,kz]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 gl.dist.period.date          8 DATE     L                 gpD                                                         
 gl.dist.account             25 FREE     L  MIS.GL.ACCOUNT ga                                                      
 gl.dist.vendor              11 FREE     L  MIS.VEN        gr                                                      
 gl.dist.ref.num             12 FREE     L                 kzR                                                         
 gl.dist.inv.date             8 DATE     L                 kzD                                                         
 gl.dist.inv.num             30 FREE     L                 kzN                                                         
 gl.dist.urn                 20 PINT     R                 kz                                                          
 gl.dist.amount              11 SMONEY   R                 *(K)KZG[gpD,ga,gr,kzR,kzD,kzN,kz]                           
 Ì     i   2
mc.xfer.top
*(K)KZMCQ

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 last.xfer.seq.no             9 PINT     R                 *(K)KZMCQ                                                   
 Ì     i   2
old.ven.inv.x
[old.vendor,old.inv.num,change.urn]
*(K)KZOX[grO,kzNO,kzO]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 old.vendor                  11 FREE     L  MIS.VEN        grO                                                     
 old.inv.num                 30 FREE     L                 kzNO                                                        
 change.urn                  20 PINT     R                 kzO                                                         
 change.facility             10 FREE     L                 VAL=@AP.INV.facility[change.urn]                            
 new.inv.num                 30 FREE     L                 *(K)KZOX[grO,kzNO,kzO]|1                                    
 new.vendor                  11 FREE     L                 *(K)KZOX[grO,kzNO,kzO]|0                                    
 Ì     i   2
top
[urn]
$(K)KZ[kz]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 urn                         20 PINT     R                 kz                                                          
 amt.crm                     11 SMONEY   R                 VAL=(IF{@type="CRM" @balance}+0:2D)                         
 amt.hold                    11 SMONEY   R                 VAL=(IF{@status'="HOLD" "";@type="INV" @balance;0-@bal      
                                                           VAL=ance}+0:2D)                                             
 amt.inv                     11 SMONEY   R                 VAL=(IF{@type="INV" @balance}+0:2D)                         
 amt.net                     11 SMONEY   R                 VAL=(IF{@type="INV" @balance;0-@balance}+0:2D)              
 balance                     11 SMONEY   R                 $(K)KZ[kz]M|13                                              
 balance.comp                11 SMONEY   R                 VAL=(@balance+0)                                            
 bank.acc                    10 FREE     L  MIS.BANK       $(K)KZ[kz]M|18                                          
 cal.year                     4 YEAR     L                                                                             
 closing.txn                  3 PINT     R                 $(K)KZ[kz]M|15                                              
 description                 65 FREE     L                 $(K)KZ[kz]M["DN"]                                           
 discount                    10 SMONEY   R                 $(K)KZ[kz]M|11                                              
 discount.claimed            10 SMONEY   R                 $(K)KZ[kz]M|17                                              
 facility                    10 FREE     L  MIS.PUR.FAC    $(K)KZ[kz]M|27                                          
 freight                     10 SMONEY   R                 $(K)KZ[kz]M|10                                              
 gl.flag                      1 YN       L                 $(K)KZ[kz]M|19                                              
 gross                       11 SMONEY   R                 $(K)KZ[kz]M|8                                               
 inp.comment                 65 FREE     L                 $(K)KZ[kz]M["I"]|7                                          
 inp.discount                10 SMONEY   R                 $(K)KZ[kz]M["I"]|4                                          
 inp.freight                 10 SMONEY   R                 $(K)KZ[kz]M["I"]|3                                          
 inp.frt.dist                10 SMONEY   R                 $(K)KZ[kz]M["I"]|8                                          
 inp.frt.tax.code             3 FREE     L  MIS.TAX.CODE   $(K)KZ[kz]M["I"]|14                                     
 inp.gross                   11 SMONEY   R                 $(K)KZ[kz]M["I"]|1                                          
 inp.gross.dist              11 SMONEY   R                 $(K)KZ[kz]M["I"]|5                                          
 inp.pro.frt                  1 YN       L                 $(K)KZ[kz]M["I"]|10                                         
 inp.pro.tax                  1 YN       L                 $(K)KZ[kz]M["I"]|9                                          
 inp.tax                     10 SMONEY   R                 $(K)KZ[kz]M["I"]|2                                          
 inp.tax.1                   10 SMONEY   R                 $(K)KZ[kz]M["I"]|11                                         
 inp.tax.2                   10 SMONEY   R                 $(K)KZ[kz]M["I"]|12                                         
 inp.tax.dist                10 SMONEY   R                 $(K)KZ[kz]M["I"]|6                                          
 inp.txn.num                  4 PINT     R                 $(K)KZ[kz]M["I"]|0                                          
 inv.date                     8 DATE     L                 $(K)KZ[kz]M|3                                               
 inv.num                     30 FREE     L                 $(K)KZ[kz]M|1                                               
 last.payment                 8 DATE     L                 $(K)KZ[kz]M|16                                              
 last.txn                     3 PINT     R                 $(K)KZ[kz]M|14                                              
 mc.db                       12 FREE     L                 $(K)KZ[kz]M|26                                              
 money.amounts.zero           1 FREE     L                 VAL=(@gross+0=(@tax+0)=(@freight+0)=(@discount+0)=(@pa      
                                                           VAL=yment+0)=(@balance+0)=(@tax.1+0)=(@tax.2+0)=0)          
 next.payment                 8 DATE     L                 VAL=IF{@balance+0=0 "";+@payment.schedule[urn,@last.pa      
                                                           VAL=yment]}                                                 
 no.crm                       4 PINT     R                 VAL=IF{@balance+0=0;@type="CRM" 1}                          
 no.hold                      4 PINT     R                 VAL=IF{@status="HOLD" 1;0}                                  
 no.inv                       4 PINT     R                 VAL=IF{@balance+0=0;@type="INV" 1}                          
 payment                     11 SMONEY   R                 $(K)KZ[kz]M|12                                              
 payment.comp                11 SMONEY   R                 VAL=(@payment+0)                                            
 po.facility                 10 FREE     L  MIS.PUR.FAC    $(K)KZ[kz]M|28                                          
 po.num                      12 FREE     L                 $(K)KZ[kz]M|29                                              
 print.1099                   1 YN       L                 VAL=IF{@t.MIS.VEN.print.1099;"N"}                           
 received.date                8 DATE     L                 $(K)KZ[kz]M|5                                               
 ref.date                     8 DATE     L                 $(K)KZ[kz]M|7                                               
 ref.num                     12 FREE     L                 $(K)KZ[kz]M|6                                               
 remit.addr.1                35 FREE     L                 $(K)KZ[kz]M["R"]|2                                          
 remit.addr.2                35 FREE     L                 $(K)KZ[kz]M["R"]|3                                          
 remit.addr.3                35 FREE     L                 $(K)KZ[kz]M["R"]|4                                          
 remit.addr.alt              35 FREE     L                 $(K)KZ[kz]M["R"]ALT|0                                       
 remit.city                  20 FREE     L                 $(K)KZ[kz]M["RE"]|0                                         
 remit.name                  35 FREE     L                 $(K)KZ[kz]M["R"]|0                                          
 remit.name.2                35 FREE     L                 $(K)KZ[kz]M["R"]|1                                          
 remit.postal.code           11 FREE     L                 $(K)KZ[kz]M["RE"]|2                                         
 remit.state                  2 FREE     L                 $(K)KZ[kz]M["RE"]|1                                         
 report.type                  1 FREE     L                 VAL=IF{@type="INV" 0;1}                                     
 source                      12 FREE     L                 $(K)KZ[kz]M|25                                              
 status                       6 CHOICE   L                 $(K)KZ[kz]M|2                                               
 tax                         10 SMONEY   R                 $(K)KZ[kz]M|9                                               
 tax.1                       10 SMONEY   R                 $(K)KZ[kz]M|20                                              
 tax.2                       10 SMONEY   R                 $(K)KZ[kz]M|21                                              
 type                         3 CHOICE   L                 $(K)KZ[kz]M|4                                               
 vendor                      11 FREE     L  MIS.VEN        $(K)KZ[kz]M|0                                           
 wheld.tax.1                 13 SMONEY   R                 $(K)KZ[kz]M|23                                              
 wheld.tax.2                 13 SMONEY   R                 $(K)KZ[kz]M|24                                              
 Ì   €   i   2
input.itc.lines
[urn,  inp.il.line]
$(K)KZ[kz]M["I"]L[kzL]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 inp.il.line                  4 PINT     R                 kzL                                                         
 inp.il.account              25 FREE     L  MIS.GL.ACCOUNT $(K)KZ[kz]M["I"]L[kzL]|0                                
 inp.il.comment              65 FREE     L                 $(K)KZ[kz]M["I"]L[kzL]|12                                   
 inp.il.dis.corp              4 FREE     L  MIS.GL.CORP    $(K)KZ[kz]M["I"]L[kzL]|14                               
 inp.il.edit.1                1 YN       L                 $(K)KZ[kz]M["I"]L[kzL]|9                                    
 inp.il.edit.2                1 YN       L                 $(K)KZ[kz]M["I"]L[kzL]|10                                   
 inp.il.exp.type             15 FREE     L  MIS.EXP.TYPE   $(K)KZ[kz]M["I"]L[kzL]|13                               
 inp.il.freight              10 SMONEY   R                 $(K)KZ[kz]M["I"]L[kzL]|2                                    
 inp.il.gross                11 SMONEY   R                 $(K)KZ[kz]M["I"]L[kzL]|1                                    
 inp.il.more                  1 FREE     L                 $(K)KZ[kz]M["I"]L[kzL]|11                                   
 inp.il.pfrt                 10 SMONEY   R                 $(K)KZ[kz]M["I"]L[kzL]|6                                    
 inp.il.pfrt.t1              10 SMONEY   R                 $(K)KZ[kz]M["I"]L[kzL]|7                                    
 inp.il.pfrt.t2              10 SMONEY   R                 $(K)KZ[kz]M["I"]L[kzL]|8                                    
 inp.il.tax.1                10 SMONEY   R                 $(K)KZ[kz]M["I"]L[kzL]|4                                    
 inp.il.tax.2                10 SMONEY   R                 $(K)KZ[kz]M["I"]L[kzL]|5                                    
 inp.il.tax.code              3 FREE     L  MIS.TAX.CODE   $(K)KZ[kz]M["I"]L[kzL]|3                                
 Ì   €   i   2
payment.schedule
[urn,  pay.on.date]
$(K)KZ[kz]M["PS",kzPS]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 pay.on.date                  8 DATE     L                 kzPS                                                        
 pay.then.hold                1 YN       L                 $(K)KZ[kz]M["PS",kzPS]|2                                    
 pay.to.limit                11 PMONEY   R                 $(K)KZ[kz]M["PS",kzPS]|0                                    
 pay.with.discount            6 DEC      R                 $(K)KZ[kz]M["PS",kzPS]|1                                    
 pay.with.discount.amount    10 MONEY    R                 $(K)KZ[kz]M["PS",kzPS]|3                                    
 Ì   €   i   2
transactions
[urn,  txn.urn]
$(K)KZ[kz]T[kzT]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 txn.urn                      3 URN      L                 kzT                                                         
 txn.balance                 11 SMONEY   R                 $(K)KZ[kz]T[kzT]|8                                          
 txn.bank.acc                10 FREE     L                 VAL=IF{@txn.check.num IF{@txn.check.bank;@bank.acc}}        
 txn.batch.num                3 PINT     R                 $(K)KZ[kz]T[kzT]|1                                          
 txn.batch.txn.urn            4 PINT     R                 $(K)KZ[kz]T[kzT]|2                                          
 txn.check.bank              10 FREE     L  MIS.BANK       $(K)KZ[kz]T[kzT]|22                                     
 txn.check.num               10 FREE     L                 $(K)KZ[kz]T[kzT]|10                                         
 txn.comment                 65 FREE     L                 $(K)KZ[kz]T[kzT]|11                                         
 txn.comment.disp            75 FREE     L                 VAL=("COMMENT:  "_@txn.comment)                             
 txn.date                     8 DATE     L                 $(K)KZ[kz]T[kzT]|0                                          
 txn.discount                10 SMONEY   R                 $(K)KZ[kz]T[kzT]|6                                          
 txn.freight                 10 SMONEY   R                 $(K)KZ[kz]T[kzT]|5                                          
 txn.frt.tax.code             3 FREE     L  MIS.TAX.CODE   $(K)KZ[kz]T[kzT]|16                                     
 txn.gl.period               10 FREE     L  MIS.GL.PERIOD  $(K)KZ[kz]T[kzT]|9                                      
 txn.gl.ppe.thru             10 FREE     L  MIS.GL.PERIOD  $(K)KZ[kz]T[kzT]|12                                     
 txn.gross                   11 SMONEY   R                 $(K)KZ[kz]T[kzT]|3                                          
 txn.mm.database             12 FREE     L  MIS.APPL.DB    $(K)KZ[kz]T[kzT]M|0                                     
 txn.mm.inv.num              15 FREE     L                 $(K)KZ[kz]T[kzT]M|2                                         
 txn.mm.po.urn               30 FREE     L                 $(K)KZ[kz]T[kzT]M|1                                         
 txn.net                     11 SMONEY   R                 VAL=@txn.gross+@txn.tax+@txn.freight-@txn.discount-@tx      
                                                           VAL=n.payment                                               
 txn.payment                 11 SMONEY   R                 $(K)KZ[kz]T[kzT]|7                                          
 txn.prev.balance            11 SMONEY   R                 VAL=IF{""^PB,txn.urn^TU,DO{IF{@txn.balance[-@transacti      
                                                           VAL=ons[urn,TU]^TU]^PB "";TU}},PB}                          
 txn.pro.frt                  1 YN       L                 $(K)KZ[kz]T[kzT]|17                                         
 txn.tax                     10 SMONEY   R                 $(K)KZ[kz]T[kzT]|4                                          
 txn.tax.1                   10 SMONEY   R                 $(K)KZ[kz]T[kzT]|13                                         
 txn.tax.2                   10 SMONEY   R                 $(K)KZ[kz]T[kzT]|14                                         
 txn.user                    10 FREE     L  MIS.USER       $(K)KZ[kz]T[kzT]A|0                                     
 txn.wheld.1                 13 SMONEY   R                 $(K)KZ[kz]T[kzT]|18                                         
 txn.wheld.2                 13 SMONEY   R                 $(K)KZ[kz]T[kzT]|19                                         
 Ì   €   i   2
txn.distribution
[urn,txn.urn,  txn.gl.account]
$(K)KZ[kz]T[kzT]D[ga]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 txn.gl.account              25 FREE     L  MIS.GL.ACCOUNT ga                                                      
 txn.gl.amount               11 SMONEY   R                 $(K)KZ[kz]T[kzT]D[ga]|0                                     
 txn.gl.desc                  7 FREE     L                 VAL=(@MIS.GL.ACCOUNT.description$7)                         
 txn.gl.desc.clr             20 FREE     L                 VAL=(@MIS.GL.ACCOUNT.description$20)                        
 txn.gl.frt.amount           10 SMONEY   R                 $(K)KZ[kz]T[kzT]D[ga]|2                                     
 txn.gl.tax.1                10 SMONEY   R                 $(K)KZ[kz]T[kzT]D[ga]|3                                     
 txn.gl.tax.2                10 SMONEY   R                 $(K)KZ[kz]T[kzT]D[ga]|4                                     
 txn.gl.tax.amount           10 SMONEY   R                 $(K)KZ[kz]T[kzT]D[ga]|1                                     
 Ì   €   i   2
txn.itc.lines
[urn,txn.urn,  txn.il.line]
$(K)KZ[kz]T[kzT]L[kzL]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 txn.il.line                  4 PINT     R                 kzL                                                         
 txn.il.account              25 FREE     L  MIS.GL.ACCOUNT $(K)KZ[kz]T[kzT]L[kzL]|0                                
 txn.il.comment              65 FREE     L                 $(K)KZ[kz]T[kzT]L[kzL]|12                                   
 txn.il.edit.1                1 YN       L                 $(K)KZ[kz]T[kzT]L[kzL]|9                                    
 txn.il.edit.2                1 YN       L                 $(K)KZ[kz]T[kzT]L[kzL]|10                                   
 txn.il.exp.type             15 FREE     L  MIS.EXP.TYPE   $(K)KZ[kz]T[kzT]L[kzL]|13                               
 txn.il.freight              10 SMONEY   R                 $(K)KZ[kz]T[kzT]L[kzL]|2                                    
 txn.il.gross                11 SMONEY   R                 $(K)KZ[kz]T[kzT]L[kzL]|1                                    
 txn.il.more                  1 FREE     L                 $(K)KZ[kz]T[kzT]L[kzL]|11                                   
 txn.il.pfrt                 10 SMONEY   R                 $(K)KZ[kz]T[kzT]L[kzL]|6                                    
 txn.il.pfrt.t1              10 SMONEY   R                 $(K)KZ[kz]T[kzT]L[kzL]|7                                    
 txn.il.pfrt.t2              10 SMONEY   R                 $(K)KZ[kz]T[kzT]L[kzL]|8                                    
 txn.il.tax.1                10 SMONEY   R                 $(K)KZ[kz]T[kzT]L[kzL]|4                                    
 txn.il.tax.2                10 SMONEY   R                 $(K)KZ[kz]T[kzT]L[kzL]|5                                    
 txn.il.tax.code              3 FREE     L  MIS.TAX.CODE   $(K)KZ[kz]T[kzT]L[kzL]|3                                
 Ì   €   i   2
wheld.taxes
[urn,txn.urn,  wheld.account]
$(K)KZ[kz]T[kzT]W[ga]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 wheld.account               25 FREE     L  MIS.GL.ACCOUNT ga                                                      
 wheld.1                     13 SMONEY   R                 $(K)KZ[kz]T[kzT]W[ga]|0                                     
 wheld.2                     13 SMONEY   R                 $(K)KZ[kz]T[kzT]W[ga]|1                                     

 Index Files                        Subscripts/Physical Base

 ap.remit.name.x                    [vendor,remit.name,inv.num] = urn
                                      ?(K)KZRN[gr,kzRN1,kzN]

 bank.x                             [bank.acc,vendor,status,inv.num] = urn
                                      ?(K)KZB[gbk,gr,kzS,kzN]

 date.x                             [vendor,inv.date,inv.num] = urn
                                      ?(K)KZD[gr,kzD,kzN]

 id.x                               [vendor,inv.num] = urn
                                      ?(K)KZI[gr,kzN]

 ref.x                              [ref.num,vendor,inv.num] = urn
                                      ?(K)KZR[kzR,gr,kzN]

 status.x                           [vendor,status,inv.num] = urn
                                      ?(K)KZS[gr,kzS,kzN]