public FrmFundingLineEvent(FundingLine pFundingLine, FundingLineEvent pFundingLineEvent)
{
InitializeComponent();
_FundingLine = pFundingLine;
_fundingLineEvent = pFundingLineEvent;
InitializeComboBoxDirections();
dateTimePickerEvent.Value = TimeProvider.Now;
}
public FrmFundingLineEvent(FundingLine pFundingLine)
{
InitializeComponent();
_FundingLine = pFundingLine;
_exchangeRate=null;
_fundingLineEvent = new FundingLineEvent();
InitializeComboBoxDirections();
dateTimePickerEvent.Value = TimeProvider.Now;
}
public FrmFundingLineEvent(FundingLine pFundingLine)
{
InitializeComponent();
_FundingLine = pFundingLine;
_exchangeRate=null;
_fundingLineEvent = new FundingLineEvent();
InitializeComboBoxDirections();
dateTimePickerEvent.Value = TimeProvider.Now;
dateTimePickerEvent.Format = DateTimePickerFormat.Custom;
dateTimePickerEvent.CustomFormat = ApplicationSettings.GetInstance("").SHORT_DATE_FORMAT;
}
public void ApplyRules(FundingLineEvent e)
{
if (e.Amount <= decimal.Zero)
throw new OpenCbsFundingLineEventException(OpenCbsFundingLineEventExceptionEnum.AmountIsLessZero);
if (e.Code == string.Empty)
throw new OpenCbsFundingLineEventException(OpenCbsFundingLineEventExceptionEnum.AmountIsEmpty);
if (e.Amount > e.FundingLine.RealRemainingAmount && e.Type == Enums.OFundingLineEventTypes.Disbursment)
throw new OpenCbsFundingLineEventException(OpenCbsFundingLineEventExceptionEnum.CommitmentFinancialIsNotEnough);
if (e.Amount > e.FundingLine.AnticipatedRemainingAmount &&
e.Movement == Enums.OBookingDirections.Debit && e.Type != Enums.OFundingLineEventTypes.Disbursment)
throw new OpenCbsFundingLineEventException(OpenCbsFundingLineEventExceptionEnum.CommitmentFinancialIsNotEnough);
}
public FundingLineEvent AddFundingLineEvent(FundingLineEvent newFundingLineEvent)
{
SqlTransaction sqlTransac = ConnectionManager.GetInstance().GetSqlTransaction(_user.Md5);
try
{
newFundingLineEvent = AddFundingLineEvent(newFundingLineEvent, sqlTransac);
sqlTransac.Commit();
}
catch (Exception ex)
{
sqlTransac.Rollback();
throw ex;
}
return newFundingLineEvent;
}
public void AddEventFundingLineWithoutFundingLine()
{
//Add Funding Line Event
var fundingLineServices = (FundingLineServices) container["FundingLineServices"];
var ev = new FundingLineEvent
{
Code = "KAO",
Type = OpenCBS.Enums.OFundingLineEventTypes.Entry,
CreationDate = DateTime.Now,
EndDate = DateTime.Now.AddDays(1),
Amount = 1000
};
fundingLineServices.AddFundingLineEvent(ev, null);
}
public int AddFundingLineEvent(FundingLineEvent pFundingLineEvent, SqlTransaction pTransac)
{
const string sqlText =
@"INSERT INTO [FundingLineEvents]
([code],
[amount],
[direction],
[fundingline_id],
[deleted],
[creation_date],
[type],
user_id,
contract_event_id)
VALUES
(@code,
@amount,
@direction,
@fundingLineId,
@deleted,
@creationDate,
@type,
@user_id,
@contract_event_id
)
SELECT SCOPE_IDENTITY()";
using (SqlConnection conn = GetConnection())
using (OpenCbsCommand cmd = pTransac == null
? new OpenCbsCommand(sqlText, conn)
: new OpenCbsCommand(sqlText, pTransac.Connection, pTransac))
{
cmd.AddParam("@code", pFundingLineEvent.Code);
cmd.AddParam("@amount", pFundingLineEvent.Amount);
cmd.AddParam("@direction", (int)pFundingLineEvent.Movement);
cmd.AddParam("@fundingLineId", pFundingLineEvent.FundingLine.Id);
// pFundingLineId);
cmd.AddParam("@deleted", false);
cmd.AddParam("@creationDate", pFundingLineEvent.CreationDate);
cmd.AddParam("@type", (int)pFundingLineEvent.Type);
cmd.AddParam("@user_id", _user==null? (object)null:_user.Id);
cmd.AddParam("contract_event_id",pFundingLineEvent.AttachTo==null ?
(object)null: pFundingLineEvent.AttachTo.Id);
pFundingLineEvent.Id = Convert.ToInt32(cmd.ExecuteScalar());
return pFundingLineEvent.Id;
}
}
public void RemoveEvent(FundingLineEvent fundingLineEvent)
{
if (null == _events)
{
return;
}
if (0 == Events.Count)
{
return;
}
FundingLineEvent fle = Events.Find(e => e.Id == fundingLineEvent.Id);
if (null == fle)
{
return;
}
fle.IsDeleted = false;
}
public void AddEvent(FundingLineEvent fundingLineEvent)
{
InvalidateAmounts();
if (null == _events)
{
return;
}
FundingLineEvent fle = Events.Find(e => e.Id == fundingLineEvent.Id);
if (null == fle)
{
Events.Add(fundingLineEvent);
}
else
{
fle.IsDeleted = false;
}
SortList();
}
public void DeleteEventFundingLine()
{
var fundingLineServices = (FundingLineManager) container["FundingLineServices"];
var fundingLine = fundingLineServices.SelectFundingLineById(1, true);
var ev = new FundingLineEvent
{
Id = 1,
Code = "NewKAO",
Type = OpenCBS.Enums.OFundingLineEventTypes.Entry,
FundingLine = fundingLine
};
int id = fundingLineServices.SelectFundingLineEventId(ev);
Assert.IsTrue(id > 1);
fundingLineServices.DeleteFundingLineEvent(ev);
id = fundingLineServices.SelectFundingLineEventId(ev);
Assert.IsTrue(id < 1);
}
public void DeleteFundingLineEvent(FundingLineEvent newFundingLineEvent)
{
using (SqlConnection conn = GetConnection())
using (SqlTransaction t = conn.BeginTransaction())
{
try
{
DeleteFundingLineEvent(newFundingLineEvent, t);
t.Commit();
}
catch (Exception)
{
t.Rollback();
throw;
}
}
}
public void RepayWrittenOffLoan()
{
ApplicationSettings.GetInstance("").UpdateParameter(OGeneralSettings.ALLOWSMULTIPLELOANS, false);
ApplicationSettings.GetInstance("").UpdateParameter(OGeneralSettings.INCREMENTALDURINGDAYOFF, false);
ApplicationSettings.GetInstance("").UpdateParameter(OGeneralSettings.ACCOUNTINGPROCESS, OAccountingProcesses.Cash);
ApplicationSettings.GetInstance("").UpdateParameter(OGeneralSettings.CALCULATIONLATEFEESDURINGPUBLICHOLIDAYS, 0);
ApplicationSettings.GetInstance("").UpdateParameter(OGeneralSettings.INTERESTS_ALSO_CREDITED_IN_FL, 1);
ApplicationSettings.GetInstance("").UpdateParameter(OGeneralSettings.DONOTSKIPWEEKENDSININSTALLMENTSDATE, 0);
ApplicationSettings.GetInstance("").UpdateParameter(OGeneralSettings.BAD_LOAN_DAYS, "180");
ProvisionTable _provisionningTable = ProvisionTable.GetInstance(new User() {Id = 1});
_provisionningTable.ProvisioningRates = new List<ProvisioningRate>();
_provisionningTable.Add(new ProvisioningRate { Number = 1, NbOfDaysMin = 0, NbOfDaysMax = 0, ProvisioningValue = 0.02, ProvisioningInterest = 0.02, ProvisioningPenalty = 0.02 });
_provisionningTable.Add(new ProvisioningRate { Number = 2, NbOfDaysMin = 1, NbOfDaysMax = 30, ProvisioningValue = 0.1, ProvisioningInterest = 0.01, ProvisioningPenalty = 0.01 });
_provisionningTable.Add(new ProvisioningRate { Number = 3, NbOfDaysMin = 31, NbOfDaysMax = 60, ProvisioningValue = 0.25, ProvisioningInterest = 0.025, ProvisioningPenalty = 0.025 });
_provisionningTable.Add(new ProvisioningRate { Number = 4, NbOfDaysMin = 61, NbOfDaysMax = 90, ProvisioningValue = 0.5, ProvisioningInterest = 0.5, ProvisioningPenalty = 0.5 });
_provisionningTable.Add(new ProvisioningRate { Number = 5, NbOfDaysMin = 91, NbOfDaysMax = 180, ProvisioningValue = 0.75, ProvisioningInterest = 0.75, ProvisioningPenalty = 0.75 });
_provisionningTable.Add(new ProvisioningRate { Number = 6, NbOfDaysMin = 181, NbOfDaysMax = 365, ProvisioningValue = 1, ProvisioningInterest = 1, ProvisioningPenalty = 1 });
_provisionningTable.Add(new ProvisioningRate { Number = 7, NbOfDaysMin = 366, NbOfDaysMax = 99999, ProvisioningValue = 1, ProvisioningInterest = 1, ProvisioningPenalty = 1 });
Teller.CurrentTeller = null;
//DynamicMock mockClientManager = new DynamicMock(typeof(ClientManager));
//DynamicMock mockLoanManager = new DynamicMock(typeof(LoanManager));
//Loan loan = new Loan
//{
// Amount = 11,
// Code = "Test",
// InterestRate = 1,
// NbOfInstallments = 2,
// InstallmentType = new InstallmentType(),
// AnticipatedTotalRepaymentPenalties = 2,
// NonRepaymentPenalties = new NonRepaymentPenalties(1, 1, 1, 1),
// GracePeriod = 2,
// Events = new EventStock(),
// StartDate = new DateTime(2009, 1, 1),
// FundingLine = new FundingLine { Currency = new Currency { Id = 1, Code = "Code", Name = "Name" } },
// LoanOfficer = new User(),
// Product = new LoanProduct { Currency = new Currency { Id = 1, Code = "Code", Name = "Name" } },
// InstallmentList = new List<Installment> { _installment1, _installment2 }
//};
//Person person = new Person { Active = false, LoanCycle = 1 };
//IClient group = new Group { Active = false, LoanCycle = 1, Members = new List<Member> { new Member { Tiers = person } } };
//mockClientManager.Expect("UpdateClientStatus", group, null);
//mockClientManager.Expect("UpdateClientLoanCycle", group, null);
//mockClientManager.Expect("UpdateClientStatus", person, null);
//mockClientManager.Expect("UpdateClientLoanCycle", person, null);
//LoanServices loanServices = new LoanServices(null, (ClientManager)mockClientManager.MockInstance, (LoanManager)mockLoanManager.MockInstance);
//loanServices.SaveLoan(ref loan, 1, ref group);
//loanServices.Disburse(loan, new DateTime(2008, 1, 1), true, true);
//loanServices.Repay(loan, group, 1, DateTime.Now, 1, true, 0, 0, false, 0, true);
//Loan disbursedLoan = loan;
//disbursedLoan.Disbursed = true;
//LoanDisbursmentEvent loanDisbursmentEvent = new LoanDisbursmentEvent
// {
// Date = new DateTime(2008, 1, 1),
// Amount = disbursedLoan.Amount,
// Commission = disbursedLoan.CalculateEntryFeesAmount(),
// ClientType = disbursedLoan.ClientType
// };
//disbursedLoan.Events.Add(loanDisbursmentEvent);
//loanServices.Repay(disbursedLoan, group, 1, DateTime.Now, 1, true, 0,0, false, 1, true);
AddDataForTestingTransaction dataHelper = new AddDataForTestingTransaction();
int _creditId = dataHelper.AddGenericCreditContractIntoDatabase();
IClient _client = new Group {Id = 5};
LoanManager _loanManager = new LoanManager(new User() {Id = 1});
Loan _loan = _loanManager.SelectLoan(_creditId, true, true, true);
_loan.CreditCommiteeDate = _loan.StartDate;
AccountManager accountManager = new AccountManager(new User() {Id = 1});
//accountManager.AddForCurrency(_loan.Product.Currency.Id);
FundingLine f = _loan.FundingLine;
f.Currency.Id = _loan.Product.Currency.Id;
FundingLineServices fundingLineServices = new FundingLineServices(new User() {Id = 1});
var ev = new FundingLineEvent
{
Code = "KAO",
Type = OFundingLineEventTypes.Entry,
CreationDate = new DateTime(2008,1,1),
EndDate = DateTime.Now.AddDays(1),
Amount = 1000,
FundingLine = f,
Movement = OBookingDirections.Credit,
IsDeleted = false
};
fundingLineServices.AddFundingLineEvent(ev, null);
f.AddEvent(ev);
_loan.LoanEntryFeesList=new List<LoanEntryFee>();
EntryFee productEntryFee = new EntryFee();
productEntryFee.Value = 1;
productEntryFee.IsRate = false;
productEntryFee.Id = 21;
LoanEntryFee loanEntryFee = new LoanEntryFee();
loanEntryFee.FeeValue = 1;
loanEntryFee.ProductEntryFee = productEntryFee;
loanEntryFee.ProductEntryFeeId = 21;
LoanServices loanServices = new LoanServices(new User() { Id = 1 });
PaymentMethod method = new PaymentMethod(1, "Savings", "Savings method", false);
loanServices.Disburse(_loan, new DateTime(2008, 1, 1), true, false, method);
////_loan.WrittenOff = true;
////_loan = loanServices.Repay(_loan, _client, 1, DateTime.Now, 10, true, 0, 0,false, 1, true);
//Assert.AreEqual(_loan.Disbursed, true);
//_loan.WrittenOff = true;
//OCurrency prevAmount = _loan.ChartOfAccounts.GetAccountByNumber(OAccounts.RECOVERY_OF_CHARGED_OFF_ASSETS, _loan.Product.Currency.Id).Balance;
//_loan = loanServices.Repay(_loan, _client, 1, DateTime.Now, 100, true, 0, 0, false, 5, false, OPaymentMethods.Cash, null, false);
//Assert.AreEqual(_loan.Events.GetNumberOfEvents, 1);
//_loan.Events.SortEventsByDate();
//Assert.AreEqual(_loan.Events.GetEvent(0).Code, "ROWO");
//_loan = loanServices.Repay(_loan, _client, 2, DateTime.Now, 100, true, 0, 0, false, 5, false, OPaymentMethods.Cash, null, false);
//Assert.AreEqual(_loan.Events.GetNumberOfEvents, 2);
//_loan.Events.SortEventsByDate();
//Assert.AreEqual(_loan.Events.GetEvent(0).Code, "ROWO");
}
public void ShouldNotDisburseMultipleTimes()
{
var settings = ApplicationSettings.GetInstance("");
settings.UpdateParameter(OGeneralSettings.ALLOWSMULTIPLELOANS, true);
settings.UpdateParameter(OGeneralSettings.ACCOUNTINGPROCESS, OAccountingProcesses.Cash);
Teller.CurrentTeller = null;
AddDataForTestingTransaction dataHelper = new AddDataForTestingTransaction();
int creditId = dataHelper.AddGenericCreditContractIntoDatabase();
LoanManager loanManager = new LoanManager(new User { Id = 1 });
Loan loan = loanManager.SelectLoan(creditId, true, true, true);
FundingLine f = loan.FundingLine;
f.Currency.Id = loan.Product.Currency.Id;
FundingLineServices fundingLineServices = new FundingLineServices(new User() { Id = 1 });
var ev = new FundingLineEvent
{
Code = "KAO",
Type = OFundingLineEventTypes.Entry,
CreationDate = new DateTime(2008, 1, 10),
EndDate = DateTime.Now.AddDays(1),
Amount = 1000,
FundingLine = f,
Movement = OBookingDirections.Credit,
IsDeleted = false
};
fundingLineServices.AddFundingLineEvent(ev, null);
f.AddEvent(ev);
loan.CreditCommiteeDate = loan.StartDate;
LoanServices loanServices = new LoanServices(new User { Id = 1 });
PaymentMethod method = new PaymentMethod(1, "Savings", "Savings method", false);
try
{
loan.Disbursed = true;
loanServices.Disburse(loan, new DateTime(2005, 10, 10), true, false, method);
Assert.Fail("Contract should not be validated");
} catch(OpenCbsContractSaveException)
{
}
try
{
loan.Disbursed = false;
loanServices.Disburse(loan, new DateTime(2005, 10, 10), true, false, method);
loanServices.Disburse(loan, new DateTime(2005, 10, 10), true, false, method);
Assert.Fail("Contract should not be failed due to double disbursements");
}
catch (OpenCbsContractSaveException)
{
}
}
public int SelectFundingLineEventId(FundingLineEvent lookupFundingLineEvent)
{
using (SqlConnection conn = GetConnection())
using (SqlTransaction t = conn.BeginTransaction())
{
try
{
int retval = SelectFundingLineEventId(lookupFundingLineEvent, t);
t.Commit();
return retval;
}
catch (Exception)
{
t.Rollback();
throw;
}
}
}
public void RepayLoanBeforeDisburse()
{
ApplicationSettings.GetInstance("").UpdateParameter(OGeneralSettings.ALLOWSMULTIPLELOANS, false);
ApplicationSettings.GetInstance("").UpdateParameter(OGeneralSettings.INCREMENTALDURINGDAYOFF, false);
ApplicationSettings.GetInstance("").UpdateParameter(OGeneralSettings.ACCOUNTINGPROCESS, OAccountingProcesses.Cash);
ApplicationSettings.GetInstance("").UpdateParameter(OGeneralSettings.CALCULATIONLATEFEESDURINGPUBLICHOLIDAYS, 0);
ApplicationSettings.GetInstance("").UpdateParameter(OGeneralSettings.INTERESTS_ALSO_CREDITED_IN_FL, 1);
ApplicationSettings.GetInstance("").UpdateParameter(OGeneralSettings.DONOTSKIPWEEKENDSININSTALLMENTSDATE, 0);
ApplicationSettings.GetInstance("").UpdateParameter(OGeneralSettings.BAD_LOAN_DAYS, "180");
ProvisionTable _provisionningTable = ProvisionTable.GetInstance(new User() { Id = 1 });
_provisionningTable.ProvisioningRates = new List<ProvisioningRate>();
_provisionningTable.Add(new ProvisioningRate { Number = 1, NbOfDaysMin = 0, NbOfDaysMax = 0, ProvisioningValue = 0.02, ProvisioningInterest = 0.02, ProvisioningPenalty = 0.02 });
_provisionningTable.Add(new ProvisioningRate { Number = 2, NbOfDaysMin = 1, NbOfDaysMax = 30, ProvisioningValue = 0.1, ProvisioningInterest = 0.1, ProvisioningPenalty = 0.1 });
_provisionningTable.Add(new ProvisioningRate { Number = 3, NbOfDaysMin = 31, NbOfDaysMax = 60, ProvisioningValue = 0.25, ProvisioningInterest = 0.25, ProvisioningPenalty = 0.25 });
_provisionningTable.Add(new ProvisioningRate { Number = 4, NbOfDaysMin = 61, NbOfDaysMax = 90, ProvisioningValue = 0.5, ProvisioningInterest= 0.5, ProvisioningPenalty= 0.5 });
_provisionningTable.Add(new ProvisioningRate { Number = 5, NbOfDaysMin = 91, NbOfDaysMax = 180, ProvisioningValue = 0.75, ProvisioningInterest = 0.75, ProvisioningPenalty = 0.75 });
_provisionningTable.Add(new ProvisioningRate { Number = 6, NbOfDaysMin = 181, NbOfDaysMax = 365, ProvisioningValue = 1, ProvisioningInterest = 1, ProvisioningPenalty= 1 });
_provisionningTable.Add(new ProvisioningRate { Number = 7, NbOfDaysMin = 366, NbOfDaysMax = 99999, ProvisioningValue = 1, ProvisioningInterest= 1, ProvisioningPenalty= 1 });
Teller.CurrentTeller = null;
AddDataForTestingTransaction dataHelper = new AddDataForTestingTransaction();
int _creditId = dataHelper.AddGenericCreditContractIntoDatabase();
IClient _client = new Group { Id = 5 };
LoanManager _loanManager = new LoanManager(new User() { Id = 1 });
Loan _loan = _loanManager.SelectLoan(_creditId, true, true, true);
_loan.CreditCommiteeDate = _loan.StartDate;
FundingLine f = _loan.FundingLine;
f.Currency.Id = _loan.Product.Currency.Id;
FundingLineServices fundingLineServices = new FundingLineServices(new User() { Id = 1 });
var ev = new FundingLineEvent
{
Code = "KAO",
Type = OFundingLineEventTypes.Entry,
CreationDate = new DateTime(2008, 1, 10),
EndDate = DateTime.Now.AddDays(1),
Amount = 1000,
FundingLine = f,
Movement = OBookingDirections.Credit,
IsDeleted = false
};
fundingLineServices.AddFundingLineEvent(ev, null);
f.AddEvent(ev);
LoanServices loanServices = new LoanServices(new User() { Id = 1 });
PaymentMethod method = new PaymentMethod(1, "Savings", "Savings method", false);
_loan = loanServices.Disburse(_loan, new DateTime(2005, 10, 10), true, false, method);
Assert.AreEqual(_loan.Disbursed, true);
PaymentMethod paymentMethod = new PaymentMethod(1, "Cash", "", false);
loanServices.Repay(_loan, _client, 1, new DateTime(2005, 1, 5), 100, true, 0, 0, false, 5, false, false, paymentMethod, null, false);
}
/// <summary>
/// Cancels last event from given contract, restores associated installment status.
/// and restores Client(individual, corporate) status
/// </summary>
/// <param name="contract">Contract</param>
/// <param name="pClient"></param>
/// <param name="comment"> </param>
/// <returns>Cancelled event</returns>
public Event CancelLastEvent(Loan contract, IClient pClient, string comment)
{
using (SqlConnection conn = _loanManager.GetConnection())
using (SqlTransaction sqlTransaction = conn.BeginTransaction())
{
Event cancelledEvent;
try
{
Event evnt = contract.GetLastNonDeletedEvent();
if (null == evnt)
throw new OpenCbsContractSaveException(OpenCbsContractSaveExceptionEnum.EventIsNull);
if (!evnt.Cancelable)
throw new OpenCbsContractSaveException(OpenCbsContractSaveExceptionEnum.EventNotCancelable);
if (string.IsNullOrEmpty(comment))
throw new OpenCbsContractSaveException(OpenCbsContractSaveExceptionEnum.EventCommentIsEmpty);
if (pClient is Person)
evnt.ClientType = OClientTypes.Person;
else if (pClient is Group)
evnt.ClientType = OClientTypes.Group;
else if (pClient is Corporate)
evnt.ClientType = OClientTypes.Corporate;
else if (pClient is Village)
evnt.ClientType = OClientTypes.Village;
var evntCopy = evnt.Copy();
evntCopy.Id = evnt.ParentId ?? evnt.Id;
CallInterceptor(new Dictionary<string, object>
{
{"Loan", contract},
{"Event", evntCopy},
{"Deleted", true},
{"SqlTransaction", sqlTransaction}
});
if (ApplicationSettings.GetInstance(User.CurrentUser.Md5).UseMandatorySavingAccount)
{
var id = 0;
if (int.TryParse(evnt.Comment, out id))
ServicesProvider.GetInstance()
.GetSavingServices()
.DeleteEvent(new SavingWithdrawEvent()
{
Id = id,
CancelDate = TimeProvider.Today
});
}
evnt.Comment = comment;
evnt.CancelDate = TimeProvider.Now;
// if event is loan close event, we delete it first
if (evnt is LoanCloseEvent)
{
_ePs.CancelFireEvent(evnt, sqlTransaction, contract, contract.Product.Currency.Id);
evnt.Deleted = true;
evnt = contract.GetLastNonDeletedEvent();
if (pClient is Person)
evnt.ClientType = OClientTypes.Person;
else if (pClient is Group)
evnt.ClientType = OClientTypes.Group;
else if (pClient is Corporate)
evnt.ClientType = OClientTypes.Corporate;
else if (pClient is Village)
evnt.ClientType = OClientTypes.Village;
evnt.Comment = comment;
evnt.CancelDate = TimeProvider.Now;
}
_ePs.CancelFireEvent(evnt, sqlTransaction, contract, contract.Product.Currency.Id);
_ePs.UpdateCommentForLoanEvent(evnt, sqlTransaction);
evnt.Deleted = true;
//in case total repayment there could be several rep events
foreach (RepaymentEvent evt in contract.Events.GetRepaymentEvents())
{
if ((evt.ParentId == evnt.ParentId && evnt.ParentId != null) || (evt.Id == evnt.ParentId))
{
evt.Deleted = true;
evt.Comment = evnt.Comment;
_ePs.UpdateCommentForLoanEvent(evt, sqlTransaction);
}
}
if (evnt.Code == "ATR" || evnt.Code == "RBLE")
{
foreach (Event cie in contract.Events)
{
if (cie is CreditInsuranceEvent)
if (cie.Deleted == false && cie.Code == "LCIP")
{
_ePs.CancelFireEvent(cie, sqlTransaction, contract, contract.Product.Currency.Id);
cie.Deleted = true;
}
}
}
cancelledEvent = evnt;
// Restore the installment status.
UnarchiveInstallments(contract, cancelledEvent, sqlTransaction);
contract.InstallmentList = _instalmentManager.SelectInstallments(contract.Id, sqlTransaction);
contract.GivenTranches = _loanManager.SelectTranches(contract.Id, sqlTransaction);
contract.NbOfInstallments = contract.InstallmentList.Count;
//return interest rate after delete event
contract.InterestRate = GetPreviousRate(contract);
if (evnt is LoanDisbursmentEvent)
{
contract.Disbursed = false;
}
else if (evnt is RescheduleLoanEvent)
{
contract.Rescheduled = false;
}
else if (cancelledEvent is TrancheEvent)
{
contract.Amount = contract.Amount - (cancelledEvent as TrancheEvent).Amount;
TrancheEvent trancheEventToDelete = new TrancheEvent();
foreach (var trancheEvent in contract.GivenTranches)
{
if (trancheEvent.Id == cancelledEvent.Id)
{
trancheEventToDelete = trancheEvent;
}
}
contract.GivenTranches.Remove(trancheEventToDelete);
if (contract.AllInstallmentsRepaid)
{
contract.ContractStatus = OContractStatus.Closed;
contract.Closed = true;
//Restore interest rate
contract.InterestRate =
contract.GivenTranches[contract.GivenTranches.Count - 1].InterestRate.Value;
}
}
else if (cancelledEvent is RepaymentEvent)
{
//restor a person of the corporate
_clientManager.RestorMemberOfGroupByEventId(cancelledEvent.Id, contract, sqlTransaction);
contract.EscapedMember = null;
if (cancelledEvent.RepaymentType == OPaymentType.TotalPayment)
{
if (contract.HasCompulsoryAmount())
{
SavingEvent savingUnblockEvent =
contract.CompulsorySavings.Events.FirstOrDefault(
e => e.LoanEventId == cancelledEvent.Id);
if (savingUnblockEvent != null)
{
_savingEventManager.DeleteSavingsEventByLoanEventId(
cancelledEvent.ParentId ?? cancelledEvent.Id, sqlTransaction);
savingUnblockEvent.Deleted = true;
}
}
}
}
if (!contract.WrittenOff && !contract.AllInstallmentsRepaid)
{
contract.Closed = false;
if (evnt is LoanDisbursmentEvent)
contract.ContractStatus = OContractStatus.Validated;
else
{
contract.ContractStatus = evnt is LoanValidationEvent
? OContractStatus.Pending
: OContractStatus.Active;
}
}
//come back after write off
if (evnt is WriteOffEvent)
{
contract.WrittenOff = false;
contract.ContractStatus = OContractStatus.Active;
CreditInsuranceEvent lciw = contract.GetNotDeletedInsuranceWriteOff();
if (lciw != null)
{
_ePs.CancelFireEvent(lciw, sqlTransaction, contract, contract.Product.Currency.Id);
lciw.Deleted = true;
}
}
_loanManager.UpdateLoan(contract, sqlTransaction);
FundingLineEvent flFundingLineEvent;
if (cancelledEvent is LoanDisbursmentEvent)
{
if (contract.HasCompulsoryAmount())
{
_savingEventManager.DeleteSavingsEventByLoanEventId(
cancelledEvent.ParentId ?? cancelledEvent.Id, sqlTransaction);
SavingBlockCompulsarySavingsEvent savingBlockEvent =
contract.CompulsorySavings.GetBlockCompulsorySavingEvent();
savingBlockEvent.Deleted = true;
}
LoanDisbursmentEvent temp = (LoanDisbursmentEvent) cancelledEvent;
flFundingLineEvent = new FundingLineEvent
{
Code = String.Concat("DE_", contract.Code),
Type = OFundingLineEventTypes.Disbursment,
Amount = temp.Amount,
Movement = OBookingDirections.Debit,
CreationDate = TimeProvider.Now,
FundingLine = contract.FundingLine
};
DeleteFundingLineEvent(ref contract, flFundingLineEvent, sqlTransaction);
_clientManager.DecrementLoanCycleByContractId(contract.Id, sqlTransaction);
// delete entry fee events
foreach (Event contractEvent in contract.Events)
{
if (contractEvent.Deleted)
continue;
if (contractEvent is LoanEntryFeeEvent)
{
_ePs.CancelFireEvent(contractEvent, sqlTransaction, contract,
contract.Product.Currency.Id);
contractEvent.Deleted = true;
CallInterceptor(new Dictionary<string, object>
{
{"Loan", contract},
{"Event", contractEvent},
{"Deleted", true},
{"SqlTransaction", sqlTransaction}
});
}
if (contractEvent is CreditInsuranceEvent)
{
_ePs.CancelFireEvent(contractEvent, sqlTransaction, contract,
contract.Product.Currency.Id);
contractEvent.Deleted = true;
}
}
if (evnt.ClientType == OClientTypes.Person)
{
if (_econimcActivityServices.EconomicActivityLoanHistoryExists(contract.Id, pClient.Id,
sqlTransaction))
_econimcActivityServices.UpdateDeletedEconomicActivityLoanHistory(contract.Id,
pClient.Id,
((Person) pClient)
.Activity.Id,
sqlTransaction, true);
}
else if (evnt.ClientType == OClientTypes.Group)
{
foreach (Member member in ((Group) pClient).Members)
{
if (_econimcActivityServices.EconomicActivityLoanHistoryExists(contract.Id,
member.Tiers.Id,
sqlTransaction))
_econimcActivityServices.UpdateDeletedEconomicActivityLoanHistory(contract.Id,
member.Tiers.Id,
((Person)
member.Tiers)
.Activity.Id,
sqlTransaction,
true);
}
}
else if (evnt.ClientType == OClientTypes.Corporate)
{
if (_econimcActivityServices.EconomicActivityLoanHistoryExists(contract.Id, pClient.Id,
sqlTransaction))
_econimcActivityServices.UpdateDeletedEconomicActivityLoanHistory(contract.Id,
pClient.Id,
((Corporate) pClient)
.Activity.Id,
sqlTransaction, true);
}
}
else if (cancelledEvent is RepaymentEvent)
{
RepaymentEvent temp = (RepaymentEvent) cancelledEvent;
decimal amountCalc = (temp.Principal.HasValue ? temp.Principal.Value : 0) +
(ApplicationSettings.GetInstance(_user != null ? _user.Md5 : "").
InterestsCreditedInFL
? ((temp.Interests.HasValue ? temp.Interests.Value : 0)
+ (temp.Penalties.HasValue ? temp.Penalties.Value : 0))
: 0);
if (amountCalc > 0 ||
ApplicationSettings.GetInstance(_user != null ? _user.Md5 : "").InterestsCreditedInFL)
{
flFundingLineEvent = new FundingLineEvent
{
Code = String.Concat("RE_", contract.Code, "_INS_", temp.InstallmentNumber),
Type = OFundingLineEventTypes.Repay,
Amount = amountCalc,
CreationDate = TimeProvider.Now,
FundingLine =
_fundingLineServices.SelectFundingLineById(contract.FundingLine.Id,
sqlTransaction)
};
//temporary line to check whether funding line has enough amount to debit repayment event
flFundingLineEvent.Movement = OBookingDirections.Debit;
_fundingLineServices.ApplyRulesAmountEventFundingLine(flFundingLineEvent);
flFundingLineEvent.Movement = OBookingDirections.Credit;
DeleteFundingLineEvent(ref contract, flFundingLineEvent, sqlTransaction);
}
}
CancelSavingsEvent(cancelledEvent, sqlTransaction);
sqlTransaction.Commit();
sqlTransaction.Dispose();
SetClientStatus(contract, pClient);
}
catch (Exception)
{
sqlTransaction.Rollback();
throw;
}
return cancelledEvent;
}
}
public Loan UpdateContractStatus(Loan credit, Project project, IClient client, bool undoValidation)
{
CheckOperationDate(credit.CreditCommiteeDate.Value);
using (SqlConnection conn = _loanManager.GetConnection())
using (SqlTransaction sqlTransaction = conn.BeginTransaction())
{
try
{
if (credit.StartDate.Date < ((DateTime) credit.CreditCommiteeDate).Date)
throw new OpenCbsContractSaveException(
OpenCbsContractSaveExceptionEnum.LoanWasValidatedLaterThanDisbursed);
Loan tempLoan = credit.Copy();
LoanValidationEvent lve = null;
if (undoValidation)
{
if (tempLoan.Events.GetLastLoanNonDeletedEvent != null &&
tempLoan.Events.GetLastLoanNonDeletedEvent is LoanValidationEvent)
{
((LoanValidationEvent) tempLoan.Events.GetLastLoanNonDeletedEvent).Amount = credit.Amount;
_ePs.CancelFireEvent(tempLoan.Events.GetLastLoanNonDeletedEvent, sqlTransaction, tempLoan,
tempLoan.Product.Currency.Id);
tempLoan.Events.GetLastLoanNonDeletedEvent.Deleted = true;
}
}
else if (tempLoan.ContractStatus == OContractStatus.Validated)
{
lve = new LoanValidationEvent();
lve.Amount = tempLoan.Amount;
lve.Date = tempLoan.CreditCommiteeDate.Value;
lve.Cancelable = true;
lve.User = _user;
lve.Deleted = false;
if (Teller.CurrentTeller != null && Teller.CurrentTeller.Id != 0)
lve.TellerId = Teller.CurrentTeller.Id;
_ePs.FireEvent(lve, tempLoan, sqlTransaction);
tempLoan.Events.Add(lve);
}
_loanManager.UpdateLoanStatus(tempLoan, sqlTransaction);
project.SetStatus();
new ProjectServices(_user).UpdateProjectStatus(project, sqlTransaction);
client.SetStatus();
new ClientServices(_user).UpdateClientStatus(client, sqlTransaction);
FundingLineEvent pendingFundingLineEvent = new FundingLineEvent
{
Code =
string.Concat(
OFundingLineEventTypes.Commitment.
ToString(), "/", tempLoan.Code),
Type = OFundingLineEventTypes.Commitment,
FundingLine =
_fundingLineServices.SelectFundingLineById(
tempLoan.FundingLine.Id, sqlTransaction),
Movement = OBookingDirections.Debit,
CreationDate = TimeProvider.Now,
Amount = tempLoan.Amount
,
AttachTo = lve
};
//if this is a new validate event, register it, otherwise delete previous validate event
if (tempLoan.ContractStatus == OContractStatus.Validated)
tempLoan.FundingLine.AddEvent(_fundingLineServices.AddFundingLineEvent(pendingFundingLineEvent,
sqlTransaction));
else if (undoValidation)
{
DeleteFundingLineEvent(ref tempLoan, pendingFundingLineEvent, sqlTransaction);
}
sqlTransaction.Commit();
return tempLoan;
}
catch (Exception ex)
{
sqlTransaction.Rollback();
throw ex;
}
}
}
public void DeleteFundingLineEvent(FundingLineEvent newFundingLineEvent, SqlTransaction sqlTrans)
{
_eventFundingLineManager.DeleteFundingLineEvent(newFundingLineEvent, sqlTrans);
}
public Loan Disburse(Loan pLoan, DateTime pDateToDisburse, bool pAlignInstallmentsDatesOnRealDisbursmentDate,
bool pDisableFees, PaymentMethod method)
{
Loan copyLoan = pLoan.Copy();
CheckDisbursedLoan(copyLoan, pDateToDisburse);
CheckOperationDate(pDateToDisburse);
using (SqlConnection connection = _loanManager.GetConnection())
using (SqlTransaction sqlTransaction = connection.BeginTransaction())
{
try
{
LoanDisbursmentEvent loanDisbursmentEvent = copyLoan.Disburse(pDateToDisburse,
pAlignInstallmentsDatesOnRealDisbursmentDate,
pDisableFees);
loanDisbursmentEvent.User = _user;
loanDisbursmentEvent.PaymentMethod = method;
if (pLoan.CompulsorySavings != null)
loanDisbursmentEvent.Comment = pLoan.CompulsorySavings.Code;
FundingLineEvent flFundingLineEvent = new FundingLineEvent
{
Code = String.Concat("DE_", copyLoan.Code),
Type = OFundingLineEventTypes.Disbursment,
Amount = loanDisbursmentEvent.Amount,
Movement = OBookingDirections.Debit,
CreationDate = TimeProvider.Now,
FundingLine =
_fundingLineServices.SelectFundingLineById(
copyLoan.FundingLine.Id, sqlTransaction),
AttachTo = loanDisbursmentEvent
};
if (Teller.CurrentTeller != null && Teller.CurrentTeller.Id != 0)
{
loanDisbursmentEvent.TellerId = Teller.CurrentTeller.Id;
flFundingLineEvent.TellerId = Teller.CurrentTeller.Id;
}
loanDisbursmentEvent.Comment = copyLoan.Comments;
_ePs.FireEvent(loanDisbursmentEvent, copyLoan, sqlTransaction);
flFundingLineEvent = _fundingLineServices.AddFundingLineEvent(flFundingLineEvent, sqlTransaction);
foreach (Event item in copyLoan.Events)
{
if (item is CreditInsuranceEvent)
{
_ePs.FireEvent(item, copyLoan, sqlTransaction);
break;
}
}
copyLoan.ContractStatus = OContractStatus.Active;
if (copyLoan.Project != null)
copyLoan.Project.Client.Active = true;
_loanManager.UpdateLoan(copyLoan, sqlTransaction);
int loanDisbEventId = loanDisbursmentEvent.Id;
if (pAlignInstallmentsDatesOnRealDisbursmentDate ||
ApplicationSettings.GetInstance(_user != null ? _user.Md5 : string.Empty).
PayFirstInterestRealValue)
foreach (Installment installment in copyLoan.InstallmentList)
_instalmentManager.UpdateInstallment(installment, copyLoan.Id, loanDisbEventId,
sqlTransaction);
copyLoan.FundingLine.AddEvent(flFundingLineEvent);
loanDisbursmentEvent.Cancelable = true;
if (copyLoan.HasCompulsoryAmount())
{
SavingBookContract compulsorySaving = copyLoan.CompulsorySavings;
SavingBlockCompulsarySavingsEvent savingBlockEvent =
compulsorySaving.GetBlockCompulsorySavingEvent();
Debug.Assert(savingBlockEvent != null,
"Saving should have block event on disbursment if it has compulsary saving");
savingBlockEvent.LoanEventId = loanDisbEventId;
_ePs.FireSavingBlockEvent(savingBlockEvent, compulsorySaving.Id, sqlTransaction);
}
_clientManager.IncrementLoanCycleByContractId(pLoan.Id, sqlTransaction);
SetEconomicActivity(pLoan, sqlTransaction);
loanDisbursmentEvent.PaymentMethodId = method.Id;
CallInterceptor(new Dictionary<string, object>
{
{"Loan", pLoan},
{"Event", loanDisbursmentEvent},
{"SqlTransaction", sqlTransaction}
});
if (loanDisbursmentEvent.Commissions != null && loanDisbursmentEvent.Commissions.Count != 0)
CallInterceptor(new Dictionary<string, object>
{
{"Loan", pLoan},
{
"Event", new LoanEntryFeeEvent
{
Id = loanDisbursmentEvent.Commissions.First().Id,
Fee = loanDisbursmentEvent.Commissions.Sum(i => i.Fee.Value),
Code = "LEE0",
Date = loanDisbursmentEvent.Date
}
},
{"SqlTransaction", sqlTransaction}
});
sqlTransaction.Commit();
return copyLoan;
}
catch
{
if (sqlTransaction != null) sqlTransaction.Rollback();
throw;
}
}
}
private void frmFundingLineEvent_FormClosing(object sender, FormClosingEventArgs e)
{
if (!_saved)
_fundingLineEvent = null;
}
public void UpdateFundingLineEvent(FundingLineEvent newFundingLineEvent, SqlTransaction sqlTrans)
{
_eventFundingLineManager.UpdateFundingLineEvent(newFundingLineEvent, sqlTrans); //new event
}
public int SelectFundingLineEventId(FundingLineEvent lookupFundingLineEvent, SqlTransaction sqlTransac)
{
return _eventFundingLineManager.SelectFundingLineEventId(lookupFundingLineEvent, sqlTransac, false);
}
public void SetEventFundingLine(FundingLineEvent e)
{
_fundingLineEvent = e;
}
public int AddFundingLineEvent(FundingLineEvent newFundingLineEvent, SqlTransaction sqlTrans)
{
return _eventFundingLineManager.AddFundingLineEvent(newFundingLineEvent, sqlTrans); //new event
}
public Loan Repay(Loan curentLoan,
IClient client,
int installmentNumber,
DateTime payDate,
OCurrency amount,
bool disableFees,
OCurrency manualFeesAmount,
OCurrency manualCommission,
bool disableInterests,
OCurrency manualInterestsAmount,
bool keepExpectedInstallment,
bool proportionPayment,
PaymentMethod paymentMethod,
string comment,
bool isPending)
{
if (payDate.Date < curentLoan.StartDate.Date)
{
throw new OpenCbsRepayException(OpenCbsRepayExceptionsEnum.RepaymentBeforeDisburse);
}
if (curentLoan.Events.GetRepaymentEvents().Any(r => !r.Deleted && r.Date > payDate))
{
throw new OpenCbsRepayException(OpenCbsRepayExceptionsEnum.RepaymentBeforeLastEventDate);
}
CheckOperationDate(payDate);
Loan savedContract = curentLoan.Copy();
using (SqlConnection conn = _loanManager.GetConnection())
using (SqlTransaction sqlTransaction = conn.BeginTransaction())
{
try
{
//Repay
// Accrued Interest Event generation
if (ApplicationSettings.GetInstance(_user.Md5).AccountingProcesses == OAccountingProcesses.Accrual)
{
DateTime dateTime = payDate;
AccruedInterestEvent e = savedContract.GetAccruedInterestEvent(dateTime);
if (e != null)
{
if (Teller.CurrentTeller != null && Teller.CurrentTeller.Id != 0)
e.TellerId = Teller.CurrentTeller.Id;
ServicesProvider.GetInstance().GetContractServices().AddAccruedInterestEvent(savedContract,
e,
sqlTransaction);
}
}
RepaymentEvent repayEvent = savedContract.Repay(installmentNumber, payDate, amount, disableFees,
manualFeesAmount, manualCommission,
disableInterests, manualInterestsAmount,
keepExpectedInstallment, proportionPayment,
paymentMethod, comment,
isPending);
savedContract.EscapedMember = curentLoan.EscapedMember;
repayEvent.User = _user;
//the code below should be moved into event generation proccess
if (Teller.CurrentTeller != null && Teller.CurrentTeller.Id != 0)
repayEvent.TellerId = Teller.CurrentTeller.Id;
if (!isPending)
{
FundingLineEvent repayFlFundingLineEvent = new FundingLineEvent
{
Code =
String.Concat("RE_", curentLoan.Code,
"_INS_", installmentNumber),
Type = OFundingLineEventTypes.Repay,
Amount =
ApplicationSettings.GetInstance(
_user != null
? _user.Md5
: "")
.InterestsCreditedInFL
? amount
: repayEvent.Principal,
Movement = OBookingDirections.Credit,
CreationDate = TimeProvider.Now,
FundingLine = curentLoan.FundingLine,
AttachTo = repayEvent
};
//the code below should be moved into event generation proccess
if (Teller.CurrentTeller != null && Teller.CurrentTeller.Id != 0)
repayFlFundingLineEvent.TellerId = Teller.CurrentTeller.Id;
//this line is to prevent errors from popping up when client makes a repayment of
//everything but the principal
if (repayFlFundingLineEvent.Amount > 0
|| ApplicationSettings.GetInstance(_user != null ? _user.Md5 : "").InterestsCreditedInFL)
curentLoan.FundingLine.AddEvent(
new FundingLineServices(_user).AddFundingLineEvent(repayFlFundingLineEvent,
sqlTransaction));
}
foreach (RepaymentEvent loanEvent in savedContract.Events.GetLoanRepaymentEvents())
{
if (loanEvent.IsFired) continue;
loanEvent.Comment = comment;
}
_ePs.FireEvent(repayEvent, savedContract, sqlTransaction);
if (paymentMethod.Method == OPaymentMethods.Savings)
DoRepaymentFromSavings(savedContract, repayEvent, amount, sqlTransaction);
if (repayEvent.RepaymentType == OPaymentType.TotalPayment && savedContract.HasCompulsoryAmount())
{
SavingBookContract compulsorySaving = savedContract.CompulsorySavings;
SavingUnblockCompulsorySavingsEvent savingUnblockEvent =
compulsorySaving.GetUnblockCompulsorySavingEvent();
if (savingUnblockEvent != null)
_ePs.FireSavingUnblockEvent(savingUnblockEvent, compulsorySaving.Id, repayEvent.Id,
sqlTransaction);
}
// Put a copy of installments into the history
ArchiveInstallments(curentLoan, repayEvent, sqlTransaction);
CreditInsuranceEvent cie = savedContract.Events.GetCreditInsuranceEvents();
if (cie != null)
_ePs.FireEvent(cie, savedContract, sqlTransaction);
//Update Installments
foreach (Installment installment in savedContract.InstallmentList)
_instalmentManager.UpdateInstallment(installment, savedContract.Id, repayEvent.Id,
sqlTransaction);
for (int i = savedContract.Events.GetNumberOfEvents - 1; i >= 0; i--)
{
Event e = savedContract.Events.GetEvent(i);
if ((e is RepaymentEvent) || (e is LoanDisbursmentEvent))
{
e.Cancelable = true;
if (!e.Cancelable)
break;
}
else
{
break;
}
}
var repaymentEvents = (from item in savedContract.Events.GetRepaymentEvents()
where item.ParentId == repayEvent.Id || item.Id == repayEvent.Id
select item).ToList();
var listOfRble = (from item in repaymentEvents where item.Code == "RBLE" select item).ToList();
var listOfRgle = repaymentEvents.Except(listOfRble).ToList();
if (repayEvent.Code == "RBLE")
CallInterceptor(new Dictionary<string, object>
{
{"Loan", savedContract},
{
"Event", new RepaymentEvent
{
Code = "RBLE",
Principal = listOfRble.Sum(item => item.Principal.Value),
Interests = listOfRble.Sum(item => item.Interests.Value),
Commissions = listOfRble.Sum(item => item.Commissions.Value),
Penalties = listOfRble.Sum(item => item.Fees.Value),
Id = repayEvent.Id,
Date = repayEvent.Date
}
},
{"SqlTransaction", sqlTransaction}
});
CallInterceptor(new Dictionary<string, object>
{
{"Loan", savedContract},
{
"Event", new RepaymentEvent
{
Code = "RGLE",
Principal = listOfRgle.Sum(item => item.Principal.Value),
Interests = listOfRgle.Sum(item => item.Interests.Value),
Commissions = listOfRgle.Sum(item => item.Commissions.Value),
Penalties = listOfRgle.Sum(item => item.Fees.Value),
Id = repayEvent.Id,
Date = repayEvent.Date
}
},
{"SqlTransaction", sqlTransaction}
});
if (savedContract.AllInstallmentsRepaid)
{
_ePs.FireEvent(savedContract.GetCloseEvent(payDate), savedContract, sqlTransaction);
}
_loanManager.UpdateLoan(savedContract, sqlTransaction);
if (sqlTransaction != null)
{
sqlTransaction.Commit();
sqlTransaction.Dispose();
}
SetClientStatus(savedContract, client);
savedContract.EscapedMember = null;
return savedContract;
}
catch (Exception)
{
if (sqlTransaction != null) sqlTransaction.Rollback();
throw;
}
}
}
private void AddFundingLineEvent(Loan loan)
{
FundingLine f = loan.FundingLine;
f.Currency.Id = loan.Product.Currency.Id;
FundingLineServices fundingLineServices = new FundingLineServices(new User() { Id = 1 });
var ev = new FundingLineEvent
{
Code = "KAO",
Type = OFundingLineEventTypes.Entry,
CreationDate = new DateTime(2008, 1, 10),
EndDate = DateTime.Now.AddDays(1),
Amount = 1000,
FundingLine = f,
Movement = OBookingDirections.Credit,
IsDeleted = false
};
fundingLineServices.AddFundingLineEvent(ev, null);
f.AddEvent(ev);
}
private void DeleteFundingLineEvent(ref Loan contract, FundingLineEvent flFundingLineEvent,
SqlTransaction sqlTransaction)
{
if (flFundingLineEvent != null)
{
flFundingLineEvent.Id = _fundingLineServices.SelectFundingLineEventId(flFundingLineEvent, sqlTransaction);
if (flFundingLineEvent.Id > 0)
{
_fundingLineServices.DeleteFundingLineEvent(flFundingLineEvent, sqlTransaction);
contract.FundingLine.RemoveEvent(flFundingLineEvent);
}
}
}
public List<FundingLineEvent> GetEvents(FundingLine fl)
{
List<FundingLineEvent> list = new List<FundingLineEvent>();
const string q = @"SELECT id,
code,
amount,
direction,
deleted,
creation_date,
type
FROM dbo.FundingLineEvents
WITH (READUNCOMMITTED)
WHERE fundingline_id = @id
ORDER BY creation_date DESC, id DESC";
using (SqlConnection conn = GetConnection())
using (OpenCbsCommand c = new OpenCbsCommand(q, conn))
{
c.AddParam("@id", fl.Id);
using (OpenCbsReader r = c.ExecuteReader())
{
if (null == r || r.Empty) return list;
while (r.Read())
{
FundingLineEvent e = new FundingLineEvent();
e.Id = r.GetInt("id");
e.Code = r.GetString("code");
e.Amount = r.GetMoney("amount");
e.Movement = (OBookingDirections) r.GetSmallInt("direction");
e.IsDeleted = r.GetBool("deleted");
e.CreationDate = r.GetDateTime("creation_date");
e.Type = (OFundingLineEventTypes) r.GetSmallInt("type");
e.FundingLine = fl;
list.Add(e);
}
}
}
return list;
}
public Loan ConfirmPendingRepayment(Loan pLoan, IClient pClient)
{
Loan savedContract = pLoan.Copy();
using (SqlConnection conn = _loanManager.GetConnection())
using (SqlTransaction sqlTransaction = conn.BeginTransaction())
{
try
{
RepaymentEvent repayEvent = savedContract.ConfirmPendingRepayment();
repayEvent.User = _user;
if (Teller.CurrentTeller != null && Teller.CurrentTeller.Id != 0)
repayEvent.TellerId = Teller.CurrentTeller.Id;
FundingLineEvent repayFlFundingLineEvent = new FundingLineEvent
{
Code =
String.Concat("RE_", pLoan.Code, "_INS_",
repayEvent.InstallmentNumber),
Type = OFundingLineEventTypes.Repay,
Amount =
ApplicationSettings.GetInstance(_user != null
? _user.
Md5
: "").
InterestsCreditedInFL
? repayEvent.Principal +
repayEvent.Interests
: repayEvent.Principal,
Movement = OBookingDirections.Credit,
CreationDate = TimeProvider.Now,
FundingLine = pLoan.FundingLine
,
AttachTo = repayEvent
};
if (Teller.CurrentTeller != null && Teller.CurrentTeller.Id != 0)
repayFlFundingLineEvent.TellerId = Teller.CurrentTeller.Id;
//this line is to prevent errors from popping up when client makes a repayment of
//everything but the principal
if (repayFlFundingLineEvent.Amount > 0 ||
ApplicationSettings.GetInstance(_user != null ? _user.Md5 : "").InterestsCreditedInFL)
pLoan.FundingLine.AddEvent(
new FundingLineServices(_user).AddFundingLineEvent(repayFlFundingLineEvent, sqlTransaction));
_ePs.FireEvent(repayEvent, savedContract, sqlTransaction);
// Put a copy of installments into the history
ArchiveInstallments(pLoan, repayEvent, sqlTransaction);
//Update Installments
foreach (Installment installment in savedContract.InstallmentList)
{
_instalmentManager.UpdateInstallment(installment, savedContract.Id, repayEvent.Id,
sqlTransaction);
}
for (int i = savedContract.Events.GetNumberOfEvents - 1; i >= 0; i--)
{
Event e = savedContract.Events.GetEvent(i);
if ((e is RepaymentEvent) || (e is LoanDisbursmentEvent))
{
e.Cancelable = true; //EventIsCancelable(e.Id, sqlTransaction);
if (!e.Cancelable)
break;
}
else
{
break;
}
}
_loanManager.UpdateLoan(savedContract, sqlTransaction);
if (sqlTransaction != null) sqlTransaction.Commit();
SetClientStatus(savedContract, pClient);
return savedContract;
}
catch (Exception)
{
if (sqlTransaction != null) sqlTransaction.Rollback();
throw;
}
}
}
public void RemoveEvent(FundingLineEvent fundingLineEvent)
{
if (null == _events) return;
if (0 == Events.Count) return;
FundingLineEvent fle = Events.Find(e => e.Id == fundingLineEvent.Id);
if (null == fle) return;
fle.IsDeleted = false;
}
private void ApplyRulesPendingEvent()
{
pendingFundingLineEvent = new FundingLineEvent
{
Code = string.Concat(OFundingLineEventTypes.Commitment.ToString(), "/", textBoxLoanContractCode.Text),
Type = OFundingLineEventTypes.Commitment,
FundingLine = ((FundingLine)comboBoxLoanFundingLine.SelectedItem),
Movement = OBookingDirections.Debit,
Amount = ServicesHelper.ConvertStringToDecimal(nudLoanAmount.Text, true)
};
if (pendingFundingLineEvent.FundingLine != null)
ServicesProvider.GetInstance().GetFundingLinesServices().ApplyRulesAmountEventFundingLine(pendingFundingLineEvent);
}
private void buttonCancel_Click(object sender, EventArgs e)
{
_fundingLineEvent = null;
_saved = false;
Close();
}
