' 
' =============================================================
'   IL        Database Initialization Record
' =============================================================
Type rec_il
    str_recid      AS STRING * 010
    str_vcx_client AS STRING * 010
    str_vcx_cdate  AS STRING * 010
    str_ll_cyc     AS STRING * 005
    str_vcx_rbf1   AS STRING * 080
    str_vcx_tab1   AS STRING * 025
    str_vcx_col1   AS STRING * 025
    str_vcx_dir    AS STRING * 050
    str_vcx_vmast  AS STRING * 050
    str_vcx_mdir   AS STRING * 050
End Type
'
'
' 
' =============================================================
'   IB        Input data selection record
' =============================================================
Type rec_ib
    str_recid      AS STRING * 010
    str_vcx_where  AS STRING * 015
    str_vcx_cur1   AS STRING * 015
    str_vcx_cur2   AS STRING * 015
    str_vcx_base1  AS STRING * 050
    str_vcx_base3  AS STRING * 050
    str_vcx_sfile  AS STRING * 040
    str_vcx_drec   AS STRING * 010
    str_vcx_drun   AS STRING * 010
End Type
'
'
' 
' =============================================================
'   OR        Output Report files
' =============================================================
Type rec_or
    str_recid      AS STRING * 010
    str_vcx_rep    AS STRING * 020
'  A-Amortization summary table
'  A1-Amort file output
'  S-Amortization schedule
'  
    str_vcx_prn    AS STRING * 040
End Type
'
'
' 
' =============================================================
'   OF        Data output files
' =============================================================
Type rec_of
    str_recid      AS STRING * 010
    str_vcx_ddir   AS STRING * 060
    str_vcx_dsav   AS STRING * 050
    str_vcx_rsav   AS STRING * 050
'  Segment data output files
    str_vcx_sssv   AS STRING * 040
    str_vcx_sasv   AS STRING * 040
    str_vcx_scsv   AS STRING * 040
    str_vcx_smsv   AS STRING * 040
    str_vcx_snsv   AS STRING * 040
End Type
'
'
' 
' =============================================================
'   OG        Group data output files
' =============================================================
Type rec_og
'  Analysis group data output files
    str_recid      AS STRING * 010
    str_vcx_gasv   AS STRING * 040
    str_vcx_gcsv   AS STRING * 040
    str_vcx_gmsv   AS STRING * 040
'  Total data output files
    str_vcx_tasv   AS STRING * 040
    str_vcx_tcsv   AS STRING * 040
    str_vcx_tmsv   AS STRING * 040
End Type
'
'
' 
' =============================================================
'   OD        Valuation data source overides
' =============================================================
Type rec_od
'  These fields are used to create the input data file VA01L
'  They are default fields which will be subsituted if they exist.
'  If a value is supllied from the data records then all records
'  in the file must contain a value or they will default to the
'  prior records value!!
'  
'  D=Data             Get the value from the data record [Default]
'  M=Assumption rec   Get the value from the assumption header [XX]
'  
'  I=Investor         Get the value from the investor type record
'  A=Analysis group   Get the value from the analyis group record
'  U=User group       Get the value from the user group record
'  S=State or region  Get the value from the state record
'  B=Base table
'  
    str_recid      AS STRING * 010
    str_vd_rate    AS STRING * 008
    str_vd_sfee    AS STRING * 008
    str_vd_anci    AS STRING * 008
    str_vd_cpr     AS STRING * 008
    str_vd_etax    AS STRING * 008
    str_vd_emot    AS STRING * 008
    str_vd_eins    AS STRING * 008
    str_vd_emoi    AS STRING * 008
    str_vd_latp    AS STRING * 008
    str_vd_late    AS STRING * 008
    str_vd_eioe    AS STRING * 008
    str_vd_rday    AS STRING * 004
    str_vd_rday1   AS STRING * 004
    str_vd_pday    AS STRING * 004
    str_vd_pday1   AS STRING * 004
    str_vd_cost    AS STRING * 008
    str_vd_conv    AS STRING * 008
    str_vd_vpri    AS STRING * 004
    str_vd_vint    AS STRING * 004
    str_vd_ylst    AS STRING * 004
    str_vd_del     AS STRING * 008
    str_vd_del1    AS STRING * 008
    str_vd_delc    AS STRING * 008
    str_vd_for     AS STRING * 008
    str_vd_for1    AS STRING * 008
    str_vd_fcp     AS STRING * 008
    str_vd_fchc    AS STRING * 008
    str_vd_base    AS STRING * 008
    str_vd_base4   AS STRING * 008
    str_vd_agrp    AS STRING * 008
    str_vd_state   AS STRING * 008
    str_vd_itype   AS STRING * 008
    str_vd_use3    AS STRING * 008
    str_vd_type    AS STRING * 004
    str_vd_type1   AS STRING * 004
    str_vd_eescx   AS STRING * 006
    str_vd_adel    AS STRING * 002
    str_vd_xxxx    AS STRING * 009
    str_vd_abal    AS STRING * 002
