protected static FR_Guids Execute(DbConnection Connection, DbTransaction Transaction, P_L5BD_SCDP_1347 Parameter, CSV2Core.SessionSecurity.SessionSecurityTicket securityTicket = null) { #region UserCode var returnValue = new FR_Guids(); //Put your code here var savedProcesses = new List <Guid>(); foreach (var billHeaderID in Parameter.BIL_BillHeaderIDs.ToList()) { #region Prerequisites var billHeader = new ORM_BIL_BillHeader(); billHeader.Load(Connection, Transaction, billHeaderID); //assigned payments var assignedPaymentsQuery = new ORM_BIL_BillHeader_AssignedPayment.Query(); assignedPaymentsQuery.BIL_BillHeader_RefID = billHeader.BIL_BillHeaderID; assignedPaymentsQuery.Tenant_RefID = securityTicket.TenantID; var foundAssignmentPayments = ORM_BIL_BillHeader_AssignedPayment.Query.Search(Connection, Transaction, assignedPaymentsQuery); //calculated sum of payments to the present day var paymentsSummForCurrentDate = foundAssignmentPayments.Where(fap => fap.Creation_Timestamp <= DateTime.Now).Sum(x => x.AssignedValue); //customer var customerQuery = new ORM_CMN_BPT_CTM_Customer.Query(); customerQuery.Tenant_RefID = securityTicket.TenantID; customerQuery.Ext_BusinessParticipant_RefID = billHeader.BillRecipient_BuisnessParticipant_RefID; var foundCustomer = ORM_CMN_BPT_CTM_Customer.Query.Search(Connection, Transaction, customerQuery).Single(); //Model ORM_ACC_DUN_Dunning_Model.Query defaultDunningModelQuery = new ORM_ACC_DUN_Dunning_Model.Query(); defaultDunningModelQuery.Tenant_RefID = securityTicket.TenantID; defaultDunningModelQuery.IsDefaultCustomerModel = true; var foundDunningModel = ORM_ACC_DUN_Dunning_Model.Query.Search(Connection, Transaction, defaultDunningModelQuery).SingleOrDefault(); //Assignment to levels var modelToLevelsAssignmentQuery = new ORM_ACC_DUN_DunningLevel_ModelAssignment.Query(); modelToLevelsAssignmentQuery.Dunning_Model_RefID = foundDunningModel.ACC_DUN_Dunning_ModelID; modelToLevelsAssignmentQuery.Tenant_RefID = securityTicket.TenantID; var foundModelToLevelsAssignments = ORM_ACC_DUN_DunningLevel_ModelAssignment.Query.Search(Connection, Transaction, modelToLevelsAssignmentQuery); var minimalLevelInSequence = foundModelToLevelsAssignments.OrderBy(la => la.OrderSequence).First(); //Levels var dunningLevels = new ORM_ACC_DUN_Dunning_Level(); //dunningLevels.Load(Connection, Transaction, foundModelToLevelsAssignment.Dunning_Level_RefID); #endregion //model to customer assignment var modelToCustomerAssignment = new ORM_ACC_DUN_Dunning_Model_2_Customer(); modelToCustomerAssignment.Tenant_RefID = securityTicket.TenantID; modelToCustomerAssignment.ACC_DUN_DunningModel_RefID = foundDunningModel.ACC_DUN_Dunning_ModelID; modelToCustomerAssignment.CMN_BPT_CTM_Customer_RefID = foundCustomer.CMN_BPT_CTM_CustomerID; var savedModelToCustomerAssignmentID = new FR_Guid(modelToCustomerAssignment.Save(Connection, Transaction), modelToCustomerAssignment.AssignmentID); //dunning process P_L2BD_SADDP_1412 saveDunningProcessParameter = new P_L2BD_SADDP_1412(); saveDunningProcessParameter.DunnedCustomer_RefID = foundCustomer.CMN_BPT_CTM_CustomerID; saveDunningProcessParameter.DunningModel_RefID = foundDunningModel.ACC_DUN_Dunning_ModelID; saveDunningProcessParameter.Current_DunningLevel_RefID = minimalLevelInSequence.Dunning_Level_RefID; saveDunningProcessParameter.DunnedAmount_Total = billHeader.TotalValue_BeforeTax - paymentsSummForCurrentDate; saveDunningProcessParameter.Currency_RefID = billHeader.Currency_RefID; saveDunningProcessParameter.ReachesNextDunningLevelAtDate = DateTime.Now.AddDays(minimalLevelInSequence.WaitPeriodToNextDunningLevel_In_Days); var savedDunningProcessID = cls_Save_ACC_DUN_DunningProcess.Invoke(Connection, Transaction, saveDunningProcessParameter, securityTicket).Result; //dunning process member bills P_L2BD_SADDPMB_1359 saveMemberBillsParameter = new P_L2BD_SADDPMB_1359(); saveMemberBillsParameter.BIL_BillHeader_RefID = billHeaderID; saveMemberBillsParameter.ACC_DUN_DunningProcess_RefID = savedDunningProcessID; saveMemberBillsParameter.ApplicableProcessDunningFees = 0; saveMemberBillsParameter.CurrentUnpaidBillFraction = 0; var savedMemberBillID = cls_Save_ACC_DUN_DunningProcess_MemberBill.Invoke(Connection, Transaction, saveMemberBillsParameter, securityTicket).Result; savedProcesses.Add(savedMemberBillID); //dunning process history var dunningProcessHistory = new ORM_ACC_DUN_DunningProcess_History(); dunningProcessHistory.ACC_DUN_Dunning_Level_RefID = minimalLevelInSequence.Dunning_Level_RefID; dunningProcessHistory.ACC_DUN_DunningProcess_RefID = savedDunningProcessID; dunningProcessHistory.Creation_Timestamp = DateTime.Now; dunningProcessHistory.DunningProcessFee_IncludingThisDunningLevel = 0; dunningProcessHistory.IsCurrentStep = true; dunningProcessHistory.Tenant_RefID = securityTicket.TenantID; var savedDunningProcessHistoryID = new FR_Guid(dunningProcessHistory.Save(Connection, Transaction), dunningProcessHistory.ACC_DUN_DunningProcess_HistoryID); } returnValue.Result = savedProcesses.ToArray(); return(returnValue); #endregion UserCode }
protected static FR_Guid Execute(DbConnection Connection, DbTransaction Transaction, P_L5BD_SDPLC_1642 Parameter, CSV2Core.SessionSecurity.SessionSecurityTicket securityTicket = null) { #region UserCode var returnValue = new FR_Guid(); var details = Parameter.BillHeaderWithDetails.DunningDetails; var bill = Parameter.BillHeaderWithDetails.Bill; //model var model = new ORM_ACC_DUN_Dunning_Model(); model.Load(Connection, Transaction, details.ACC_DUN_Dunning_ModelID); var modelToLevelsAssignmentQuery = new ORM_ACC_DUN_DunningLevel_ModelAssignment.Query(); modelToLevelsAssignmentQuery.Dunning_Model_RefID = model.ACC_DUN_Dunning_ModelID; modelToLevelsAssignmentQuery.Dunning_Level_RefID = Parameter.NextLevelID; modelToLevelsAssignmentQuery.Tenant_RefID = securityTicket.TenantID; var foundModelToLevelsAssignment = ORM_ACC_DUN_DunningLevel_ModelAssignment.Query.Search(Connection, Transaction, modelToLevelsAssignmentQuery).Single(); //dunning process loading var dunningProcess = new ORM_ACC_DUN_DunningProcess(); dunningProcess.Load(Connection, Transaction, details.ACC_DUN_DunningProcessID); dunningProcess.Current_DunningLevel_RefID = Parameter.NextLevelID; dunningProcess.ReachesNextDunningLevelAtDate = DateTime.Now.AddDays(foundModelToLevelsAssignment.WaitPeriodToNextDunningLevel_In_Days); dunningProcess.Save(Connection, Transaction); //get all previous history statuses var historyQuery = new ORM_ACC_DUN_DunningProcess_History.Query(); historyQuery.ACC_DUN_DunningProcess_RefID = dunningProcess.ACC_DUN_DunningProcessID; historyQuery.Tenant_RefID = securityTicket.TenantID; var foundHistories = ORM_ACC_DUN_DunningProcess_History.Query.Search(Connection, Transaction, historyQuery).ToList(); decimal summOfFees = 0; //and set their IsCurrentStep property foreach (var history in foundHistories) { history.IsCurrentStep = false; history.Save(Connection, Transaction); //while iterating, create summ of all fees in histories for dunning process if (history.IsSentToCustomer) { summOfFees += history.DunningProcessFee_IncludingThisDunningLevel; } } var newHistoryEntity = new ORM_ACC_DUN_DunningProcess_History(); newHistoryEntity.ACC_DUN_Dunning_Level_RefID = Parameter.NextLevelID; newHistoryEntity.ACC_DUN_DunningProcess_RefID = dunningProcess.ACC_DUN_DunningProcessID; newHistoryEntity.DunningProcessFee_IncludingThisDunningLevel = Parameter.FeeForLevel; newHistoryEntity.IsCurrentStep = true; newHistoryEntity.Tenant_RefID = securityTicket.TenantID; var savedNewHistoryID = new FR_Guid(newHistoryEntity.Save(Connection, Transaction), newHistoryEntity.ACC_DUN_DunningProcess_HistoryID).Result; var memberBills = new ORM_ACC_DUN_DunningProcess_MemberBill(); memberBills.Load(Connection, Transaction, details.ACC_DUN_DunningProcess_MemberBillID); memberBills.ApplicableProcessDunningFees = summOfFees + newHistoryEntity.DunningProcessFee_IncludingThisDunningLevel; //added fee from new history also #region Save booking line for dunning fee var bookingParam = new CL3_Payments.Complex.Manipulation.P_L3PY_CATfDF_0849 { DunningFee = Parameter.FeeForLevel, BillHeaderID = Parameter.BillHeaderWithDetails.Bill.BIL_BillHeaderID }; CL3_Payments.Complex.Manipulation.cls_Create_AccountingTransaction_for_Dunning_Fee.Invoke(Connection, Transaction, bookingParam, securityTicket); #endregion returnValue.Result = savedNewHistoryID; return(returnValue); #endregion UserCode }