/// <summary>
/// Add up Allocations
/// </summary>
private void AddAllocations()
{
// Reset
for (int j = 0; j < _runLines.Length; j++)
{
MDistributionRunLine runLine = _runLines[j];
runLine.ResetCalculations();
}
// Add Up
for (int i = 0; i < _details.Length; i++)
{
MDistributionRunDetail detail = _details[i];
for (int j = 0; j < _runLines.Length; j++)
{
MDistributionRunLine runLine = _runLines[j];
if (runLine.GetM_DistributionRunLine_ID() == detail.GetM_DistributionRunLine_ID())
{
// Round
detail.Round(runLine.GetUOMPrecision());
// Add
runLine.AddActualMin(detail.GetMinQty());
runLine.AddActualQty(detail.GetQty());
runLine.AddActualAllocation(detail.GetActualAllocation());
runLine.SetMaxAllocation(detail.GetActualAllocation(), false);
//
log.Fine("RunLine=" + runLine.GetLine()
+ ": BP_ID=" + detail.GetC_BPartner_ID()
+ ", Min=" + detail.GetMinQty()
+ ", Qty=" + detail.GetQty()
+ ", Allocation=" + detail.GetActualAllocation());
continue;
}
}
} // for all detail lines
// Info
for (int j = 0; j < _runLines.Length; j++)
{
MDistributionRunLine runLine = _runLines[j];
log.Fine("Run - " + runLine.GetInfo());
}
}
/// <summary>
/// Perform Process.
/// </summary>
/// <returns>Message (text with variables)</returns>
protected override String DoIt()
{
log.Info("M_DistributionRun_ID=" + _M_DistributionRun_ID
+ ", C_DocType_ID=" + _C_DocType_ID
+ ", DatePromised=" + _DatePromised
+ ", Test=" + _IsTest);
// Distribution Run
if (_M_DistributionRun_ID == 0)
{
throw new ArgumentException("No Distribution Run ID");
}
_run = new MDistributionRun(GetCtx(), _M_DistributionRun_ID, Get_TrxName());
if (_run.Get_ID() == 0)
{
throw new Exception("Distribution Run not found - M_DistributionRun_ID=" + _M_DistributionRun_ID);
}
_runLines = _run.GetLines(true);
if (_runLines == null || _runLines.Length == 0)
{
throw new Exception("No active, non-zero Distribution Run Lines found");
}
// Document Type
if (_C_DocType_ID == 0)
{
throw new ArgumentException("No Document Type ID");
}
_docType = new MDocType(GetCtx(), _C_DocType_ID, null); // outside trx
if (_docType.Get_ID() == 0)
{
throw new Exception("Document Type not found - C_DocType_ID=" + _C_DocType_ID);
}
//
//_DateOrdered = Utility.Util.GetValueOfDateTime(new DateTime(CommonFunctions.CurrentTimeMillis()));
_DateOrdered = Utility.Util.GetValueOfDateTime(DateTime.Now.Date);
if (_DatePromised == null)
{
_DatePromised = _DateOrdered;
}
// Create Temp Lines
if (InsertDetails() == 0)
{
throw new Exception("No Lines");
}
// Order By Distribution Run Line
_details = MDistributionRunDetail.Get(GetCtx(), _M_DistributionRun_ID, false, Get_TrxName());
// First Run -- Add & Round
AddAllocations();
// Do Allocation
int loops = 0;
while (!IsAllocationEqTotal())
{
AdjustAllocation();
AddAllocations();
if (++loops > 10)
{
throw new Exception("Loop detected - more than 10 Allocation attempts");
}
}
// Order By Business Partner
_details = MDistributionRunDetail.Get(GetCtx(), _M_DistributionRun_ID, true, Get_TrxName());
// Create Orders
CreateOrders();
return("@Created@ #" + _counter);
} // doIt
/// <summary>
/// Create Orders
/// </summary>
/// <returns>true if created</returns>
private bool CreateOrders()
{
// Get Counter Org/BP
int runAD_Org_ID = _run.GetAD_Org_ID();
if (runAD_Org_ID == 0)
{
runAD_Org_ID = GetCtx().GetAD_Org_ID();
}
MOrg runOrg = MOrg.Get(GetCtx(), runAD_Org_ID);
int runC_BPartner_ID = runOrg.GetLinkedC_BPartner_ID();
bool counter = !_run.IsCreateSingleOrder() && // no single Order
runC_BPartner_ID > 0 && // Org linked to BP
!_docType.IsSOTrx(); // PO
MBPartner runBPartner = counter ? new MBPartner(GetCtx(), runC_BPartner_ID, Get_TrxName()) : null;
if (!counter || runBPartner == null || runBPartner.Get_ID() != runC_BPartner_ID)
{
counter = false;
}
if (counter)
{
log.Info("RunBP=" + runBPartner
+ " - " + _docType);
}
log.Info("Single=" + _run.IsCreateSingleOrder()
+ " - " + _docType + ",SO=" + _docType.IsSOTrx());
log.Fine("Counter=" + counter
+ ",C_BPartner_ID=" + runC_BPartner_ID + "," + runBPartner);
//
MBPartner bp = null;
MOrder singleOrder = null;
MProduct product = null;
// Consolidated Order
if (_run.IsCreateSingleOrder())
{
bp = new MBPartner(GetCtx(), _run.GetC_BPartner_ID(), Get_TrxName());
if (bp.Get_ID() == 0)
{
throw new ArgumentException("Business Partner not found - C_BPartner_ID=" + _run.GetC_BPartner_ID());
}
//
if (!_IsTest)
{
singleOrder = new MOrder(GetCtx(), 0, Get_TrxName());
singleOrder.SetC_DocTypeTarget_ID(_docType.GetC_DocType_ID());
singleOrder.SetC_DocType_ID(_docType.GetC_DocType_ID());
singleOrder.SetIsReturnTrx(_docType.IsReturnTrx());
singleOrder.SetIsSOTrx(_docType.IsSOTrx());
singleOrder.SetBPartner(bp);
if (_run.GetC_BPartner_Location_ID() != 0)
{
singleOrder.SetC_BPartner_Location_ID(_run.GetC_BPartner_Location_ID());
}
singleOrder.SetDateOrdered(_DateOrdered);
singleOrder.SetDatePromised(_DatePromised);
if (!singleOrder.Save())
{
log.Log(Level.SEVERE, "Order not saved");
return(false);
}
_counter++;
}
}
int lastC_BPartner_ID = 0;
int lastC_BPartner_Location_ID = 0;
MOrder order = null;
// For all lines
for (int i = 0; i < _details.Length; i++)
{
MDistributionRunDetail detail = _details[i];
// Create Order Header
if (_run.IsCreateSingleOrder())
{
order = singleOrder;
}
// New Business Partner
else if (lastC_BPartner_ID != detail.GetC_BPartner_ID() ||
lastC_BPartner_Location_ID != detail.GetC_BPartner_Location_ID())
{
// finish order
order = null;
}
lastC_BPartner_ID = detail.GetC_BPartner_ID();
lastC_BPartner_Location_ID = detail.GetC_BPartner_Location_ID();
// New Order
if (order == null)
{
bp = new MBPartner(GetCtx(), detail.GetC_BPartner_ID(), Get_TrxName());
if (!_IsTest)
{
order = new MOrder(GetCtx(), 0, Get_TrxName());
order.SetC_DocTypeTarget_ID(_docType.GetC_DocType_ID());
order.SetIsReturnTrx(_docType.IsReturnTrx());
order.SetC_DocType_ID(_docType.GetC_DocType_ID());
order.SetIsSOTrx(_docType.IsSOTrx());
// Counter Doc
if (counter && bp.GetAD_OrgBP_ID_Int() > 0)
{
log.Fine("Counter - From_BPOrg=" + bp.GetAD_OrgBP_ID_Int()
+ "-" + bp + ", To_BP=" + runBPartner);
order.SetAD_Org_ID(bp.GetAD_OrgBP_ID_Int());
MOrgInfo oi = MOrgInfo.Get(GetCtx(), bp.GetAD_OrgBP_ID_Int(), null);
if (oi.GetM_Warehouse_ID() > 0)
{
order.SetM_Warehouse_ID(oi.GetM_Warehouse_ID());
}
order.SetBPartner(runBPartner);
}
else // normal
{
log.Fine("From_Org=" + runAD_Org_ID
+ ", To_BP=" + bp);
order.SetAD_Org_ID(runAD_Org_ID);
order.SetBPartner(bp);
if (detail.GetC_BPartner_Location_ID() != 0)
{
order.SetC_BPartner_Location_ID(detail.GetC_BPartner_Location_ID());
}
}
order.SetDateOrdered(_DateOrdered);
order.SetDatePromised(_DatePromised);
if (!order.Save())
{
log.Log(Level.SEVERE, "Order not saved");
return(false);
}
}
}
// Line
if (product == null || product.GetM_Product_ID() != detail.GetM_Product_ID())
{
product = MProduct.Get(GetCtx(), detail.GetM_Product_ID());
}
if (_IsTest)
{
AddLog(0, null, detail.GetActualAllocation(),
bp.GetName() + " - " + product.GetName());
continue;
}
// Create Order Line
MOrderLine line = new MOrderLine(order);
if (counter && bp.GetAD_OrgBP_ID_Int() > 0)
{
; // don't overwrite counter doc
}
else // normal - optionally overwrite
{
line.SetC_BPartner_ID(detail.GetC_BPartner_ID());
if (detail.GetC_BPartner_Location_ID() != 0)
{
line.SetC_BPartner_Location_ID(detail.GetC_BPartner_Location_ID());
}
}
//
line.SetProduct(product);
line.SetQty(detail.GetActualAllocation());
line.SetPrice();
if (!line.Save())
{
log.Log(Level.SEVERE, "OrderLine not saved");
return(false);
}
AddLog(0, null, detail.GetActualAllocation(), order.GetDocumentNo()
+ ": " + bp.GetName() + " - " + product.GetName());
}
// finish order
order = null;
return(true);
}
/// <summary>
/// Adjust Run Line Allocation
/// </summary>
/// <param name="index">run line index</param>
private void AdjustAllocation(int index)
{
MDistributionRunLine runLine = _runLines[index];
Decimal difference = runLine.GetActualAllocationDiff();
if (difference.CompareTo(Env.ZERO) == 0)
{
return;
}
// Adjust when difference is -1->1 or last difference is the same
bool adjustBiggest = Math.Abs(difference).CompareTo(Env.ONE) <= 0 ||
Math.Abs(difference).CompareTo(Math.Abs(runLine.GetLastDifference())) == 0;
log.Fine("Line=" + runLine.GetLine()
+ ", Diff=" + difference + ", Adjust=" + adjustBiggest);
// Adjust Biggest Amount
if (adjustBiggest)
{
for (int i = 0; i < _details.Length; i++)
{
MDistributionRunDetail detail = _details[i];
if (runLine.GetM_DistributionRunLine_ID() == detail.GetM_DistributionRunLine_ID())
{
log.Fine("Biggest - DetailAllocation=" + detail.GetActualAllocation()
+ ", MaxAllocation=" + runLine.GetMaxAllocation()
+ ", Qty Difference=" + difference);
if (detail.GetActualAllocation().CompareTo(runLine.GetMaxAllocation()) == 0 &&
detail.IsCanAdjust())
{
detail.AdjustQty(difference);
detail.Save();
return;
}
}
} // for all detail lines
throw new Exception("Cannot adjust Difference = " + difference
+ " - You need to change Total Qty or Min Qty");
}
else // Distibute
{
// New Total Ratio
Decimal ratioTotal = Env.ZERO;
for (int i = 0; i < _details.Length; i++)
{
MDistributionRunDetail detail = _details[i];
if (runLine.GetM_DistributionRunLine_ID() == detail.GetM_DistributionRunLine_ID())
{
if (detail.IsCanAdjust())
{
ratioTotal = Decimal.Add(ratioTotal, detail.GetRatio());
}
}
}
if (ratioTotal.CompareTo(Env.ZERO) == 0)
{
throw new Exception("Cannot distribute Difference = " + difference
+ " - You need to change Total Qty or Min Qty");
}
// Distribute
for (int i = 0; i < _details.Length; i++)
{
MDistributionRunDetail detail = _details[i];
if (runLine.GetM_DistributionRunLine_ID() == detail.GetM_DistributionRunLine_ID())
{
if (detail.IsCanAdjust())
{
Decimal diffRatio = Decimal.Round(Decimal.Divide(Decimal.Multiply(detail.GetRatio(), difference),
ratioTotal), MidpointRounding.AwayFromZero);
log.Fine("Detail=" + detail.ToString()
+ ", Allocation=" + detail.GetActualAllocation()
+ ", DiffRatio=" + diffRatio);
detail.AdjustQty(diffRatio);
detail.Save();
}
}
}
}
runLine.SetLastDifference(difference);
}
