[lmi-commits] [lmi] master 1966a5d 1/8: Force InitBaseSpecAmt to equal SpecAmt.front()

[Greg Chicares]

branch: master
commit 1966a5d49adcc33650dc666f7ac6d747f42041ae
Author: Gregory W. Chicares <gchicares@sbcglobal.net>
Commit: Gregory W. Chicares <gchicares@sbcglobal.net>

    Force InitBaseSpecAmt to equal SpecAmt.front()
    
    In a reproducible case (a failed solve for specified amount),
    InitBaseSpecAmt was zero when it should have equalled SpecAmt[0]
    (which was the nonzero minimum).
---
 ihs_acctval.cpp | 7 +++++++
 1 file changed, 7 insertions(+)

diff --git a/ihs_acctval.cpp b/ihs_acctval.cpp
index 7ad8e8d..64de69d 100644
--- a/ihs_acctval.cpp
+++ b/ihs_acctval.cpp
@@ -1284,6 +1284,13 @@ void AccountValue::FinalizeYear()
 
     if(mce_run_gen_curr_sep_full == RunBasis_)
         {
+        // This is just a temporary kludge. Apparently /Init*/ members
+        // exist only as an XSL-FO legacy, and the whole
+        //   $git grep -h '\<Init[A-Z]' ledger_invariant.hpp
+        // family should be eliminated.
+        InvariantValues().InitBaseSpecAmt = InvariantValues().SpecAmt[0];
+        InvariantValues().InitTermSpecAmt = InvariantValues().TermSpecAmt[0];
+
         InvariantValues().GrossPmt  [Year]  = 0.0;
         InvariantValues().EeGrossPmt[Year]  = 0.0;
         InvariantValues().ErGrossPmt[Year]  = 0.0;