ro|DRM 1.0VMS UIL CompilerV2.0-00021-JUL-1991 15:58:08.65LOAN_DISPLAYV1.0ro|p<H 0XMAINH I (MAIN |pdXL<(QUIT_BUTTONCALCULATE_BUTTONREPAYMENT_HISTORYREP_HIST_TITLEQTY_FIELDQTY_LABELREPAYMENT_INTERVALRATE_LABEL_2RATE_FIELDRATE_LABELLOAN_FIELDLOAN_LABELTITLEH $`DI`$ (TITLEjk PH HDDWT/bC"Home Mortgage Repayments PredictorAH $PI$ ,LOAN_LABELrhl tko w |LOAN_FIELDLOAN_FIELDH 84DWTbCLoan (Principal) $AH |I \,LOAN_FIELDrhfHCREATE_DATA_FIELD hl tjr2  TITLECALCH $I$ ,RATE_LABELrhl tko w |RATE_FIELDRATE_FIELDH 3/DWTbC Interest RateAH I \,RATE_FIELDthfHCREATE_DATA_FIELD hl t jn vTILOAN_FIELDLOAN_FIELDEP_H $I$ 0RATE_LABEL_2fhl tjn v RATE_FIELDRATE_LABELH 1-DWTbC % per annumAH I 4REPAYMENT_INTERVAL D hl t jn v  INTERVAL_MONTHLYATE_LQTY_LABELLOQTY_FIELDLO INTERVAL_MENUQTY_H  I 0INTERVAL_MENURVhINTERVAL_YEARLYINTERVAL_6MONTHLYTHINTERVAL_QUARTERLYINTERVAL_BIMONTHLYAINTERVAL_MONTHLYQTINTERVAL_FORTNIGHTLYININTERVAL_WEEKLYH &( I& 0INTERVAL_WEEKLY x, LhfhSET_INTERVALH 0P ,DWTbC Every WeekAH & I& 8INTERVAL_FORTNIGHTLY , ThfpTESET_INTERVALTEH 50 1DWTbCEvery FortnightAH & I& 4INTERVAL_BIMONTHLYA |, PhflSET_INTERVALVALH 6 2DWTbCEvery Two MonthsAH & I& 4INTERVAL_QUARTERLYs |, PhflSET_INTERVALVAL H 3 /DWTbC Every QuarterAH & I& 4INTERVAL_6MONTHLYs |, PhflSET_INTERVALVAL H 4 0DWTbCEvery 6 MonthsAH &I& 0INTERVAL_YEARLY x, LhfhSET_INTERVALVAL H 0,DWTbC Every YearAro|$! F Y0 ~( L3 nP DP0hQUIT_BUTTONCALCULATE_BUTTONREPAYMENT_HISTORYREP_HIST_TITLEQTY_FIELDQTY_LABELINTERVAL_MONTHLYINTERVAL_YEARLYINTERVAL_6MONTHLYINTERVAL_QUARTERLYINTERVAL_BIMONTHLYINTERVAL_FORTNIGHTLYINTERVAL_WEEKLYINTERVAL_MENUREPAYMENT_INTERVALRATE_LABEL_2RATE_FIELDRATE_LABELLOAN_FIELDLOAN_LABELTITLEMAINLOAN_DISPLAYro|P|    p,(ro|H 84DWTbCRepayment IntervalAH &I& 4INTERVAL_MONTHLYerv |, PhflT_SET_INTERVAL H 1L-DWTbC Every MonthAH $I$ ,QTY_LABELMohl tko w | QTY_FIELDRVALQTY_FIELD_QUAH >0:DWT%bCRepayment per interval $AH I \,QTY_FIELDenhfHCREATE_DATA_FIELD hl t jn v  THLOAN_FIELDQTRATE_FIELDINH $PI$ 0REP_HIST_TITLEhl tjr |  REPAYMENT_INTERVALH hDWTtbC4 Interval Amount Total IC. Number Outstanding Repaid AH D,ID `4REPAYMENT_HISTORY hfP CREATE_LIST_BOX hl (tjn vko w| REP_HIST_TITLEVALREP_HIST_TITLEREP_HIST_TITLELABH Esmk-Adobe-Courier-Bold-R-Normal--*-120-*-*-M-*-ISO8859-1H (I 4CALCULATE_BUTTON0-*hl tjr  , hf CALCULATE_BUTTON_PRESSED|REPAYMENT_HISTORYH /+DWTbC CalculateAH &I& ,QUIT_BUTTONhl tksZ , |hf QUITATCALCULATE_BUTTONH *&DWTbCQuitA