End Type
'
'
' 
' =============================================================
'   OV        Valuation assumption overides
' =============================================================
Type rec_ov
'  These records define where to get a particular variable
'  D=Data
'  A=Base table
'  I=Investor
'  A=Analysis Group
'  U=User group
'  S=State
    str_recid      AS STRING * 010
    str_recnum     AS STRING * 004
    str_vx_rate    AS STRING * 002
    str_vx_sfee    AS STRING * 002
    str_vx_anci    AS STRING * 002
    str_vx_anc1    AS STRING * 002
    str_vx_anc2    AS STRING * 002
    str_vx_cprt    AS STRING * 002
    str_vx_cpr     AS STRING * 002
    str_vx_etax    AS STRING * 002
    str_vx_emot    AS STRING * 002
    str_vx_eins    AS STRING * 002
    str_vx_emoi    AS STRING * 002
    str_vx_latp    AS STRING * 002
    str_vx_late    AS STRING * 002
    str_vx_eioe    AS STRING * 002
    str_vx_rday    AS STRING * 002
    str_vx_rday1   AS STRING * 002
    str_vx_pday    AS STRING * 002
    str_vx_pday1   AS STRING * 002
    str_vx_cost    AS STRING * 002
    str_vx_conv    AS STRING * 002
    str_vx_vpri    AS STRING * 002
    str_vx_vint    AS STRING * 002
    str_vx_ylst    AS STRING * 002
    str_vx_vdel    AS STRING * 002
    str_vx_del1    AS STRING * 002
    str_vx_delc    AS STRING * 002
    str_vx_vfor    AS STRING * 002
    str_vx_vfor1   AS STRING * 002
    str_vx_fcp     AS STRING * 002
    str_vx_fchc    AS STRING * 002
    str_cdbase     AS STRING * 008
    str_cdbase4    AS STRING * 008
    str_cdagrp     AS STRING * 009
    str_sxstat     AS STRING * 005
    str_itype      AS STRING * 007
    str_cduse3     AS STRING * 008
    str_cdtype     AS STRING * 004
    str_cdtype1    AS STRING * 004
End Type
'
'
' 
' =============================================================
'   VA        Valuation criteria record
' =============================================================
Type rec_va
    str_recid      AS STRING * 010
    str_recnum     AS STRING * 004
    str_ldrate     AS STRING * 008
    str_lfrri      AS STRING * 008
    str_vcx_vdif   AS STRING * 008
    str_vcx_vtry   AS STRING * 004
    str_vcx_vpri   AS STRING * 008
    str_lvamot     AS STRING * 008
    str_lfvam      AS STRING * 008
    str_lvamoy     AS STRING * 003
    str_lvamod     AS STRING * 008
End Type
'
'
' 
' =============================================================
'   SN        Sensitivity Analysis Record
' =============================================================
Type rec_sn
    str_recid      AS STRING * 010
    str_recnum     AS STRING * 004
    str_lzsfld     AS STRING * 008
    str_lzsrt1     AS STRING * 008
    str_lzsrt2     AS STRING * 008
    str_lzsrt3     AS STRING * 008
    str_lzsrt4     AS STRING * 008
    str_lyber1     AS STRING * 009
    str_lybei1     AS STRING * 010
    str_lyber2     AS STRING * 009
    str_lybei2     AS STRING * 010
    str_lyber3     AS STRING * 009
    str_lybei3     AS STRING * 010
    str_lyber4     AS STRING * 009
    str_lybei4     AS STRING * 010
End Type
'
'
' 
' =============================================================
'   EQ        Debt/Equity record
' =============================================================
Type rec_eq
    str_recid      AS STRING * 010
    str_recnum     AS STRING * 004
    str_lftax      AS STRING * 008
    str_lfrdb      AS STRING * 008
    str_lfvdp      AS STRING * 008
    str_lfvdr      AS STRING * 008
    str_lfrqr      AS STRING * 008
End Type
'
'
' 
' =============================================================
'   CF        P&I cash flow record
' =============================================================
Type rec_cf
    str_recid      AS STRING * 010
    str_recnum     AS STRING * 004
    str_vx_pico    AS STRING * 002
    str_cshreg     AS STRING * 008
    str_lfrie      AS STRING * 008
    str_lfpiu      AS STRING * 008
    str_lftiu      AS STRING * 008
    str_lfria      AS STRING * 008
'  Advance months is on the Investor record
    str_advimd     AS STRING * 008
    str_advimf     AS STRING * 008
    str_advpmd     AS STRING * 008
    str_advpmf     AS STRING * 008
End Type
'
'
' 
' =============================================================
'   PO        Prepayment record
' =============================================================
Type rec_po
    str_recid      AS STRING * 010
    str_recnum     AS STRING * 004
    str_cshpay     AS STRING * 008
    str_lfcpre     AS STRING * 008
    str_lvcprt     AS STRING * 008
    str_lfcpra     AS STRING * 008
    str_lfvpo      AS STRING * 008
    str_vx_cut     AS STRING * 010
    str_paylst     AS STRING * 003
    str_lvcpr      AS STRING * 008
    str_vx_psa     AS STRING * 002
