/// <summary>
/// Create Facts (the accounting logic) for
/// MXI.
/// (single line)
/// <pre>
/// NotInvoicedReceipts DR (Receipt Org)
/// InventoryClearing CR
/// InvoicePV DR CR (difference)
/// Commitment
/// Expense CR
/// Offset DR
/// </pre>
/// </summary>
/// <param name="as1"></param>
/// <returns></returns>
public override List <Fact> CreateFacts(MAcctSchema as1)
{
List <Fact> facts = new List <Fact>();
// Nothing to do
if (GetM_Product_ID() == 0 || // no Product
Env.Signum(GetQty().Value) == 0 ||
Env.Signum(_receiptLine.GetMovementQty()) == 0) // Qty = 0
{
log.Fine("No Product/Qty - M_Product_ID=" + GetM_Product_ID()
+ ",Qty=" + GetQty() + ",InOutQty=" + _receiptLine.GetMovementQty());
return(facts);
}
MMatchInv matchInv = (MMatchInv)GetPO();
// create Fact Header
Fact fact = new Fact(this, as1, Fact.POST_Actual);
SetC_Currency_ID(as1.GetC_Currency_ID());
/** Needs to be handeled in PO Matching as1 no Receipt info
* if (_pc.isService())
* {
* log.Fine("Service - skipped");
* return fact;
* }
**/
// NotInvoicedReceipt DR
// From Receipt
Decimal multiplier = Math.Abs(Decimal.Round(Decimal.Divide(GetQty().Value, _receiptLine.GetMovementQty()), 12, MidpointRounding.AwayFromZero));
FactLine dr = fact.CreateLine(null,
GetAccount(Doc.ACCTTYPE_NotInvoicedReceipts, as1),
as1.GetC_Currency_ID(), Env.ONE, null); // updated below
if (dr == null)
{
_error = "No Product Costs";
return(null);
}
dr.SetQty(GetQty());
// dr.setM_Locator_ID(_receiptLine.getM_Locator_ID());
// MInOut receipt = _receiptLine.getParent();
// dr.setLocationFromBPartner(receipt.getC_BPartner_Location_ID(), true); // from Loc
// dr.setLocationFromLocator(_receiptLine.getM_Locator_ID(), false); // to Loc
Decimal temp = dr.GetAcctBalance();
// Set AmtAcctCr/Dr from Receipt (sets also Project)
if (!dr.UpdateReverseLine(MInOut.Table_ID, // Amt updated
_receiptLine.GetM_InOut_ID(), _receiptLine.GetM_InOutLine_ID(),
multiplier))
{
_error = "Mat.Receipt not posted yet";
return(null);
}
log.Fine("CR - Amt(" + temp + "->" + dr.GetAcctBalance()
+ ") - " + dr.ToString());
// InventoryClearing CR
// From Invoice
MAccount expense = _pc.GetAccount(ProductCost.ACCTTYPE_P_InventoryClearing, as1);
if (_pc.IsService())
{
expense = _pc.GetAccount(ProductCost.ACCTTYPE_P_Expense, as1);
}
Decimal LineNetAmt = _invoiceLine.GetLineNetAmt();
multiplier = Math.Abs(Decimal.Round(Decimal.Divide(GetQty().Value, _invoiceLine.GetQtyInvoiced()), 12, MidpointRounding.AwayFromZero));
if (multiplier.CompareTo(Env.ONE) != 0)
{
LineNetAmt = Decimal.Multiply(LineNetAmt, multiplier);
}
if (_pc.IsService())
{
LineNetAmt = dr.GetAcctBalance(); // book out exact receipt amt
}
FactLine cr = null;
if (as1.IsAccrual())
{
cr = fact.CreateLine(null, expense,
as1.GetC_Currency_ID(), null, LineNetAmt); // updated below
if (cr == null)
{
log.Fine("Line Net Amt=0 - M_Product_ID=" + GetM_Product_ID()
+ ",Qty=" + GetQty() + ",InOutQty=" + _receiptLine.GetMovementQty());
facts.Add(fact);
return(facts);
}
cr.SetQty(Decimal.Negate(GetQty().Value));
temp = cr.GetAcctBalance();
// Set AmtAcctCr/Dr from Invoice (sets also Project)
if (as1.IsAccrual() && !cr.UpdateReverseLine(MInvoice.Table_ID, // Amt updated
_invoiceLine.GetC_Invoice_ID(), _invoiceLine.GetC_InvoiceLine_ID(), multiplier))
{
_error = "Invoice not posted yet";
return(null);
}
log.Fine("DR - Amt(" + temp + "->" + cr.GetAcctBalance()
+ ") - " + cr.ToString());
}
else // Cash Acct
{
MInvoice invoice = _invoiceLine.GetParent();
if (as1.GetC_Currency_ID() == invoice.GetC_Currency_ID())
{
LineNetAmt = MConversionRate.Convert(GetCtx(), LineNetAmt,
invoice.GetC_Currency_ID(), as1.GetC_Currency_ID(),
invoice.GetDateAcct(), invoice.GetC_ConversionType_ID(),
invoice.GetAD_Client_ID(), invoice.GetAD_Org_ID());
}
cr = fact.CreateLine(null, expense,
as1.GetC_Currency_ID(), null, LineNetAmt);
cr.SetQty(Decimal.Negate(Decimal.Multiply(GetQty().Value, multiplier)));
}
cr.SetC_Activity_ID(_invoiceLine.GetC_Activity_ID());
cr.SetC_Campaign_ID(_invoiceLine.GetC_Campaign_ID());
cr.SetC_Project_ID(_invoiceLine.GetC_Project_ID());
cr.SetC_UOM_ID(_invoiceLine.GetC_UOM_ID());
cr.SetUser1_ID(_invoiceLine.GetUser1_ID());
cr.SetUser2_ID(_invoiceLine.GetUser2_ID());
// Invoice Price Variance difference
Decimal ipv = Decimal.Negate(Decimal.Add(cr.GetAcctBalance(), dr.GetAcctBalance()));
if (Env.Signum(ipv) != 0)
{
FactLine pv = fact.CreateLine(null,
_pc.GetAccount(ProductCost.ACCTTYPE_P_IPV, as1),
as1.GetC_Currency_ID(), ipv);
pv.SetC_Activity_ID(_invoiceLine.GetC_Activity_ID());
pv.SetC_Campaign_ID(_invoiceLine.GetC_Campaign_ID());
pv.SetC_Project_ID(_invoiceLine.GetC_Project_ID());
pv.SetC_UOM_ID(_invoiceLine.GetC_UOM_ID());
pv.SetUser1_ID(_invoiceLine.GetUser1_ID());
pv.SetUser2_ID(_invoiceLine.GetUser2_ID());
}
log.Fine("IPV=" + ipv + "; Balance=" + fact.GetSourceBalance());
MInOut inOut = _receiptLine.GetParent();
bool isReturnTrx = inOut.IsReturnTrx();
if (!IsPosted())
{
// Cost Detail Record - data from Expense/IncClearing (CR) record
MCostDetail.CreateInvoice(as1, GetAD_Org_ID(),
GetM_Product_ID(), matchInv.GetM_AttributeSetInstance_ID(),
_invoiceLine.GetC_InvoiceLine_ID(), 0, // No cost element
Decimal.Negate(cr.GetAcctBalance()), isReturnTrx ? Decimal.Negate(Utility.Util.GetValueOfDecimal(GetQty())) : Utility.Util.GetValueOfDecimal(GetQty()), // correcting
GetDescription(), GetTrx(), GetRectifyingProcess());
// Update Costing
UpdateProductInfo(as1.GetC_AcctSchema_ID(),
MAcctSchema.COSTINGMETHOD_StandardCosting.Equals(as1.GetCostingMethod()));
}
//
facts.Add(fact);
/** Commitment release ****/
if (as1.IsAccrual() && as1.IsCreateCommitment())
{
fact = Doc_Order.GetCommitmentRelease(as1, this,
Utility.Util.GetValueOfDecimal(GetQty()), _invoiceLine.GetC_InvoiceLine_ID(), Env.ONE);
if (fact == null)
{
return(null);
}
facts.Add(fact);
} // Commitment
return(facts);
}
/// <summary>
/// Process Allocation (does not update line).
/// - Update and Link Invoice/Payment/Cash
/// </summary>
/// <param name="reverse">reverse if true allocation is reversed</param>
/// <returns>C_BPartner_ID</returns>
public int ProcessIt(bool reverse)
{
log.Fine("Reverse=" + reverse + " - " + ToString());
int C_Invoice_ID = GetC_Invoice_ID();
MInvoicePaySchedule invoiceSchedule = null;
MPayment payment = null;
MCashLine cashLine = null;
MInvoice invoice = GetInvoice();
if (invoice != null &&
GetC_BPartner_ID() != invoice.GetC_BPartner_ID())
{
SetC_BPartner_ID(invoice.GetC_BPartner_ID());
}
//
int C_Payment_ID = GetC_Payment_ID();
int C_CashLine_ID = GetC_CashLine_ID();
// Update Payment
if (C_Payment_ID != 0)
{
payment = new MPayment(GetCtx(), C_Payment_ID, Get_TrxName());
if (GetC_BPartner_ID() != payment.GetC_BPartner_ID())
{
log.Warning("C_BPartner_ID different - Invoice=" + GetC_BPartner_ID() + " - Payment=" + payment.GetC_BPartner_ID());
}
if (reverse)
{
if (!payment.IsCashTrx())
{
payment.SetIsAllocated(false);
payment.Save();
}
}
else
{
if (payment.TestAllocation())
{
payment.Save();
}
}
}
// Payment - Invoice
if (C_Payment_ID != 0 && invoice != null)
{
// Link to Invoice
if (reverse)
{
invoice.SetC_Payment_ID(0);
log.Fine("C_Payment_ID=" + C_Payment_ID
+ " Unlinked from C_Invoice_ID=" + C_Invoice_ID);
}
else if (invoice.IsPaid())
{
invoice.SetC_Payment_ID(C_Payment_ID);
log.Fine("C_Payment_ID=" + C_Payment_ID
+ " Linked to C_Invoice_ID=" + C_Invoice_ID);
}
// Link to Order
String update = "UPDATE C_Order o "
+ "SET C_Payment_ID="
+ (reverse ? "NULL " : "(SELECT C_Payment_ID FROM C_Invoice WHERE C_Invoice_ID=" + C_Invoice_ID + ") ")
+ "WHERE EXISTS (SELECT * FROM C_Invoice i "
+ "WHERE o.C_Order_ID=i.C_Order_ID AND i.C_Invoice_ID=" + C_Invoice_ID + ")";
if (DataBase.DB.ExecuteQuery(update, null, Get_TrxName()) > 0)
{
log.Fine("C_Payment_ID=" + C_Payment_ID
+ (reverse ? " UnLinked from" : " Linked to")
+ " order of C_Invoice_ID=" + C_Invoice_ID);
}
}
// Cash - Invoice
if (C_CashLine_ID != 0 && invoice != null)
{
// Link to Invoice
if (reverse)
{
invoice.SetC_CashLine_ID(0);
log.Fine("C_CashLine_ID=" + C_CashLine_ID
+ " Unlinked from C_Invoice_ID=" + C_Invoice_ID);
// Set isallocated false on cashline while allocation gets deallocated assigned by Mukesh sir on 27/12/2017
MCashLine cashline = new MCashLine(GetCtx(), GetC_CashLine_ID(), Get_TrxName());
cashline.SetIsAllocated(false);
cashline.Save();
}
else
{
invoice.SetC_CashLine_ID(C_CashLine_ID);
log.Fine("C_CashLine_ID=" + C_CashLine_ID
+ " Linked to C_Invoice_ID=" + C_Invoice_ID);
}
// Link to Order
String update = "UPDATE C_Order o "
+ "SET C_CashLine_ID="
+ (reverse ? "NULL " : "(SELECT C_CashLine_ID FROM C_Invoice WHERE C_Invoice_ID=" + C_Invoice_ID + ") ")
+ "WHERE EXISTS (SELECT * FROM C_Invoice i "
+ "WHERE o.C_Order_ID=i.C_Order_ID AND i.C_Invoice_ID=" + C_Invoice_ID + ")";
if (DataBase.DB.ExecuteQuery(update, null, Get_TrxName()) > 0)
{
log.Fine("C_CashLine_ID=" + C_CashLine_ID
+ (reverse ? " UnLinked from" : " Linked to")
+ " order of C_Invoice_ID=" + C_Invoice_ID);
}
}
// Added by Bharat- Update Discrepancy amount on Invoice.
if (C_Payment_ID == 0 && C_CashLine_ID == 0 && invoice != null)
{
if (invoice.Get_ColumnIndex("DiscrepancyAmt") >= 0)
{
decimal desAmt = invoice.GetDiscrepancyAmt();
decimal desAjusted = invoice.GetDiscrepancyAdjusted();
decimal allocAmt = Math.Abs(GetAmount()); // absolute
if (reverse)
{
if (allocAmt > desAjusted)
{
desAmt = Decimal.Add(desAjusted, desAmt);
desAjusted = 0;
}
else
{
desAmt = Decimal.Add(desAmt, allocAmt);
desAjusted = Decimal.Subtract(desAjusted, allocAmt);
}
invoice.SetDiscrepancyAmt(desAmt);
invoice.SetDiscrepancyAdjusted(desAjusted);
if (desAmt > 0)
{
invoice.SetIsInDispute(true);
}
}
else
{
if (allocAmt > desAmt)
{
desAjusted = Decimal.Add(desAjusted, desAmt);
desAmt = 0;
}
else
{
desAjusted = Decimal.Add(desAjusted, allocAmt);
desAmt = Decimal.Subtract(desAmt, allocAmt);
}
invoice.SetDiscrepancyAmt(desAmt);
invoice.SetDiscrepancyAdjusted(desAjusted);
if (desAmt == 0)
{
invoice.SetIsInDispute(false);
}
}
if (!invoice.Save())
{
log.Log(Level.SEVERE, "Invoice not updated - " + invoice);
}
}
}
// Update Balance / Credit used - Counterpart of MInvoice.completeIt
if (invoice != null)
{
if (invoice.TestAllocation() && !invoice.Save())
{
log.Log(Level.SEVERE, "Invoice not updated - " + invoice);
}
else if (reverse)
{
// added by Amit
// if payment Management module downloaded and Invoice Schedule id available on Allocation then mark ispaid on schedule as false
if (Env.IsModuleInstalled("VA009_"))
{
MAllocationHdr allocHdr = new MAllocationHdr(GetCtx(), GetC_AllocationHdr_ID(), Get_Trx());
decimal payAmt = 0;
MDocType doctype = null;
MCurrency currency = new MCurrency(GetCtx(), invoice.GetC_Currency_ID(), null);
if (GetC_InvoicePaySchedule_ID() != 0 && !invoice.IsPaid())
{
invoiceSchedule = new MInvoicePaySchedule(GetCtx(), GetC_InvoicePaySchedule_ID(), Get_TrxName());
invoiceSchedule.SetVA009_IsPaid(false);
// when we update schedule paid as False, then update payment method and related fields on schedule as on Invoice Header
if (reverse)
{
invoiceSchedule.SetVA009_PaymentMethod_ID(invoice.GetVA009_PaymentMethod_ID());
DataSet dsPaymentMethod = DB.ExecuteDataset(@"SELECT VA009_PaymentMode, VA009_PaymentType, VA009_PaymentTrigger FROM VA009_PaymentMethod
WHERE IsActive = 'Y' AND VA009_PaymentMethod_ID = " + invoice.GetVA009_PaymentMethod_ID(), null, Get_Trx());
if (dsPaymentMethod != null && dsPaymentMethod.Tables.Count > 0 && dsPaymentMethod.Tables[0].Rows.Count > 0)
{
if (!String.IsNullOrEmpty(Util.GetValueOfString(dsPaymentMethod.Tables[0].Rows[0]["VA009_PaymentMode"])))
{
invoiceSchedule.SetVA009_PaymentMode(Util.GetValueOfString(dsPaymentMethod.Tables[0].Rows[0]["VA009_PaymentMode"]));
}
if (!String.IsNullOrEmpty(Util.GetValueOfString(dsPaymentMethod.Tables[0].Rows[0]["VA009_PaymentType"])))
{
invoiceSchedule.SetVA009_PaymentType(Util.GetValueOfString(dsPaymentMethod.Tables[0].Rows[0]["VA009_PaymentType"]));
}
invoiceSchedule.SetVA009_PaymentTrigger(Util.GetValueOfString(dsPaymentMethod.Tables[0].Rows[0]["VA009_PaymentTrigger"]));
}
dsPaymentMethod = null;
}
if (reverse && payment != null)
{
#region Handle for Payment & Invoice Allocation
doctype = new MDocType(GetCtx(), invoice.GetC_DocType_ID(), null);
// convert (payment amount / Amount from View Allocation) to invoice currency amount then subtract Paid invoice amount to calculated amount
if (doctype.GetDocBaseType() == "ARC" || doctype.GetDocBaseType() == "APC")
{
if (payment.GetC_Invoice_ID() != 0)
{
// when payment created with invoice refernce direct
// convert payment amount in invoice amt with payment date and payment conversion type
payAmt = MConversionRate.Convert(GetCtx(), Decimal.Negate(Decimal.Add(Decimal.Add(payment.GetPayAmt(), payment.GetDiscountAmt()),
payment.GetWriteOffAmt())), payment.GetC_Currency_ID(), invoice.GetC_Currency_ID(), payment.GetDateAcct(),
payment.GetC_ConversionType_ID(), GetAD_Client_ID(), GetAD_Org_ID());
}
else
{
// when payment created with Payment Allocate entry OR
// when we match payment with invoice through Payment Allocation form
// convert payment amount in invoice amt with view allocation date
payAmt = MConversionRate.Convert(GetCtx(), Decimal.Negate(Decimal.Add(Decimal.Add(GetAmount(), GetDiscountAmt()),
GetWriteOffAmt())), allocHdr.GetC_Currency_ID(), invoice.GetC_Currency_ID(), allocHdr.GetDateAcct(),
invoice.GetC_ConversionType_ID(), GetAD_Client_ID(), GetAD_Org_ID());
if (doctype.GetDocBaseType() == "APC")
{
payAmt = Decimal.Negate(payAmt);
}
}
}
else
{
if (payment.GetC_Invoice_ID() != 0)
{
// when we create payment with invoice reference direct
// convert payment amount in invoice amt with payment date and payment conversion type
payAmt = MConversionRate.Convert(GetCtx(), Decimal.Add(Decimal.Add(payment.GetPayAmt(), payment.GetDiscountAmt()),
payment.GetWriteOffAmt()), payment.GetC_Currency_ID(), invoice.GetC_Currency_ID(), payment.GetDateAcct(),
payment.GetC_ConversionType_ID(), GetAD_Client_ID(), GetAD_Org_ID());
}
else
{
// when payment created with Payment Allocate entry Or
// when we match payment with invoice through Payment Allocation form
// convert payment amount in invoice amt with view allocation date
payAmt = MConversionRate.Convert(GetCtx(), Decimal.Add(Decimal.Add(GetAmount(), GetDiscountAmt()), GetWriteOffAmt()),
allocHdr.GetC_Currency_ID(), invoice.GetC_Currency_ID(), allocHdr.GetDateAcct(), invoice.GetC_ConversionType_ID(),
GetAD_Client_ID(), GetAD_Org_ID());
if (doctype.GetDocBaseType() == "API")
{
payAmt = Decimal.Negate(payAmt);
}
}
}
invoiceSchedule.SetVA009_PaidAmntInvce(Decimal.Round(Decimal.Subtract(invoiceSchedule.GetVA009_PaidAmntInvce(), payAmt),
currency.GetStdPrecision()));
// during reversal, if Invoice paid amount <> 0 then reduce that amount from next schedule
try
{
if (invoiceSchedule.GetVA009_PaidAmntInvce() != 0)
{
int no = Util.GetValueOfInt(DB.ExecuteQuery(@"UPDATE C_InvoicePaySchedule
SET VA009_PaidAmntInvce = NVL(VA009_PaidAmntInvce , 0) + " + Decimal.Round(invoiceSchedule.GetVA009_PaidAmntInvce(), currency.GetStdPrecision()) +
@" , VA009_PaidAmnt = NVL(VA009_PaidAmnt , 0) + " + Decimal.Round(MConversionRate.ConvertBase(GetCtx(), invoiceSchedule.GetVA009_PaidAmntInvce(), invoice.GetC_Currency_ID(), invoice.GetDateAcct(), invoice.GetC_ConversionType_ID(), GetAD_Client_ID(), GetAD_Org_ID()), currency.GetStdPrecision()) +
@" WHERE C_InvoicePaySchedule_ID = ( SELECT MIN(C_InvoicePaySchedule_ID) FROM C_InvoicePaySchedule WHERE IsActive = 'Y'
AND VA009_IsPaid = 'N' AND C_Invoice_ID = " + invoice.GetC_Invoice_ID() +
@" AND C_InvoicePaySchedule_ID <> " + GetC_InvoicePaySchedule_ID() + " ) ", null, Get_Trx()));
// set paid invoice amount = 0, no > 0 bcz this is not last schedule
if (no > 0)
{
invoiceSchedule.SetVA009_PaidAmntInvce(0);
}
}
}
catch { }
// convert invoice paid amount to base currency amount
invoiceSchedule.SetVA009_PaidAmnt(Decimal.Round(MConversionRate.ConvertBase(GetCtx(), invoiceSchedule.GetVA009_PaidAmntInvce(),
invoice.GetC_Currency_ID(), invoice.GetDateAcct(), invoice.GetC_ConversionType_ID(), GetAD_Client_ID(), GetAD_Org_ID()),
currency.GetStdPrecision()));
// set Currency Variance amount as 0, when we reverse paymnet/ cash journalor allocation against this schedule
invoiceSchedule.SetVA009_Variance(0);
// remove linking of Payment from schedule
invoiceSchedule.SetC_Payment_ID(0);
#endregion
}
else if (reverse && C_CashLine_ID > 0)
{
#region Handle fo Cash Journal & Invoice Allocation
doctype = new MDocType(GetCtx(), invoice.GetC_DocType_ID(), null);
cashLine = new MCashLine(GetCtx(), C_CashLine_ID, Get_Trx());
// convert cash amount to invoice currency amount with allocation date then subtract Paid invoice amount to calculated amount
if (doctype.GetDocBaseType() == "ARC" || doctype.GetDocBaseType() == "API")
{
payAmt = Decimal.Negate(Decimal.Add(Decimal.Add(GetAmount(), GetDiscountAmt()), GetWriteOffAmt()));
payAmt = MConversionRate.Convert(GetCtx(), payAmt, allocHdr.GetC_Currency_ID(), invoice.GetC_Currency_ID(), allocHdr.GetDateAcct(),
invoice.GetC_ConversionType_ID(), GetAD_Client_ID(), GetAD_Org_ID());
invoiceSchedule.SetVA009_PaidAmntInvce(Decimal.Round(Decimal.Subtract(invoiceSchedule.GetVA009_PaidAmntInvce(), payAmt),
currency.GetStdPrecision()));
}
else
{
payAmt = Decimal.Add(Decimal.Add(GetAmount(), GetDiscountAmt()), GetWriteOffAmt());
payAmt = MConversionRate.Convert(GetCtx(), payAmt, allocHdr.GetC_Currency_ID(), invoice.GetC_Currency_ID(), allocHdr.GetDateAcct(),
invoice.GetC_ConversionType_ID(), GetAD_Client_ID(), GetAD_Org_ID());
invoiceSchedule.SetVA009_PaidAmntInvce(Decimal.Round(Decimal.Subtract(invoiceSchedule.GetVA009_PaidAmntInvce(), payAmt),
currency.GetStdPrecision()));
}
// during reversal, if Invoice paid amount <> 0 then reduce that amount from next schedule
try
{
if (invoiceSchedule.GetVA009_PaidAmntInvce() != 0)
{
int no = Util.GetValueOfInt(DB.ExecuteQuery(@"UPDATE C_InvoicePaySchedule
SET VA009_PaidAmntInvce = NVL(VA009_PaidAmntInvce , 0) + " + Decimal.Round(invoiceSchedule.GetVA009_PaidAmntInvce(), currency.GetStdPrecision()) +
@" , VA009_PaidAmnt = NVL(VA009_PaidAmnt , 0) + " + Decimal.Round(MConversionRate.ConvertBase(GetCtx(), invoiceSchedule.GetVA009_PaidAmntInvce(), invoice.GetC_Currency_ID(), invoice.GetDateAcct(), invoice.GetC_ConversionType_ID(), GetAD_Client_ID(), GetAD_Org_ID()), currency.GetStdPrecision()) +
@" WHERE C_InvoicePaySchedule_ID = ( SELECT MIN(C_InvoicePaySchedule_ID) FROM C_InvoicePaySchedule WHERE IsActive = 'Y'
AND VA009_IsPaid = 'N' AND C_Invoice_ID = " + invoice.GetC_Invoice_ID() +
@" AND C_InvoicePaySchedule_ID <> " + GetC_InvoicePaySchedule_ID() + " ) ", null, Get_Trx()));
// set paid invoice amount = 0, no > 0 bcz this is not last schedule
if (no > 0)
{
invoiceSchedule.SetVA009_PaidAmntInvce(0);
}
}
}
catch { }
// convert invoice paid amount to base currency amount
invoiceSchedule.SetVA009_PaidAmnt(Decimal.Round(MConversionRate.ConvertBase(GetCtx(), invoiceSchedule.GetVA009_PaidAmntInvce(),
invoice.GetC_Currency_ID(), invoice.GetDateAcct(), invoice.GetC_ConversionType_ID(), GetAD_Client_ID(), GetAD_Org_ID()),
currency.GetStdPrecision()));
// set Currency Variance amount as 0, when we reverse paymnet/ cash journalor allocation against this schedule
invoiceSchedule.SetVA009_Variance(0);
// remove linking of cash line from schedule
invoiceSchedule.SetC_CashLine_ID(0);
#endregion
}
else
{
invoiceSchedule.SetVA009_PaidAmntInvce(0);
invoiceSchedule.SetVA009_PaidAmnt(0);
// set Currency Variance amount as 0, when we reverse paymnet/ cash journalor allocation against this schedule
invoiceSchedule.SetVA009_Variance(0);
}
if (!invoiceSchedule.Save(Get_TrxName()))
{
log.Log(Level.SEVERE, "Invoice Pay Schedule not updated - " + invoice);
}
}
}
}
}
return(GetC_BPartner_ID());
}
/// <summary>
/// Generate Invoices
/// </summary>
/// <param name="idr">pstmt order query</param>
/// <returns>info</returns>
//private String Generate(IDataReader idr)
private String Generate(DataTable dt)
{
//JID_1139 Avoided the duplicate charge line created Invoice(customer)
bool isAllownonItem = Util.GetValueOfString(GetCtx().GetContext("$AllowNonItem")).Equals("Y");
foreach (DataRow dr in dt.Rows)
{
MOrder order = new MOrder(GetCtx(), dr, Get_TrxName());
// Credit Limit check
MBPartner bp = MBPartner.Get(GetCtx(), order.GetC_BPartner_ID());
if (bp.GetCreditStatusSettingOn() == "CH")
{
decimal creditLimit = bp.GetSO_CreditLimit();
string creditVal = bp.GetCreditValidation();
if (creditLimit != 0)
{
decimal creditAvlb = creditLimit - bp.GetSO_CreditUsed();
if (creditAvlb <= 0)
{
if (creditVal == "C" || creditVal == "D" || creditVal == "F")
{
AddLog(Msg.GetMsg(GetCtx(), "StopInvoice") + bp.GetName());
continue;
}
else if (creditVal == "I" || creditVal == "J" || creditVal == "L")
{
if (_msg != null)
{
_msg.Clear();
}
_msg.Append(Msg.GetMsg(GetCtx(), "WarningInvoice") + bp.GetName());
//AddLog(Msg.GetMsg(GetCtx(), "WarningInvoice") + bp.GetName());
}
}
}
}
// JID_0161 // change here now will check credit settings on field only on Business Partner Header // Lokesh Chauhan 15 July 2019
else if (bp.GetCreditStatusSettingOn() == X_C_BPartner.CREDITSTATUSSETTINGON_CustomerLocation)
{
MBPartnerLocation bpl = new MBPartnerLocation(GetCtx(), order.GetC_BPartner_Location_ID(), null);
//MBPartner bpartner = MBPartner.Get(GetCtx(), order.GetC_BPartner_ID());
//if (bpl.GetCreditStatusSettingOn() == "CL")
//{
decimal creditLimit = bpl.GetSO_CreditLimit();
string creditVal = bpl.GetCreditValidation();
if (creditLimit != 0)
{
decimal creditAvlb = creditLimit - bpl.GetSO_CreditUsed();
if (creditAvlb <= 0)
{
if (creditVal == "C" || creditVal == "D" || creditVal == "F")
{
AddLog(Msg.GetMsg(GetCtx(), "StopInvoice") + bp.GetName() + " " + bpl.GetName());
continue;
}
else if (creditVal == "I" || creditVal == "J" || creditVal == "L")
{
if (_msg != null)
{
_msg.Clear();
}
_msg.Append(Msg.GetMsg(GetCtx(), "WarningInvoice") + bp.GetName() + " " + bpl.GetName());
//AddLog(Msg.GetMsg(GetCtx(), "WarningInvoice") + bp.GetName() + " " + bpl.GetName());
}
}
}
//}
}
// Credit Limit End
// New Invoice Location
// JID_1237 : While creating invoice need to consolidate order on the basis of Org, Payment Term, BP Location (Bill to Location) and Pricelist.
if (!_ConsolidateDocument ||
(_invoice != null &&
(_invoice.GetC_BPartner_Location_ID() != order.GetBill_Location_ID() ||
_invoice.GetC_PaymentTerm_ID() != order.GetC_PaymentTerm_ID() ||
_invoice.GetM_PriceList_ID() != order.GetM_PriceList_ID() ||
_invoice.GetAD_Org_ID() != order.GetAD_Org_ID() ||
((_invoice.GetC_ConversionType_ID() != 0 ? _invoice.GetC_ConversionType_ID() : defaultConversionType)
!= (order.GetC_ConversionType_ID() != 0 ? order.GetC_ConversionType_ID() : defaultConversionType))
)))
{
CompleteInvoice();
}
bool completeOrder = MOrder.INVOICERULE_AfterOrderDelivered.Equals(order.GetInvoiceRule());
// Schedule After Delivery
bool doInvoice = false;
if (MOrder.INVOICERULE_CustomerScheduleAfterDelivery.Equals(order.GetInvoiceRule()))
{
_bp = new MBPartner(GetCtx(), order.GetBill_BPartner_ID(), null);
if (_bp.GetC_InvoiceSchedule_ID() == 0)
{
log.Warning("BPartner has no Schedule - set to After Delivery");
order.SetInvoiceRule(MOrder.INVOICERULE_AfterDelivery);
order.Save();
}
else
{
MInvoiceSchedule ins = MInvoiceSchedule.Get(GetCtx(), _bp.GetC_InvoiceSchedule_ID(), Get_TrxName());
if (ins.CanInvoice(order.GetDateOrdered(), order.GetGrandTotal()))
{
doInvoice = true;
}
else
{
continue;
}
}
} // Schedule
// After Delivery
if (doInvoice || MOrder.INVOICERULE_AfterDelivery.Equals(order.GetInvoiceRule()))
{
MInOut shipment = null;
MInOutLine[] shipmentLines = order.GetShipmentLines();
MOrderLine[] oLines = order.GetLines(true, null);
for (int i = 0; i < shipmentLines.Length; i++)
{
MInOutLine shipLine = shipmentLines[i];
if (shipLine.IsInvoiced())
{
continue;
}
if (shipment == null ||
shipment.GetM_InOut_ID() != shipLine.GetM_InOut_ID())
{
shipment = new MInOut(GetCtx(), shipLine.GetM_InOut_ID(), Get_TrxName());
}
if (!shipment.IsComplete() || // ignore incomplete or reversals
shipment.GetDocStatus().Equals(MInOut.DOCSTATUS_Reversed))
{
continue;
}
//JID_1139 Avoided the duplicate charge records
if (shipLine.GetM_Product_ID() > 0 || isAllownonItem)
{
CreateLine(order, shipment, shipLine);
}
}// shipment lines
//JID_1139 Avoided the duplicate charge records
if (!isAllownonItem)
{
for (int i = 0; i < oLines.Length; i++)
{
MOrderLine oLine = oLines[i];
if (oLine.GetC_Charge_ID() > 0)
{
Decimal toInvoice = Decimal.Subtract(oLine.GetQtyOrdered(), oLine.GetQtyInvoiced());
log.Fine("Immediate - ToInvoice=" + toInvoice + " - " + oLine);
Decimal qtyEntered = toInvoice;
// Correct UOM for QtyEntered
if (oLine.GetQtyEntered().CompareTo(oLine.GetQtyOrdered()) != 0)
{
qtyEntered = Decimal.Round(Decimal.Divide(Decimal.Multiply(
toInvoice, oLine.GetQtyEntered()),
oLine.GetQtyOrdered()), 12, MidpointRounding.AwayFromZero);
}
//JID_1139_1 avoided the charge line with 0 qty inserted
if (oLine.IsContract() == false && oLine.GetQtyOrdered() > oLine.GetQtyInvoiced())
{
CreateLine(order, oLine, toInvoice, qtyEntered);
log.Info("ID " + oLine.Get_ID() + "Qty Ordered " + oLine.GetQtyOrdered() + " Qty Invoiced " + oLine.GetQtyInvoiced());
}
}
}
}
}
// After Order Delivered, Immediate
else
{
MOrderLine[] oLines = order.GetLines(true, null);
for (int i = 0; i < oLines.Length; i++)
{
MOrderLine oLine = oLines[i];
Decimal toInvoice = Decimal.Subtract(oLine.GetQtyOrdered(), oLine.GetQtyInvoiced());
if (toInvoice.CompareTo(Env.ZERO) == 0 && oLine.GetM_Product_ID() != 0)
{
continue;
}
//
bool fullyDelivered = oLine.GetQtyOrdered().CompareTo(oLine.GetQtyDelivered()) == 0;
//JID_1136: While creating the Invoices against the charge system should not check the Ordered qty= Delivered qty. need to check this only in case of products
if (completeOrder && oLine.GetC_Charge_ID() > 0)
{
fullyDelivered = true;
if (oLine.GetC_Charge_ID() > 0)
{
log.Fine("After Order Delivery - ToInvoice=" + toInvoice + " - " + oLine);
Decimal qtyEntered = toInvoice;
// Correct UOM for QtyEntered
if (oLine.GetQtyEntered().CompareTo(oLine.GetQtyOrdered()) != 0)
{
qtyEntered = Decimal.Round(Decimal.Divide(Decimal.Multiply(
toInvoice, oLine.GetQtyEntered()),
oLine.GetQtyOrdered()), 12, MidpointRounding.AwayFromZero);
}
//
if (oLine.IsContract() == false && !isAllownonItem)
{
CreateLine(order, oLine, toInvoice, qtyEntered);
log.Info("ID " + oLine.Get_ID() + "Qty Ordered " + oLine.GetQtyOrdered() + " Qty Invoiced " + oLine.GetQtyInvoiced());
}
}
}
// Complete Order
if (completeOrder && !fullyDelivered)
{
log.Fine("Failed CompleteOrder - " + oLine);
completeOrder = false;
break;
}
// Immediate
else if (MOrder.INVOICERULE_Immediate.Equals(order.GetInvoiceRule()))
{
log.Fine("Immediate - ToInvoice=" + toInvoice + " - " + oLine);
Decimal qtyEntered = toInvoice;
// Correct UOM for QtyEntered
if (oLine.GetQtyEntered().CompareTo(oLine.GetQtyOrdered()) != 0)
{
qtyEntered = Decimal.Round(Decimal.Divide(Decimal.Multiply(
toInvoice, oLine.GetQtyEntered()),
oLine.GetQtyOrdered()), 12, MidpointRounding.AwayFromZero);
}
//
if (oLine.IsContract() == false)
{
CreateLine(order, oLine, toInvoice, qtyEntered);
log.Info("ID " + oLine.Get_ID() + "Qty Ordered " + oLine.GetQtyOrdered() + " Qty Invoiced " + oLine.GetQtyInvoiced());
}
}
else
{
log.Fine("Failed: " + order.GetInvoiceRule()
+ " - ToInvoice=" + toInvoice + " - " + oLine);
}
} // for all order lines
if (MOrder.INVOICERULE_Immediate.Equals(order.GetInvoiceRule()))
{
_line += 1000;
}
}
// Complete Order successful
if (completeOrder && MOrder.INVOICERULE_AfterOrderDelivered.Equals(order.GetInvoiceRule()))
{
MInOut[] shipments = order.GetShipments(true);
for (int i = 0; i < shipments.Length; i++)
{
MInOut ship = shipments[i];
if (!ship.IsComplete() || // ignore incomplete or reversals
ship.GetDocStatus().Equals(MInOut.DOCSTATUS_Reversed))
{
continue;
}
MInOutLine[] shipLines = ship.GetLines(false);
for (int j = 0; j < shipLines.Length; j++)
{
MInOutLine shipLine = shipLines[j];
if (!order.IsOrderLine(shipLine.GetC_OrderLine_ID()))
{
continue;
}
if (!shipLine.IsInvoiced())
{
CreateLine(order, ship, shipLine);
}
} // lines
_line += 1000;
} // all shipments
} // complete Order
} // for all orders
CompleteInvoice();
return("@Created@ = " + _created);
}
} // afterSave
/// <summary>
/// This function is used to set Values on Recognition Plan
/// </summary>
/// <param name="invoiceLine">invoice line object </param>
/// <param name="invoice">invoice object</param>
/// <param name="C_RevenueRecognition_ID">Recognition ID</param>
/// <param name="ToCurrency">Currency</param>
public void SetRecognitionPlan(MInvoiceLine invoiceLine, MInvoice invoice, int C_RevenueRecognition_ID, int ToCurrency)
{
SetAD_Client_ID(invoice.GetAD_Client_ID());
SetAD_Org_ID(invoice.GetAD_Org_ID());
SetC_Currency_ID(ToCurrency);
SetC_InvoiceLine_ID(invoiceLine.GetC_InvoiceLine_ID());
SetC_RevenueRecognition_ID(C_RevenueRecognition_ID);
// when tax include into price list, then reduce tax from Line Net Amount
bool isTaxIncide = (new MPriceList(invoice.GetCtx(), invoice.GetM_PriceList_ID(), invoice.Get_Trx())).IsTaxIncluded();
Decimal Amount = invoiceLine.GetLineNetAmt() - (isTaxIncide ? (invoiceLine.GetTaxAmt() + invoiceLine.GetSurchargeAmt()) : 0);
if (invoice.GetC_Currency_ID() != ToCurrency)
{
Amount = MConversionRate.Convert(GetCtx(), Amount, invoice.GetC_Currency_ID(), ToCurrency, invoice.GetDateInvoiced(), invoice.GetC_ConversionType_ID(), invoice.GetAD_Client_ID(), invoice.GetAD_Org_ID());
}
SetTotalAmt(Amount);
SetRecognizedAmt(Env.ZERO);
}
