[lmi-commits] [6185] Establish new database entities for preferred loans

[Greg Chicares]

Revision: 6185
          http://svn.sv.gnu.org/viewvc/?view=rev&root=lmi&revision=6185
Author:   chicares
Date:     2015-05-02 15:57:26 +0000 (Sat, 02 May 2015)
Log Message:
-----------
Establish new database entities for preferred loans

Modified Paths:
--------------
    lmi/trunk/basic_values.hpp
    lmi/trunk/dbdict.cpp
    lmi/trunk/dbdict.hpp
    lmi/trunk/dbnames.hpp
    lmi/trunk/dbnames.xpp
    lmi/trunk/ihs_basicval.cpp

Modified: lmi/trunk/basic_values.hpp
===================================================================
--- lmi/trunk/basic_values.hpp  2015-05-02 15:22:51 UTC (rev 6184)
+++ lmi/trunk/basic_values.hpp  2015-05-02 15:57:26 UTC (rev 6185)
@@ -308,8 +308,10 @@
     mcenum_anticipated_deduction MaxWDDed_;
     double                       MaxWdGenAcctValMult;
     double                       MaxWdSepAcctValMult;
+    bool                         AllowPrefLoan;
     mcenum_anticipated_deduction MaxLoanDed_;
     double                       MaxLoanAVMult;
+    int                          FirstPrefLoanYear;
     int                          NoLapseMinDur;
     int                          NoLapseMinAge;
     oenum_waiver_charge_method   WaiverChargeMethod;

Modified: lmi/trunk/dbdict.cpp
===================================================================
--- lmi/trunk/dbdict.cpp        2015-05-02 15:22:51 UTC (rev 6184)
+++ lmi/trunk/dbdict.cpp        2015-05-02 15:57:26 UTC (rev 6185)
@@ -348,6 +348,8 @@
     ascribe("MinVlrRate"          , &DBDictionary::MinVlrRate          );
     ascribe("MaxLoanAcctValMult"  , &DBDictionary::MaxLoanAcctValMult  );
     ascribe("MaxLoanDed"          , &DBDictionary::MaxLoanDed          );
+    ascribe("FirstPrefLoanYear"   , &DBDictionary::FirstPrefLoanYear   );
+    ascribe("PrefLoanRateDecr"    , &DBDictionary::PrefLoanRateDecr    );
     ascribe("GuarPrefLoanSpread"  , &DBDictionary::GuarPrefLoanSpread  );
     ascribe("GuarRegLoanSpread"   , &DBDictionary::GuarRegLoanSpread   );
     ascribe("CurrPrefLoanSpread"  , &DBDictionary::CurrPrefLoanSpread  );
@@ -573,6 +575,8 @@
     max_vlr[mce_s_TX] = 0.15;
     Add(database_entity(DB_MaxVlrRate, max_vlr_dimensions, max_vlr));
 
+    Add(database_entity(DB_FirstPrefLoanYear   , 100));
+
     Add(database_entity(DB_GuarIntSpread       , dbl_inf));
 
     Add(database_entity(DB_CurrCoiTable0Limit  , dbl_inf));

Modified: lmi/trunk/dbdict.hpp
===================================================================
--- lmi/trunk/dbdict.hpp        2015-05-02 15:22:51 UTC (rev 6184)
+++ lmi/trunk/dbdict.hpp        2015-05-02 15:57:26 UTC (rev 6185)
@@ -324,6 +324,8 @@
     database_entity MinVlrRate          ;
     database_entity MaxLoanAcctValMult  ;
     database_entity MaxLoanDed          ;
+    database_entity FirstPrefLoanYear   ;
+    database_entity PrefLoanRateDecr    ;
     database_entity GuarPrefLoanSpread  ;
     database_entity GuarRegLoanSpread   ;
     database_entity CurrPrefLoanSpread  ;

Modified: lmi/trunk/dbnames.hpp
===================================================================
--- lmi/trunk/dbnames.hpp       2015-05-02 15:22:51 UTC (rev 6184)
+++ lmi/trunk/dbnames.hpp       2015-05-02 15:57:26 UTC (rev 6185)
@@ -426,6 +426,8 @@
 
         ,DB_MaxLoanAcctValMult
         ,DB_MaxLoanDed
+        ,DB_FirstPrefLoanYear
+        ,DB_PrefLoanRateDecr
 
         ,DB_GuarPrefLoanSpread
         ,DB_GuarRegLoanSpread

Modified: lmi/trunk/dbnames.xpp
===================================================================
--- lmi/trunk/dbnames.xpp       2015-05-02 15:22:51 UTC (rev 6184)
+++ lmi/trunk/dbnames.xpp       2015-05-02 15:57:26 UTC (rev 6185)
@@ -265,6 +265,8 @@
 {DB_MinVlrRate,DB_Topic_Loans,"MinVlrRate","Minimum variable loan rate",}, \
 {DB_MaxLoanAcctValMult,DB_Topic_Loans,"MaxLoanAcctValMult","Maximum loan as 
proportion of account value, e.g. 1=100%",}, \
 {DB_MaxLoanDed,DB_Topic_Loans,"MaxLoanDed","Monthiversary deductions reflected 
in maximum loan: 0=12 times most recent, 1=to next anniversary, 2=to next modal 
premium due date, 3=18 times most recent",}, \
+{DB_FirstPrefLoanYear,DB_Topic_Loans,"FirstPrefLoanYear","Duration after which 
new cash loans are preferred",}, \
+{DB_PrefLoanRateDecr,DB_Topic_Loans,"PrefLoanRateDecr","Decrement to fixed 
loan rate for preferred loans",}, \
 {DB_GuarPrefLoanSpread,DB_Topic_Loans,"GuarPrefLoanSpread","Guaranteed 
interest spread for preferred loans",}, \
 {DB_GuarRegLoanSpread,DB_Topic_Loans,"GuarRegLoanSpread","Guaranteed interest 
spread for regular loans",}, \
 {DB_CurrPrefLoanSpread,DB_Topic_Loans,"CurrPrefLoanSpread","Current interest 
spread for preferred loans",}, \

Modified: lmi/trunk/ihs_basicval.cpp
===================================================================
--- lmi/trunk/ihs_basicval.cpp  2015-05-02 15:22:51 UTC (rev 6184)
+++ lmi/trunk/ihs_basicval.cpp  2015-05-02 15:57:26 UTC (rev 6185)
@@ -681,8 +681,10 @@
     MaxWDDed_           = 
static_cast<mcenum_anticipated_deduction>(static_cast<int>(Database_->Query(DB_MaxWdDed)));
     MaxWdGenAcctValMult = Database_->Query(DB_MaxWdGenAcctValMult  );
     MaxWdSepAcctValMult = Database_->Query(DB_MaxWdSepAcctValMult  );
+    AllowPrefLoan       = 
static_cast<bool>(Database_->Query(DB_AllowPrefLoan));
     MaxLoanDed_         = 
static_cast<mcenum_anticipated_deduction>(static_cast<int>(Database_->Query(DB_MaxLoanDed)));
     MaxLoanAVMult       = Database_->Query(DB_MaxLoanAcctValMult   );
+    FirstPrefLoanYear   = 
static_cast<int>(Database_->Query(DB_FirstPrefLoanYear));
     NoLapseMinDur       = static_cast<int>(Database_->Query(DB_NoLapseMinDur));
     NoLapseMinAge       = static_cast<int>(Database_->Query(DB_NoLapseMinAge));
     AdbLimit            = Database_->Query(DB_AdbLimit             );