End Type
'
'
' 
' =============================================================
'   ES        Escrow record
' =============================================================
Type rec_es
    str_recid      AS STRING * 010
    str_recnum     AS STRING * 004
    str_lfntx      AS STRING * 008
    str_lfnix      AS STRING * 008
    str_vx_escm    AS STRING * 003
    str_lvemot     AS STRING * 007
    str_lfetaxx    AS STRING * 002
    str_lvemoi     AS STRING * 007
    str_lfeinsx    AS STRING * 002
    str_lveioe     AS STRING * 008
    str_lfeescx    AS STRING * 008
End Type
'
'
' 
' =============================================================
'   RV        Revenues record
' =============================================================
Type rec_rv
    str_recid      AS STRING * 010
    str_recnum     AS STRING * 004
    str_lvsfee     AS STRING * 010
    str_lfvsf      AS STRING * 008
    str_lvsdpl     AS STRING * 008
    str_lfvsd      AS STRING * 008
    str_lfnsd      AS STRING * 008
    str_lvanci     AS STRING * 008
    str_lfanci     AS STRING * 008
    str_lvanc1     AS STRING * 008
    str_lvanc2     AS STRING * 008
    str_lfanc2     AS STRING * 008
    str_vx_latx    AS STRING * 003
    str_lvlatp     AS STRING * 008
    str_lvlate     AS STRING * 008
    str_lfvlp      AS STRING * 008
    str_lfvle      AS STRING * 008
    str_lfvlc      AS STRING * 008
End Type
'
'
' 
' =============================================================
'   EX        Expenses/Cost record
' =============================================================
Type rec_ex
    str_recid      AS STRING * 010
    str_recnum     AS STRING * 004
    str_lfcser     AS STRING * 008
    str_lfcarm     AS STRING * 008
    str_lfcinv     AS STRING * 008
    str_lfvcst     AS STRING * 008
    str_lfncs      AS STRING * 008
    str_lfccnv     AS STRING * 008
    str_lfcnv      AS STRING * 008
End Type
'
'
' 
' =============================================================
'   DE        Delinquencies record
' =============================================================
Type rec_de
    str_recid      AS STRING * 010
    str_recnum     AS STRING * 004
    str_lfd10      AS STRING * 008
    str_lfclat     AS STRING * 008
    str_lfd17      AS STRING * 008
    str_vx_delt    AS STRING * 003
    str_lvdel      AS STRING * 008
    str_lfdel      AS STRING * 008
    str_lvdspr     AS STRING * 008
    str_lfcdel     AS STRING * 008
    str_lfdelc     AS STRING * 008
End Type
'
'
' 
' =============================================================
'   FC        Foreclosures record
' =============================================================
Type rec_fc
    str_recid      AS STRING * 010
    str_recnum     AS STRING * 004
    str_vx_forc    AS STRING * 003
    str_vx_fort    AS STRING * 008
    str_lvfor      AS STRING * 008
    str_lffor      AS STRING * 008
    str_lvfspr     AS STRING * 008
    str_lffcp      AS STRING * 008
    str_lffcm      AS STRING * 008
    str_lfcfor     AS STRING * 008
    str_lflfor     AS STRING * 011
    str_fc_rfee    AS STRING * 008
    str_fc_rpi     AS STRING * 008
    str_fc_rti     AS STRING * 008
    str_fc_iplo    AS STRING * 008
    str_fc_pblo    AS STRING * 008
End Type
'
'
' 
' =============================================================
'   RE        Results record
' =============================================================
Type rec_re
    str_recid      AS STRING * 010
    str_recnum     AS STRING * 007
    str_loanx      AS STRING * 015
    str_recyer     AS STRING * 008
    str_lltime     AS STRING * 005
    str_lldate     AS STRING * 005
    str_llpurp2a   AS STRING * 011
    str_llpurp2    AS STRING * 016
    str_llpurr2    AS STRING * 009
    str_lyirr2     AS STRING * 010
    str_lyprev0    AS STRING * 011
    str_lyprep0    AS STRING * 008
    str_lynet0     AS STRING * 011
    str_lynetp0    AS STRING * 008
    str_lyreir0    AS STRING * 008
    str_lymirr0    AS STRING * 010
    str_lyexpl0    AS STRING * 006
    str_lypybk0    AS STRING * 006
    str_lyecnd0    AS STRING * 009
'  Breakeven values
    str_lybevp0    AS STRING * 016
    str_lybevp0a   AS STRING * 010
    str_lybevr0    AS STRING * 010
    str_lyirr0     AS STRING * 010
'  Breakeven comparison fields
    str_lybevp3    AS STRING * 010
    str_lybevr3    AS STRING * 010
    str_lyirr3     AS STRING * 010
End Type
'
'
' 
' =============================================================
'   VALUG     User group values
' =============================================================
Type rec_valug
'  Client Source files
    str_recid      AS STRING * 010
    str_reckey     AS STRING * 010
    str_ldrate     AS STRING * 008
    str_lvcprt     AS STRING * 008
    str_lvcpr      AS STRING * 008
    str_lfcser     AS STRING * 008
