public static bool InsertForeignCostAveragePO(Ctx ctx, MOrder order, MOrderLine orderLine, MInOutLine inoutLine, Trx trx)
{
int acctSchema_ID = 0;
int M_CostElement_ID = 0;
int AD_Org_ID = 0;
int M_ASI_ID = 0;
MProduct product = null;
MAcctSchema acctSchema = null;
MCostForeignCurrency foreignCost = null;
dynamic pc = null;
String cl = null;
try
{
// if cost is calculated then not to calculate again
if (inoutLine.IsFutureCostCalculated())
{
return(true);
}
acctSchema_ID = Util.GetValueOfInt(DB.ExecuteScalar(@"SELECT asch.c_acctschema_id FROM c_acctschema asch INNER JOIN ad_clientinfo ci
ON ci.c_acctschema1_id = asch.c_acctschema_id WHERE ci.ad_client_id = " + order.GetAD_Client_ID()));
acctSchema = new MAcctSchema(ctx, acctSchema_ID, trx);
if (acctSchema.GetC_Currency_ID() != order.GetC_Currency_ID())
{
// Get Costing Element of Average PO
M_CostElement_ID = Util.GetValueOfInt(DB.ExecuteScalar(@"SELECT M_CostElement_ID FROM M_CostElement WHERE AD_Client_ID = "
+ order.GetAD_Client_ID() + " AND IsActive = 'Y' AND CostingMethod = 'A'"));
product = new MProduct(ctx, orderLine.GetM_Product_ID(), trx);
if (product != null && product.GetProductType() == "I" && product.GetM_Product_ID() > 0) // for Item Type product
{
pc = MProductCategory.Get(product.GetCtx(), product.GetM_Product_Category_ID());
// Get Costing Level
if (pc != null)
{
cl = pc.GetCostingLevel();
}
if (cl == null)
{
cl = acctSchema.GetCostingLevel();
}
if (cl == "C" || cl == "B")
{
AD_Org_ID = 0;
}
else
{
AD_Org_ID = order.GetAD_Org_ID();
}
if (cl != "B")
{
M_ASI_ID = 0;
}
else
{
M_ASI_ID = orderLine.GetM_AttributeSetInstance_ID();
}
foreignCost = MCostForeignCurrency.Get(product, M_ASI_ID, AD_Org_ID, M_CostElement_ID, order.GetC_BPartner_ID(), order.GetC_Currency_ID());
foreignCost.SetC_Order_ID(order.GetC_Order_ID());
foreignCost.SetCumulatedQty(Decimal.Add(foreignCost.GetCumulatedQty(), inoutLine.GetMovementQty()));
foreignCost.SetCumulatedAmt(Decimal.Add(foreignCost.GetCumulatedAmt(),
Decimal.Multiply(Decimal.Divide(orderLine.GetLineNetAmt(), orderLine.GetQtyOrdered()), inoutLine.GetMovementQty())));
if (foreignCost.GetCumulatedQty() != 0)
{
foreignCost.SetCostPerUnit(Decimal.Round(Decimal.Divide(foreignCost.GetCumulatedAmt(), foreignCost.GetCumulatedQty()), acctSchema.GetCostingPrecision()));
}
else
{
foreignCost.SetCostPerUnit(0);
}
if (!foreignCost.Save(trx))
{
ValueNamePair pp = VLogger.RetrieveError();
_log.Severe("Error occured during updating M_Cost_ForeignCurrency. Error name : " + pp.GetName() +
" AND Error Value : " + pp.GetValue() + " , For Invoice line : " + orderLine.GetC_OrderLine_ID() +
" , AND Ad_Client_ID : " + orderLine.GetAD_Client_ID());
return(false);
}
else
{
inoutLine.SetIsFutureCostCalculated(true);
if (!inoutLine.Save(trx))
{
ValueNamePair pp = VLogger.RetrieveError();
_log.Severe("Error occured during updating Is Foreign Cost On C_invoice. Error name : " + pp.GetName() +
" AND Error Value : " + pp.GetValue() + " , For Material Receipt : " + inoutLine.GetM_InOutLine_ID() +
" , AND Ad_Client_ID : " + inoutLine.GetAD_Client_ID());
return(false);
}
}
}
}
}
catch (Exception ex)
{
_log.Log(Level.SEVERE, "", ex);
return(false);
}
return(true);
}
/// <summary>
/// Load Invoice Line
/// </summary>
/// <param name="order">order</param>
/// <returns>DocLine Array</returns>
private DocLine[] LoadLines(MOrder order)
{
List <DocLine> list = new List <DocLine>();
MOrderLine[] lines = order.GetLines();
for (int i = 0; i < lines.Length; i++)
{
MOrderLine line = lines[i];
DocLine docLine = new DocLine(line, this);
Decimal Qty = line.GetQtyOrdered();
docLine.SetQty(Qty, order.IsSOTrx());
//
// Decimal PriceActual = line.getPriceActual();
Decimal?PriceCost = null;
if (GetDocumentType().Equals(MDocBaseType.DOCBASETYPE_PURCHASEORDER)) // PO
{
PriceCost = line.GetPriceCost();
}
Decimal?LineNetAmt = null;
if (PriceCost != null && Env.Signum(PriceCost.Value) != 0)
{
LineNetAmt = Decimal.Multiply(Qty, PriceCost.Value);
}
else
{
LineNetAmt = line.GetLineNetAmt();
}
docLine.SetAmount(LineNetAmt); // DR
Decimal PriceList = line.GetPriceList();
int C_Tax_ID = docLine.GetC_Tax_ID();
// Correct included Tax
if (IsTaxIncluded() && C_Tax_ID != 0)
{
MTax tax = MTax.Get(GetCtx(), C_Tax_ID);
if (!tax.IsZeroTax())
{
Decimal LineNetAmtTax = tax.CalculateTax(LineNetAmt.Value, true, GetStdPrecision());
log.Fine("LineNetAmt=" + LineNetAmt + " - Tax=" + LineNetAmtTax);
LineNetAmt = Decimal.Subtract(LineNetAmt.Value, LineNetAmtTax);
for (int t = 0; t < _taxes.Length; t++)
{
if (_taxes[t].GetC_Tax_ID() == C_Tax_ID)
{
_taxes[t].AddIncludedTax(LineNetAmtTax);
break;
}
}
Decimal PriceListTax = tax.CalculateTax(PriceList, true, GetStdPrecision());
PriceList = Decimal.Subtract(PriceList, PriceListTax);
}
} // correct included Tax
docLine.SetAmount(LineNetAmt, PriceList, Qty);
list.Add(docLine);
}
// Return Array
DocLine[] dl = new DocLine[list.Count];
dl = list.ToArray();
return(dl);
}
protected override string DoIt()
{
MOrder obj = new MOrder(GetCtx(), GetRecord_ID(), Get_Trx());
// get Precision for rounding
MCurrency currency = new MCurrency(GetCtx(), obj.GetC_Currency_ID(), Get_Trx());
precision = currency.GetStdPrecision();
MOrderLine[] lines = obj.GetLines();
if (_IsCLearDiscount == "N")
{
if (_DiscountAmt == 0 && _DiscountPercent == 0)
{
return(Msg.GetMsg(GetCtx(), "PlsSelAtlstOneField"));
}
if (_DiscountAmt != 0 && _DiscountPercent != 0)
{
return(Msg.GetMsg(GetCtx(), "PlsSelOneField"));
}
// get amount on which we have to apply discount
subTotal = obj.GetTotalLines();
// when we are giving discount in terms of amount, then we have to calculate discount in term of percentage
discountPercentageOnTotalAmount = GetDiscountPercentageOnTotal(subTotal, _DiscountAmt, precision);
for (int i = 0; i < lines.Length; i++)
{
MOrderLine ln = lines[i];
// this value represent discount on line net amount
discountAmountOnTotal = GetDiscountAmountOnTotal(ln.GetLineNetAmt(), discountPercentageOnTotalAmount != 0 ? discountPercentageOnTotalAmount : _DiscountPercent);
// this value represent discount on unit price of 1 qty
discountAmountOnTotal = Decimal.Round(Decimal.Divide(discountAmountOnTotal, ln.GetQtyEntered()), precision);
if (discountPercentageOnTotalAmount != 0 && _DiscountAmt != 0)
{
if (i != lines.Length - 1)
{
// reduce discounted amount from total discount
_DiscountAmt -= discountAmountOnTotal;
}
else if (i == lines.Length - 1)
{
// when last iteration, set remaning amount
discountAmountOnTotal = _DiscountAmt;
}
}
ln.SetAmountAfterApplyDiscount(Decimal.Add(ln.GetAmountAfterApplyDiscount(), discountAmountOnTotal));
ln.SetPriceActual(Decimal.Round(Decimal.Subtract(ln.GetPriceActual(), discountAmountOnTotal), precision));
ln.SetPriceEntered(Decimal.Round(Decimal.Subtract(ln.GetPriceEntered(), discountAmountOnTotal), precision));
if (!ln.Save(Get_TrxName()))
{
Rollback();
ValueNamePair pp = VLogger.RetrieveError();
log.Info("ApplyDiscountOnOrder : Not Saved. Error Value : " + pp.GetValue() + " , Error Name : " + pp.GetName());
throw new Exception(Msg.GetMsg(GetCtx(), "DiscNotApplied"));
}
}
return(Msg.GetMsg(GetCtx(), "DiscAppliedSuccess"));
}
else
{
for (int i = 0; i < lines.Length; i++)
{
MOrderLine ln = lines[i];
ln.SetPriceEntered(Decimal.Add(ln.GetPriceEntered(), ln.GetAmountAfterApplyDiscount()));
ln.SetPriceActual(Decimal.Add(ln.GetPriceActual(), ln.GetAmountAfterApplyDiscount()));
ln.SetAmountAfterApplyDiscount(0);
if (!ln.Save())
{
Rollback();
ValueNamePair pp = VLogger.RetrieveError();
log.Info("ApplyDiscountOnOrder : Not Saved. Error Value : " + pp.GetValue() + " , Error Name : " + pp.GetName());
throw new Exception(Msg.GetMsg(GetCtx(), "DiscNotCleared"));
}
}
return(Msg.GetMsg(GetCtx(), "DiscClearedSuccessfully"));
}
}
/// <summary>
/// Get Commitments
/// </summary>
/// <param name="doc">document</param>
/// <param name="maxQty">Qty invoiced/matched</param>
/// <param name="C_InvoiceLine_ID">invoice line</param>
/// <returns>commitments (order lines)</returns>
protected static DocLine[] GetCommitments(Doc doc, Decimal maxQty, int C_InvoiceLine_ID)
{
int precision = -1;
//
List <DocLine> list = new List <DocLine>();
String sql = "SELECT * FROM C_OrderLine ol "
+ "WHERE EXISTS "
+ "(SELECT * FROM C_InvoiceLine il "
+ "WHERE il.C_OrderLine_ID=ol.C_OrderLine_ID"
+ " AND il.C_InvoiceLine_ID=" + C_InvoiceLine_ID + ")"
+ " OR EXISTS "
+ "(SELECT * FROM M_MatchPO po "
+ "WHERE po.C_OrderLine_ID=ol.C_OrderLine_ID"
+ " AND po.C_InvoiceLine_ID=" + C_InvoiceLine_ID + ")";
IDataReader idr = null;
try
{
idr = DataBase.DB.ExecuteReader(sql, null, null);
while (idr.Read())
{
if (Env.Signum(maxQty) == 0)
{
continue;
}
MOrderLine line = new MOrderLine(doc.GetCtx(), idr, null);
DocLine docLine = new DocLine(line, doc);
// Currency
if (precision == -1)
{
doc.SetC_Currency_ID(docLine.GetC_Currency_ID());
precision = MCurrency.GetStdPrecision(doc.GetCtx(), docLine.GetC_Currency_ID());
}
// Qty
Decimal Qty = Math.Max(line.GetQtyOrdered(), maxQty);
docLine.SetQty(Qty, false);
//
Decimal PriceActual = line.GetPriceActual();
Decimal PriceCost = line.GetPriceCost();
Decimal?LineNetAmt = null;
if (Env.Signum(PriceCost) != 0)
{
LineNetAmt = Decimal.Multiply(Qty, PriceCost);
}
else if (Qty.Equals(maxQty))
{
LineNetAmt = line.GetLineNetAmt();
}
else
{
LineNetAmt = Decimal.Multiply(Qty, PriceActual);
}
maxQty = Decimal.Subtract(maxQty, Qty);
docLine.SetAmount(LineNetAmt); // DR
Decimal PriceList = line.GetPriceList();
int C_Tax_ID = docLine.GetC_Tax_ID();
// Correct included Tax
if (C_Tax_ID != 0 && line.GetParent().IsTaxIncluded())
{
MTax tax = MTax.Get(doc.GetCtx(), C_Tax_ID);
if (!tax.IsZeroTax())
{
Decimal LineNetAmtTax = tax.CalculateTax(LineNetAmt.Value, true, precision);
_log.Fine("LineNetAmt=" + LineNetAmt + " - Tax=" + LineNetAmtTax);
LineNetAmt = Decimal.Subtract(LineNetAmt.Value, LineNetAmtTax);
Decimal PriceListTax = tax.CalculateTax(PriceList, true, precision);
PriceList = Decimal.Subtract(PriceList, PriceListTax);
}
} // correct included Tax
docLine.SetAmount(LineNetAmt, PriceList, Qty);
list.Add(docLine);
}
idr.Close();
}
catch (Exception e)
{
if (idr != null)
{
idr.Close();
idr = null;
}
_log.Log(Level.SEVERE, sql, e);
}
// Return Array
DocLine[] dl = new DocLine[list.Count];
dl = list.ToArray();
return(dl);
}