End Type
'
'
' 
' =============================================================
'   VALAG     User group values
' =============================================================
Type rec_valag
    str_recid      AS STRING * 010
    str_reckey     AS STRING * 010
    str_ldrte1     AS STRING * 008
    str_ldrte2     AS STRING * 008
    str_ldrte3     AS STRING * 008
    str_ldrte4     AS STRING * 008
    str_lfcpr1     AS STRING * 008
    str_lfcpr2     AS STRING * 008
    str_lfcpr3     AS STRING * 008
    str_lfcpr4     AS STRING * 008
    str_lfcser     AS STRING * 008
    str_lveioe     AS STRING * 008
End Type
'
'
' 
' =============================================================
'   VALIR     Investor remittance types
' =============================================================
Type rec_valir
    str_recid      AS STRING * 010
    str_reckey     AS STRING * 010
    str_avrday     AS STRING * 004
    str_avrday1    AS STRING * 004
    str_advpri     AS STRING * 004
    str_advint     AS STRING * 004
    str_avpday     AS STRING * 004
    str_avpday1    AS STRING * 004
    str_paylst     AS STRING * 004
    str_idesc      AS STRING * 020
End Type
'
'
' 
' =============================================================
'   VALST     State escrow records
' =============================================================
Type rec_valst
    str_recid      AS STRING * 010
    str_reckey     AS STRING * 010
    str_lveioe     AS STRING * 008
    str_lvemot     AS STRING * 008
    str_lvemoi     AS STRING * 008
    str_inspct     AS STRING * 008
    str_lfetaxx    AS STRING * 008
    str_lfeinsx    AS STRING * 008
    str_taxpct1    AS STRING * 008
    str_inspct1    AS STRING * 008
    str_lfeescx    AS STRING * 008
    str_escr01     AS STRING * 003
    str_escr02     AS STRING * 003
    str_escr03     AS STRING * 003
    str_escr04     AS STRING * 003
    str_escr05     AS STRING * 003
    str_escr06     AS STRING * 003
    str_escr07     AS STRING * 003
    str_escr08     AS STRING * 003
    str_escr09     AS STRING * 003
    str_escr10     AS STRING * 003
    str_escr11     AS STRING * 003
    str_escr12     AS STRING * 003
End Type
'
'
' 
' =============================================================
'   DA        Input data record
' =============================================================
Type rec_da
    str_rec10      AS STRING * 010
    str_recnum     AS STRING * 007
    str_loanx      AS STRING * 015
    str_recyer     AS STRING * 008
    str_cdbase     AS STRING * 008
    str_cdbase4    AS STRING * 008
    str_cdgrpx     AS STRING * 036
'  cdagrp    BC   Analysis Group      004 T0057   0001 0004 X4
'  sxdeli    BC   Delinquency         002 T0061   0005 0006 X2
'  sxstat    BC   State code          005 T0063   0007 0008 X2
'  itype     BC   Investor type       007 T0065   0009 0012 X4
'  cdbyd     BC   Buydown code        001 T0069   0013 0013 X1
'  cdtype    BC   Loan type           001 T0070   0014 0014 X1
'  cdlien    BC   Lien type           001 T0071   0015 0015 X1
'  cdown     BC   Property ownership  001 T0072   0016 0016 X1
'  cdarm     BC   Amortization ARM    001 T0073   0017 0017 X1
'  cdgpm     BC   Payment type GPM    001 T0074   0018 0018 X1
'  cduse3    BC   User group          004 T0075   0019 0022 X4
'  sxterm    BC   Loan term category  002 T0079   0023 0025 X3
'  sxage     BC   Loan age category   002 T0082   0026 0028 X3
'  sxsfee    BC   Service fee categor 004 T0085   0029 0031 X3
'  sxuser    BC   User defined        004 T0089   0032 0035 X4
'  
    str_ldrate     AS STRING * 008
    str_lvc        AS STRING * 010
    str_lvba       AS STRING * 012
    str_lvrate     AS STRING * 008
    str_lvpico0    AS STRING * 010
    str_lvpico1    AS STRING * 011
    str_lvterm     AS STRING * 004
    str_lvtrmm     AS STRING * 004
    str_lvage      AS STRING * 004
    str_lvrem      AS STRING * 004
    str_lvcprt     AS STRING * 004
    str_lvcpr      AS STRING * 009
    str_avrday     AS STRING * 004
    str_avrday1    AS STRING * 006
    str_avpday     AS STRING * 004
    str_avpday1    AS STRING * 006
    str_advpri     AS STRING * 004
    str_advint     AS STRING * 004
    str_paylst     AS STRING * 004
    str_lvetax     AS STRING * 010
    str_lvemot     AS STRING * 006
    str_lfetaxx    AS STRING * 002
    str_lfeescx    AS STRING * 006
    str_lveins     AS STRING * 010
    str_lvemoi     AS STRING * 006
    str_lfeinsx    AS STRING * 002
    str_lveioe     AS STRING * 008
    str_lvlatp     AS STRING * 008
    str_lvlate     AS STRING * 008
    str_lvdel      AS STRING * 008
    str_lfdel      AS STRING * 008
    str_lfdelc     AS STRING * 008
    str_lvfor      AS STRING * 008
    str_lffor      AS STRING * 008
    str_lfforc     AS STRING * 008
    str_lffcp      AS STRING * 008
    str_lflfor     AS STRING * 010
    str_lvsfee     AS STRING * 010
    str_lvsdpl     AS STRING * 008
    str_lfccnv     AS STRING * 008
    str_lfcser     AS STRING * 008
'  Escrow Balances
    str_lvebal     AS STRING * 010
    str_lveavg     AS STRING * 010
'  Required purchase price and IRR
    str_lvirr4     AS STRING * 010
    str_lvpri4     AS STRING * 010
'  Breakeven comparison fields
    str_lybevp3    AS STRING * 010
    str_lybevr3    AS STRING * 010
    str_lyirr3     AS STRING * 010
'  Breakeven calculated fields
    str_lybevp0a   AS STRING * 010
    str_lybevr0    AS STRING * 010
    str_lyirr0     AS STRING * 010
    str_acqbal     AS STRING * 012
End Type
'
'
' 
' =============================================================
'   SU        Cash flow accumulation layout
' =============================================================
Type rec_su
    str_recnam     AS STRING * 010
    str_recnum     AS STRING * 008
    str_recyer     AS STRING * 005
    str_llyer      AS STRING * 004
    str_llmon      AS STRING * 004
'  To calculate the averages
    str_slvrate    AS STRING * 009
    str_slvterm    AS STRING * 009
    str_slvrem     AS STRING * 009
    str_slvage     AS STRING * 009
    str_slvcall    AS STRING * 009
'  Segment Totals
'  Actual resulting counts and balances
    str_sllcntb    AS STRING * 011
    str_sllcntp    AS STRING * 011
    str_sllcntf    AS STRING * 011
    str_sllcnte    AS STRING * 011
    str_sllcnta    AS STRING * 011
    str_sllcntt    AS STRING * 011
'  Actual segment balances
    str_sllbalb    AS STRING * 014
    str_sllbalm    AS STRING * 010
    str_sllbalp    AS STRING * 010
    str_sllbalf    AS STRING * 010
    str_sllbalc    AS STRING * 010
    str_sllbale    AS STRING * 014
    str_sllbala    AS STRING * 010
'  Actual P&I received monthly
    str_sllpico    AS STRING * 013
    str_sllprit    AS STRING * 013
    str_sllintt    AS STRING * 013
    str_slladvit   AS STRING * 013
    str_slladvpt   AS STRING * 013
    str_savdcsh    AS STRING * 010
    str_savdcsh1   AS STRING * 010
'  Actual escrow constants
    str_slledep    AS STRING * 010
'  Actual Escrow balances
    str_slaeavg    AS STRING * 010
    str_sllebal    AS STRING * 010
    str_slleadv    AS STRING * 010
    str_slleflt    AS STRING * 010
    str_slabipi    AS STRING * 010
    str_slabipo    AS STRING * 010
'  Income Statement
'  Revenue analysis
    str_sllfee     AS STRING * 011
    str_sllfee1    AS STRING * 010
    str_sllfeed    AS STRING * 010
    str_sllanc     AS STRING * 010
    str_sllanc1    AS STRING * 010
    str_sllanc2    AS STRING * 010
    str_slllfep    AS STRING * 010
    str_slllfee    AS STRING * 010
    str_sllepi     AS STRING * 010
    str_sllepo     AS STRING * 010
    str_slleti     AS STRING * 010
'  Servicing cost analysis
    str_sllcnv     AS STRING * 010
    str_sllcst     AS STRING * 010
    str_sllcpay    AS STRING * 010
'  Delinquency analysis
    str_sllcdel    AS STRING * 010
    str_sllclat    AS STRING * 010
'  Foreclosure analysis
    str_sllfcc     AS STRING * 010
    str_sllflsh    AS STRING * 010
    str_sllflpi    AS STRING * 010
    str_sllflti    AS STRING * 010
    str_sllflsv    AS STRING * 010
    str_sllflsi    AS STRING * 010
    str_sllflsp    AS STRING * 010
    str_sllfccn    AS STRING * 010
    str_sllfcbl    AS STRING * 010
'  Interest losses
    str_slaadib    AS STRING * 010
    str_slladvi    AS STRING * 010
    str_slaadpb    AS STRING * 010
    str_slladvp    AS STRING * 010
    str_sllioe     AS STRING * 010
    str_sllinl     AS STRING * 010
'  Short Income Statement
    str_sllinc8    AS STRING * 010
    str_sllanc8    AS STRING * 010
    str_sllern8    AS STRING * 010
    str_sllexp8    AS STRING * 010
    str_sllfor8    AS STRING * 010
    str_slladv8    AS STRING * 010
    str_sllnet     AS STRING * 010
    str_slltax     AS STRING * 010
    str_sllnet1    AS STRING * 010
'  Valuation Section
'  Discount rate section
    str_slzrat1    AS STRING * 010
    str_slfrat1    AS STRING * 010
    str_slycshd    AS STRING * 010
    str_slybefc    AS STRING * 008
    str_slybef1    AS STRING * 013
    str_slybevr    AS STRING * 013
    str_slybevp    AS STRING * 013
'  Amortization calculation
'  Assigned purchase price
    str_sllpur2    AS STRING * 013
    str_slfvam2    AS STRING * 008
    str_slyirr2    AS STRING * 013
'  Breakeven purchase price
    str_sllpurp    AS STRING * 013
    str_slfvam     AS STRING * 008
    str_slyirr     AS STRING * 013
    str_sllamra    AS STRING * 010
    str_sllamrt    AS STRING * 010
    str_slltaxt    AS STRING * 010
    str_sllnet2    AS STRING * 010
'  Total cash flow from the segement
    str_sllcsh1    AS STRING * 010
'  Income Tax section
    str_slfrtx     AS STRING * 010
'  Debt repayment section
    str_slfvdr     AS STRING * 008
    str_slldbam    AS STRING * 010
    str_slleqam    AS STRING * 010
    str_slzrqr     AS STRING * 007
    str_slfrqr     AS STRING * 008
    str_slfrdb     AS STRING * 008
    str_slfvdp     AS STRING * 008
    str_slldbtb    AS STRING * 010
    str_slldbre    AS STRING * 010
    str_slldbin    AS STRING * 010
    str_slldbtx    AS STRING * 010
    str_sllcsad    AS STRING * 010
'  MIRR Modified Internal rate of return
    str_slzrri     AS STRING * 008
    str_slfrri     AS STRING * 010
    str_sllcsbb    AS STRING * 010
    str_sllint0    AS STRING * 008
    str_sllcsin    AS STRING * 010
End Type
'
'
' 
' =============================================================
'   MA        Calculation matrix
' =============================================================
Type rec_ma
    str_recnam     AS STRING * 010
    str_cdagrp     AS STRING * 010
    str_lgrpsub    AS STRING * 010
    str_recnum     AS STRING * 008
    str_recnu1     AS STRING * 010
    str_recid      AS STRING * 005
    str_recid1     AS STRING * 005
    str_itype      AS STRING * 006
    str_sxstat     AS STRING * 005
    str_cdbase     AS STRING * 008
    str_lltime     AS STRING * 010
    str_recyer     AS STRING * 005
    str_llyer      AS STRING * 004
    str_llmon      AS STRING * 004
    str_lvrate     AS STRING * 007
    str_lvterm     AS STRING * 007
    str_lvtrmm     AS STRING * 007
    str_lvage      AS STRING * 007
    str_lvrem      AS STRING * 007
    str_lvdesc     AS STRING * 035
'  Counts & Balances
'  Average loan balance amortization schedule
    str_lvb        AS STRING * 017
    str_lvba       AS STRING * 013
    str_lvamrb     AS STRING * 009
    str_lvamr6     AS STRING * 009
    str_lvamrc     AS STRING * 009
    str_lvamre     AS STRING * 009
    str_lvamr0     AS STRING * 009
    str_lvamr9     AS STRING * 009
    str_lvamr5     AS STRING * 009
    str_lramr7     AS STRING * 008
    str_lramr8     AS STRING * 008
    str_lvpico     AS STRING * 011
    str_lvprip     AS STRING * 011
    str_lvpria     AS STRING * 008
    str_lvintp     AS STRING * 011
    str_lvinta     AS STRING * 008
    str_lvcurt     AS STRING * 011
    str_acqacnt    AS STRING * 008
    str_acqabal    AS STRING * 013
    str_rrpocnt    AS STRING * 008
    str_rrpobal    AS STRING * 013
    str_acqscnt    AS STRING * 008
    str_acqsbal    AS STRING * 013
'  Prepayment schedule
    str_lvc        AS STRING * 011
    str_lvcprt     AS STRING * 004
    str_lvcpr      AS STRING * 008
    str_lfcpra     AS STRING * 008
    str_lfvpo      AS STRING * 008
    str_lrpreb     AS STRING * 008
    str_lrpre6     AS STRING * 008
    str_lrpref     AS STRING * 008
    str_lrprec     AS STRING * 008
    str_lrpree     AS STRING * 008
    str_lrpre5     AS STRING * 008
    str_lrpre7     AS STRING * 008
    str_lrpre8     AS STRING * 008
    str_lrpre0     AS STRING * 008
    str_lrpre9     AS STRING * 008
'  Actual resulting counts and balances
    str_llcntb     AS STRING * 011
    str_llcntp     AS STRING * 011
    str_llcntf     AS STRING * 011
    str_llcnte     AS STRING * 011
    str_llcnta     AS STRING * 011
    str_llcntt     AS STRING * 011
'  Actual segment balances
    str_llbalb     AS STRING * 014
    str_llbalm     AS STRING * 010
    str_llbalp     AS STRING * 010
    str_llbalf     AS STRING * 010
    str_llbalc     AS STRING * 010
    str_llbale     AS STRING * 014
    str_llbala     AS STRING * 010
'  Actual P&I received monthly
    str_llpico     AS STRING * 013
    str_llprit     AS STRING * 013
    str_llintt     AS STRING * 013
    str_avdcsh     AS STRING * 010
    str_avdcsh1    AS STRING * 010
'  Actual escrow constants
    str_lvedep     AS STRING * 008
    str_lledep     AS STRING * 010
    str_lfeescx    AS STRING * 008
    str_lvetax     AS STRING * 008
    str_lvemot     AS STRING * 007
    str_lfetaxx    AS STRING * 007
    str_lveins     AS STRING * 008
    str_lvemoi     AS STRING * 008
    str_lfeinsx    AS STRING * 007
'  Actual Escrow balances
    str_lveavg     AS STRING * 008
    str_laeavg     AS STRING * 010
    str_lvebal     AS STRING * 008
    str_llebal     AS STRING * 010
    str_lveadv     AS STRING * 008
    str_lleadv     AS STRING * 010
    str_lleflt     AS STRING * 010
    str_taxbeg     AS STRING * 008
    str_taxrec     AS STRING * 008
    str_taxadv     AS STRING * 008
    str_taxrem     AS STRING * 008
    str_taxend     AS STRING * 008
    str_insbeg     AS STRING * 008
    str_insrec     AS STRING * 008
    str_insadv     AS STRING * 008
    str_insrem     AS STRING * 008
    str_insend     AS STRING * 008
'  P&I Constant
    str_lvbipi     AS STRING * 008
    str_labipi     AS STRING * 010
'  P/O balances
    str_lvbipo     AS STRING * 008
    str_labipo     AS STRING * 010
'  Income Statement
'  Revenue analysis
    str_llfee      AS STRING * 011
    str_llfeed     AS STRING * 010
    str_llfee1     AS STRING * 011
    str_llanc      AS STRING * 010
    str_llanc1     AS STRING * 010
    str_llanc2     AS STRING * 010
    str_lllfep     AS STRING * 010
    str_lllfee     AS STRING * 010
    str_llepi      AS STRING * 010
    str_llepo      AS STRING * 010
    str_lleti      AS STRING * 010
'  Servicing cost analysis
    str_llcnv      AS STRING * 010
    str_llcst      AS STRING * 010
    str_llcpay     AS STRING * 010
'  Delinquency analysis
    str_llcdel     AS STRING * 010
    str_llclat     AS STRING * 010
'  Foreclosure analysis
    str_llfcc      AS STRING * 010
    str_llflsh     AS STRING * 010
    str_llflpi     AS STRING * 010
    str_llflti     AS STRING * 010
    str_llflsv     AS STRING * 010
    str_llflsi     AS STRING * 010
    str_llflsp     AS STRING * 010
'  Interest losses
    str_laadib     AS STRING * 010
    str_lladvi     AS STRING * 010
    str_laadpb     AS STRING * 010
    str_lladvp     AS STRING * 010
    str_llioe      AS STRING * 010
    str_llinl      AS STRING * 010
'  Short income statement pre amortization
    str_llinc8     AS STRING * 010
    str_llanc8     AS STRING * 010
    str_llern8     AS STRING * 010
    str_llexp8     AS STRING * 010
    str_llfor8     AS STRING * 010
    str_lladv8     AS STRING * 010
    str_llnet      AS STRING * 010
    str_lltax      AS STRING * 010
    str_llnet1     AS STRING * 010
'  Valuation Section
'  Discount rate section
    str_lzrate     AS STRING * 010
    str_lfrate     AS STRING * 010
    str_lzsrt1     AS STRING * 010
    str_lzsrt2     AS STRING * 010
    str_lzsrt3     AS STRING * 010
    str_lzsrt4     AS STRING * 010
    str_lycshd     AS STRING * 010
    str_lybefc     AS STRING * 008
    str_lybef1     AS STRING * 013
    str_lybevr     AS STRING * 009
    str_lybevp     AS STRING * 013
    str_ly0001     AS STRING * 013
    str_ly0002     AS STRING * 013
'  Amortization calculation
'  Breakeven purchase price
    str_llpurp     AS STRING * 013
    str_lvamoy     AS STRING * 004
    str_lfvam      AS STRING * 008
    str_lyirr      AS STRING * 009
    str_lyirr5     AS STRING * 009
    str_lyirrf     AS STRING * 013
    str_llamra     AS STRING * 010
    str_llamrt     AS STRING * 010
    str_lltaxt     AS STRING * 010
    str_llnet2     AS STRING * 010
'  Total cash flow from the segement
    str_llcsh1     AS STRING * 010
'  Assigned purchase price
    str_llpurp2    AS STRING * 010
    str_llpurr2    AS STRING * 009
    str_lyirr2     AS STRING * 009
'  Stated purchase price
    str_llamra2    AS STRING * 010
    str_llamrt2    AS STRING * 010
    str_lltaxt2    AS STRING * 010
    str_llnet22    AS STRING * 010
    str_llcsh12    AS STRING * 010
'  Income Tax section
    str_lftax      AS STRING * 010
'  Debt repayment section--
    str_lfvdr      AS STRING * 008
    str_lldbam     AS STRING * 010
    str_lleqam     AS STRING * 010
    str_lzrqr      AS STRING * 007
    str_lfrqr      AS STRING * 008
    str_lfrdb      AS STRING * 008
    str_lfvdp      AS STRING * 008
    str_lldbtb     AS STRING * 010
    str_lldbre     AS STRING * 010
    str_lldbin     AS STRING * 010
    str_lldbtx     AS STRING * 010
    str_llcsad     AS STRING * 010
'  MIRR Modified Internal rate of return
    str_lzrri      AS STRING * 008
    str_lfrri      AS STRING * 010
    str_llcsbb     AS STRING * 010
    str_llint0     AS STRING * 008
    str_llcsin     AS STRING * 010
'  Revenue Vectors
    str_lvsfee     AS STRING * 009
    str_lfvsf      AS STRING * 009
    str_lvsdpl     AS STRING * 009
    str_lfvsd      AS STRING * 009
    str_lznsd      AS STRING * 007
    str_lfnsd      AS STRING * 010
    str_lvanci     AS STRING * 007
    str_lzanci     AS STRING * 007
    str_lfanci     AS STRING * 007
    str_lvanc1     AS STRING * 007
    str_lvanc2     AS STRING * 008
    str_lzanc2     AS STRING * 007
    str_lfanc2     AS STRING * 007
    str_lfvlc      AS STRING * 006
    str_lvlatp     AS STRING * 006
    str_lfvlp      AS STRING * 006
    str_lvlate     AS STRING * 006
    str_lfvle      AS STRING * 006
'  Earnings on P&I/T&I accounts
    str_lzrie      AS STRING * 008
    str_lfrie      AS STRING * 008
'  Earnings on P&I constant
    str_cshreg     AS STRING * 005
    str_avrday     AS STRING * 008
    str_avrday1    AS STRING * 008
'  avrpct is the percent of the total that is held during the month
    str_avrpct     AS STRING * 008
'  avrpct1 is the percent of the remainder of total that is held
'  during the month.  On the 18th you remit all and carry a portion over
    str_avrpct1    AS STRING * 008
    str_lfpiu      AS STRING * 008
'  Earnings on Payoffs
    str_cshpay     AS STRING * 005
    str_avpday     AS STRING * 008
    str_avpday1    AS STRING * 008
    str_avppct     AS STRING * 005
    str_avppct1    AS STRING * 005
'  Earnings on Escrow accounts
    str_lftiu      AS STRING * 008
    str_lzntx      AS STRING * 008
    str_lfntx      AS STRING * 008
    str_lznix      AS STRING * 008
    str_lfnix      AS STRING * 008
'  
'  Cost Vectors
    str_lfcser     AS STRING * 008
    str_lfcarm     AS STRING * 008
    str_lfcinv     AS STRING * 008
    str_lfvcst     AS STRING * 010
    str_lzncs      AS STRING * 010
    str_lfncs      AS STRING * 010
    str_lfccnv     AS STRING * 010
    str_lfcnv      AS STRING * 010
    str_lfcpre     AS STRING * 010
'  
'  Delinquency Vectors
    str_lfd10      AS STRING * 007
    str_lfd17      AS STRING * 007
    str_lvdspr     AS STRING * 007
    str_lrdel      AS STRING * 007
    str_lcdel      AS STRING * 007
    str_lvdel      AS STRING * 009
    str_lfdel      AS STRING * 009
    str_lfdchg     AS STRING * 009
    str_lfdelc     AS STRING * 006
    str_lfclat     AS STRING * 007
    str_lfcdel     AS STRING * 009
'  
'  Foreclosure Vectors
    str_lrfor      AS STRING * 008
    str_lcfor      AS STRING * 008
    str_lffcfa     AS STRING * 003
'  These should match the llcntf only if f/c are removed in
'  addition to P/O
    str_llfccn     AS STRING * 010
    str_llfcbl     AS STRING * 010
    str_lvfor      AS STRING * 008
    str_lffor      AS STRING * 008
    str_lfforc     AS STRING * 006
    str_lvfspr     AS STRING * 007
    str_lffcp      AS STRING * 007
    str_lffcm      AS STRING * 003
    str_lfcfor     AS STRING * 008
    str_lflfor     AS STRING * 008
    str_fc_rfee    AS STRING * 008
    str_fc_rpi     AS STRING * 008
    str_fc_rti     AS STRING * 008
    str_fc_iplo    AS STRING * 008
    str_fc_pblo    AS STRING * 008
'  Total delinquencies
    str_lrdelt     AS STRING * 006
    str_lcdelt     AS STRING * 006
'  
'  Interest Expenses
    str_lveioe     AS STRING * 007
    str_lfria      AS STRING * 007
    str_advint     AS STRING * 004
    str_advimd     AS STRING * 008
    str_advimf     AS STRING * 008
    str_advpri     AS STRING * 004
    str_advpmd     AS STRING * 008
    str_advpmf     AS STRING * 008
    str_avppct5    AS STRING * 005
    str_paylst     AS STRING * 005
End Type
'
'