/****************************************************************************** * Product: Adempiere ERP & CRM Smart Business Solution * * Copyright (C) 1999-2006 ComPiere, Inc. All Rights Reserved. * * This program is free software; you can redistribute it and/or modify it * * under the terms version 2 of the GNU General Public License as published * * by the Free Software Foundation. This program is distributed in the hope * * that it will be useful, but WITHOUT ANY WARRANTY; without even the implied * * warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. * * See the GNU General Public License for more details. * * You should have received a copy of the GNU General Public License along * * with this program; if not, write to the Free Software Foundation, Inc., * * 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA. * * For the text or an alternative of this public license, you may reach us * * ComPiere, Inc., 2620 Augustine Dr. #245, Santa Clara, CA 95054, USA * * or via info@compiere.org or http://www.compiere.org/license.html * *****************************************************************************/ package org.compiere.process; import java.math.BigDecimal; import java.math.RoundingMode; import java.sql.PreparedStatement; import java.sql.ResultSet; import java.sql.Timestamp; import java.util.List; import java.util.logging.Level; import org.adempiere.exceptions.AdempiereException; import org.compiere.model.I_T_DistributionRunDetail; import org.compiere.model.MBPartner; import org.compiere.model.MDistributionRun; import org.compiere.model.MDistributionRunDetail; import org.compiere.model.MDistributionRunLine; import org.compiere.model.MDocType; import org.compiere.model.MLocator; import org.compiere.model.MOrder; import org.compiere.model.MOrderLine; import org.compiere.model.MOrg; import org.compiere.model.MOrgInfo; import org.compiere.model.MProcessPara; import org.compiere.model.MProduct; import org.compiere.model.MTable; import org.compiere.model.MWarehouse; import org.compiere.model.Query; import org.compiere.util.DB; import org.compiere.util.Env; import org.compiere.util.Msg; import org.eevolution.model.MDDOrder; import org.eevolution.model.MDDOrderLine; /** * Create Distribution * * @author Jorg Janke * @author victor.perez@e-evolution.com *
  • FR Let use the Distribution List and Distribution Run for DO * @see https://sourceforge.net/p/adempiere/feature-requests/488/ * @version $Id: DistributionRun.java,v 1.4 2006/07/30 00:51:02 jjanke Exp $ */ @org.adempiere.base.annotation.Process public class DistributionRun extends SvrProcess { /** The Run to execute */ private int p_M_DistributionRun_ID = 0; /** Date Promised */ private Timestamp p_DatePromised = null; /** Document Type */ private int p_C_DocType_ID = 0; /** Test Mode */ private boolean p_IsTest = false; /** Warehouse to Distribution Order */ private int p_M_Warehouse_ID = 0; /** Consolidate Document **/ private boolean p_ConsolidateDocument = false; /** Distribution List **/ @SuppressWarnings("unused") private int p_M_DistributionList_ID = 0; /** Distribute Based in DRP Demand **/ private boolean p_BasedInDamnd = false; /** Distribution Run */ private MDistributionRun m_run = null; /** Distribution Run Lines */ private MDistributionRunLine[] m_runLines = null; /** Distribution Run Details */ private MDistributionRunDetail[] m_details = null; /** Date Ordered */ private Timestamp m_DateOrdered = null; /** Orders Created */ private int m_counter = 0; /** Document Type */ private MDocType m_docType = null; /** * Prepare - e.g., get Parameters. */ protected void prepare() { ProcessInfoParameter[] para = getParameter(); for (int i = 0; i < para.length; i++) { String name = para[i].getParameterName(); if (para[i].getParameter() == null) ; else if (name.equals("C_DocType_ID")) { p_C_DocType_ID = ((BigDecimal)para[i].getParameter()).intValue(); m_docType = new MDocType(getCtx(),p_C_DocType_ID, get_TrxName()); } else if (name.equals("DatePromised")) { p_DatePromised = (Timestamp)para[i].getParameter(); } else if (name.equals("IsTest")) p_IsTest = "Y".equals(para[i].getParameter()); else if (m_docType.getDocBaseType().equals(MDocType.DOCBASETYPE_DistributionOrder) && name.equals("M_Warehouse_ID")) p_M_Warehouse_ID=((BigDecimal)para[i].getParameter()).intValue(); else if (m_docType.getDocBaseType().equals(MDocType.DOCBASETYPE_DistributionOrder) && name.equals("ConsolidateDocument")) p_ConsolidateDocument="Y".equals((String)para[i].getParameter()); else if (m_docType.getDocBaseType().equals(MDocType.DOCBASETYPE_DistributionOrder) && name.equals("M_DistributionList_ID")) p_M_DistributionList_ID=para[i].getParameterAsInt(); else if (m_docType.getDocBaseType().equals(MDocType.DOCBASETYPE_DistributionOrder) && name.equals("IsRequiredDRP")) p_BasedInDamnd = "Y".equals((String)para[i].getParameter()); else MProcessPara.validateUnknownParameter(getProcessInfo().getAD_Process_ID(), para[i]); } p_M_DistributionRun_ID = getRecord_ID(); } // prepare /** * Perform process. * @return Message (text with variables) * @throws Exception if not successful */ protected String doIt() throws Exception { if (log.isLoggable(Level.INFO)) log.info("M_DistributionRun_ID=" + p_M_DistributionRun_ID + ", C_DocType_ID=" + p_C_DocType_ID + ", DatePromised=" + p_DatePromised + ", Test=" + p_IsTest); // Distribution Run if (p_M_DistributionRun_ID == 0) throw new IllegalArgumentException ("No Distribution Run ID"); m_run = new MDistributionRun(getCtx(), p_M_DistributionRun_ID, get_TrxName()); if (m_run.get_ID() == 0) throw new Exception ("Distribution Run not found - M_DistributionRun_ID=" + p_M_DistributionRun_ID); m_runLines = m_run.getLines(true); if (m_runLines == null || m_runLines.length == 0) throw new Exception ("No active, non-zero Distribution Run Lines found"); // Document Type if (p_C_DocType_ID == 0) throw new IllegalArgumentException ("No Document Type ID"); m_docType = new MDocType(getCtx(), p_C_DocType_ID, null); // outside trx if (m_docType.get_ID() == 0) throw new Exception ("Document Type not found - C_DocType_ID=" + p_C_DocType_ID); // m_DateOrdered = new Timestamp (System.currentTimeMillis()); if (p_DatePromised == null) p_DatePromised = m_DateOrdered; if(m_docType.getDocBaseType().equals(MDocType.DOCBASETYPE_DistributionOrder) && p_M_Warehouse_ID > 0) { if(p_BasedInDamnd) { if (insertDetailsDistributionDemand() == 0) throw new Exception ("No Lines"); } else //Create Temp Lines { if (insertDetailsDistribution() == 0) throw new Exception ("No Lines"); } } else { // Create Temp Lines if (insertDetails() == 0) throw new Exception ("No Lines"); } // Order By Distribution Run Line m_details = MDistributionRunDetail.get(getCtx(), p_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 m_details = MDistributionRunDetail.get(getCtx(), p_M_DistributionRun_ID, true, get_TrxName()); //Implement Distribution Order if(m_docType.getDocBaseType().equals(MDocType.DOCBASETYPE_DistributionOrder)) { distributionOrders(); } else { // Create Orders createOrders(); } StringBuilder msgreturn = new StringBuilder("@Created@ #").append(m_counter); return msgreturn.toString(); } // doIt /** * Insert Details * @return number of rows inserted */ private int insertDetails() { // Handle NULL String sql = "UPDATE M_DistributionRunLine SET MinQty = 0 WHERE MinQty IS NULL AND M_DistributionRun_ID=?"; int no = DB.executeUpdateEx(sql,new Object[]{p_M_DistributionRun_ID} ,get_TrxName()); sql = "UPDATE M_DistributionListLine SET MinQty = 0 WHERE MinQty IS NULL"; no = DB.executeUpdateEx(sql, get_TrxName()); // Total Ratio sql = "UPDATE M_DistributionList l " + "SET RatioTotal = (SELECT SUM(Ratio) FROM M_DistributionListLine ll " + " WHERE l.M_DistributionList_ID=ll.M_DistributionList_ID) " + "WHERE EXISTS (SELECT * FROM M_DistributionRunLine rl" + " WHERE l.M_DistributionList_ID=rl.M_DistributionList_ID" + " AND rl.M_DistributionRun_ID=?)"; no = DB.executeUpdateEx(sql,new Object[]{p_M_DistributionRun_ID},get_TrxName()); // Delete Old sql = "DELETE FROM T_DistributionRunDetail WHERE M_DistributionRun_ID=?"; no = DB.executeUpdateEx(sql,new Object[]{p_M_DistributionRun_ID}, get_TrxName()); if (log.isLoggable(Level.FINE)) log.fine("insertDetails - deleted #" + no); // Insert New sql = "INSERT INTO T_DistributionRunDetail " + "(M_DistributionRun_ID, M_DistributionRunLine_ID, M_DistributionList_ID, M_DistributionListLine_ID," + "AD_Client_ID,AD_Org_ID, IsActive, Created,CreatedBy, Updated,UpdatedBy," + "C_BPartner_ID, C_BPartner_Location_ID, M_Product_ID," + "Ratio, MinQty, Qty) " // + "SELECT rl.M_DistributionRun_ID, rl.M_DistributionRunLine_ID," + "ll.M_DistributionList_ID, ll.M_DistributionListLine_ID, " + "rl.AD_Client_ID,rl.AD_Org_ID, rl.IsActive, rl.Created,rl.CreatedBy, rl.Updated,rl.UpdatedBy," + "ll.C_BPartner_ID, ll.C_BPartner_Location_ID, rl.M_Product_ID, " + "ll.Ratio, " + "CASE WHEN rl.MinQty > ll.MinQty THEN rl.MinQty ELSE ll.MinQty END, " + "(ll.Ratio/l.RatioTotal*rl.TotalQty)" + "FROM M_DistributionRunLine rl" + " INNER JOIN M_DistributionList l ON (rl.M_DistributionList_ID=l.M_DistributionList_ID)" + " INNER JOIN M_DistributionListLine ll ON (rl.M_DistributionList_ID=ll.M_DistributionList_ID) " + "WHERE rl.M_DistributionRun_ID=?" + " AND l.RatioTotal<>0 AND rl.IsActive='Y' AND ll.IsActive='Y'"; no = DB.executeUpdateEx(sql,new Object[]{p_M_DistributionRun_ID}, get_TrxName()); if (log.isLoggable(Level.FINE)) log.fine("inserted #" + no); return no; } // insertDetails /************************************************************************** * Add up Allocations */ private void addAllocations () { // Reset for (int j = 0; j < m_runLines.length; j++) { MDistributionRunLine runLine = m_runLines[j]; runLine.resetCalculations(); } // Add Up for (int i = 0; i < m_details.length; i++) { MDistributionRunDetail detail = m_details[i]; for (int j = 0; j < m_runLines.length; j++) { MDistributionRunLine runLine = m_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); // if (log.isLoggable(Level.FINE)) 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 < m_runLines.length; j++) { MDistributionRunLine runLine = m_runLines[j]; if (log.isLoggable(Level.FINE)) log.fine("Run - " + runLine.getInfo()); } } // addAllocations /** * Is Allocation Equals Total * @return true if allocation eq total * @throws Exception */ private boolean isAllocationEqTotal() throws Exception { boolean allocationEqTotal = true; // Check total min qty & delta for (int j = 0; j < m_runLines.length; j++) { MDistributionRunLine runLine = m_runLines[j]; if (runLine.isActualMinGtTotal()){ StringBuilder msg = new StringBuilder("Line ").append(runLine.getLine()) .append(" Sum of Min Qty=").append(runLine.getActualMin()) .append(" is greater than Total Qty=").append(runLine.getTotalQty()); throw new Exception (msg.toString()); } if (allocationEqTotal && !runLine.isActualAllocationEqTotal()) allocationEqTotal = false; } // for all run lines if (log.isLoggable(Level.INFO)) log.info("=" + allocationEqTotal); return allocationEqTotal; } // isAllocationEqTotal /** * Adjust Allocation * @throws Exception */ private void adjustAllocation() throws Exception { for (int j = 0; j < m_runLines.length; j++) adjustAllocation(j); } // adjustAllocation /** * Adjust Run Line Allocation * @param index run line index * @throws Exception */ private void adjustAllocation(int index) throws Exception { MDistributionRunLine runLine = m_runLines[index]; BigDecimal difference = runLine.getActualAllocationDiff(); if (difference.compareTo(Env.ZERO) == 0) return; // Adjust when difference is -1->1 or last difference is the same boolean adjustBiggest = difference.abs().compareTo(Env.ONE) <= 0 || difference.abs().compareTo(runLine.getLastDifference().abs()) == 0; if (log.isLoggable(Level.FINE)) log.fine("Line=" + runLine.getLine() + ", Diff=" + difference + ", Adjust=" + adjustBiggest); // Adjust Biggest Amount if (adjustBiggest) { for (int i = 0; i < m_details.length; i++) { MDistributionRunDetail detail = m_details[i]; if (runLine.getM_DistributionRunLine_ID() == detail.getM_DistributionRunLine_ID()) { if (log.isLoggable(Level.FINE)) 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.saveEx(); return; } } } // for all detail lines StringBuilder msgexc = new StringBuilder("Cannot adjust Difference = ").append(difference) .append(" - You need to change Total Qty or Min Qty"); throw new Exception (msgexc.toString()); } else // Distibute { // New Total Ratio BigDecimal ratioTotal = Env.ZERO; for (int i = 0; i < m_details.length; i++) { MDistributionRunDetail detail = m_details[i]; if (runLine.getM_DistributionRunLine_ID() == detail.getM_DistributionRunLine_ID()) { if (detail.isCanAdjust()) ratioTotal = ratioTotal.add(detail.getRatio()); } } if (ratioTotal.compareTo(Env.ZERO) == 0){ StringBuilder msgexc = new StringBuilder("Cannot distribute Difference = ").append(difference) .append(" - You need to change Total Qty or Min Qty"); throw new Exception (msgexc.toString()); } // Distribute for (int i = 0; i < m_details.length; i++) { MDistributionRunDetail detail = m_details[i]; if (runLine.getM_DistributionRunLine_ID() == detail.getM_DistributionRunLine_ID()) { if (detail.isCanAdjust()) { BigDecimal diffRatio = detail.getRatio().multiply(difference) .divide(ratioTotal, RoundingMode.HALF_UP); // precision from total if (log.isLoggable(Level.FINE)) log.fine("Detail=" + detail.toString() + ", Allocation=" + detail.getActualAllocation() + ", DiffRatio=" + diffRatio); detail.adjustQty(diffRatio); detail.saveEx(); } } } } runLine.setLastDifference(difference); } // adjustAllocation /************************************************************************** * Create Orders * @return true if created */ private boolean createOrders() { // Get Counter Org/BP int runAD_Org_ID = m_run.getAD_Org_ID(); if (runAD_Org_ID == 0) runAD_Org_ID = Env.getAD_Org_ID(getCtx()); MOrg runOrg = MOrg.get(getCtx(), runAD_Org_ID); int runC_BPartner_ID = runOrg.getLinkedC_BPartner_ID(get_TrxName()); boolean counter = !m_run.isCreateSingleOrder() // no single Order && runC_BPartner_ID > 0 // Org linked to BP && !m_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) if (log.isLoggable(Level.INFO)) log.info("RunBP=" + runBPartner + " - " + m_docType); if (log.isLoggable(Level.INFO)) log.info("Single=" + m_run.isCreateSingleOrder() + " - " + m_docType + ",SO=" + m_docType.isSOTrx()); if (log.isLoggable(Level.FINE)) log.fine("Counter=" + counter + ",C_BPartner_ID=" + runC_BPartner_ID + "," + runBPartner); // MBPartner bp = null; MOrder singleOrder = null; MProduct product = null; // Consolidated Order if (m_run.isCreateSingleOrder()) { bp = new MBPartner (getCtx(), m_run.getC_BPartner_ID(), get_TrxName()); if (bp.get_ID() == 0) throw new IllegalArgumentException("Business Partner not found - C_BPartner_ID=" + m_run.getC_BPartner_ID()); // if (!p_IsTest) { singleOrder = new MOrder (getCtx(), 0, get_TrxName()); singleOrder.setC_DocTypeTarget_ID(m_docType.getC_DocType_ID()); singleOrder.setC_DocType_ID(m_docType.getC_DocType_ID()); singleOrder.setIsSOTrx(m_docType.isSOTrx()); singleOrder.setBPartner(bp); if (m_run.getC_BPartner_Location_ID() != 0) singleOrder.setC_BPartner_Location_ID(m_run.getC_BPartner_Location_ID()); singleOrder.setDateOrdered(m_DateOrdered); singleOrder.setDatePromised(p_DatePromised); if (!singleOrder.save()) { log.log(Level.SEVERE, "Order not saved"); return false; } m_counter++; } } int lastC_BPartner_ID = 0; int lastC_BPartner_Location_ID = 0; MOrder order = null; // For all lines for (int i = 0; i < m_details.length; i++) { MDistributionRunDetail detail = m_details[i]; // Create Order Header if (m_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 (!p_IsTest) { order = new MOrder (getCtx(), 0, get_TrxName()); order.setC_DocTypeTarget_ID(m_docType.getC_DocType_ID()); order.setC_DocType_ID(m_docType.getC_DocType_ID()); order.setIsSOTrx(m_docType.isSOTrx()); // Counter Doc if (counter && bp.getAD_OrgBP_ID() > 0) { if (log.isLoggable(Level.FINE)) log.fine("Counter - From_BPOrg=" + bp.getAD_OrgBP_ID() + "-" + bp + ", To_BP=" + runBPartner); order.setAD_Org_ID(bp.getAD_OrgBP_ID()); MOrgInfo oi = MOrgInfo.get(getCtx(), bp.getAD_OrgBP_ID(), get_TrxName()); if (oi.getM_Warehouse_ID() > 0) order.setM_Warehouse_ID(oi.getM_Warehouse_ID()); order.setBPartner(runBPartner); } else // normal { if (log.isLoggable(Level.FINE)) 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(m_DateOrdered); order.setDatePromised(p_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 (p_IsTest) { StringBuilder msglog = new StringBuilder().append(bp.getName()).append(" - ").append(product.getName()); addLog(0,null, detail.getActualAllocation(), msglog.toString()); continue; } // Create Order Line MOrderLine line = new MOrderLine(order); if (counter && bp.getAD_OrgBP_ID() > 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; } StringBuilder msglog = new StringBuilder().append(order.getDocumentNo()).append(": ").append(bp.getName()).append(" - ").append(product.getName()); addLog(0,null, detail.getActualAllocation(), msglog.toString()); } // finish order order = null; return true; } // createOrders /** * Insert Details * @return number of rows inserted */ private int insertDetailsDistributionDemand() { // Handle NULL StringBuilder sql = new StringBuilder("UPDATE M_DistributionRunLine SET MinQty = 0 WHERE MinQty IS NULL"); int no = DB.executeUpdate(sql.toString(), get_TrxName()); sql = new StringBuilder("UPDATE M_DistributionListLine SET MinQty = 0 WHERE MinQty IS NULL"); no = DB.executeUpdate(sql.toString(), get_TrxName()); // Delete Old sql = new StringBuilder("DELETE FROM T_DistributionRunDetail WHERE M_DistributionRun_ID=") .append(p_M_DistributionRun_ID); no = DB.executeUpdate(sql.toString(), get_TrxName()); if (log.isLoggable(Level.FINE)) log.fine("insertDetails - deleted #" + no); // Insert New sql = new StringBuilder("INSERT INTO T_DistributionRunDetail ") .append("(M_DistributionRun_ID, M_DistributionRunLine_ID, M_DistributionList_ID, M_DistributionListLine_ID,") .append("AD_Client_ID,AD_Org_ID, IsActive, Created,CreatedBy, Updated,UpdatedBy,") .append("C_BPartner_ID, C_BPartner_Location_ID, M_Product_ID,") .append("Ratio, MinQty, Qty) " ) .append("SELECT MAX(rl.M_DistributionRun_ID), MAX(rl.M_DistributionRunLine_ID),MAX(ll.M_DistributionList_ID), MAX(ll.M_DistributionListLine_ID), ") .append("MAX(rl.AD_Client_ID),MAX(rl.AD_Org_ID), MAX(rl.IsActive), MAX(rl.Created),MAX(rl.CreatedBy), MAX(rl.Updated),MAX(rl.UpdatedBy), ") .append("MAX(ll.C_BPartner_ID), MAX(ll.C_BPartner_Location_ID), MAX(rl.M_Product_ID),") // Ration for this process is equal QtyToDeliver .append("COALESCE (SUM(ol.QtyOrdered-ol.QtyDelivered-TargetQty), 0) , ") // Min Qty for this process is equal to TargetQty .append(" 0 , 0 FROM M_DistributionRunLine rl ") .append("INNER JOIN M_DistributionList l ON (rl.M_DistributionList_ID=l.M_DistributionList_ID) ") .append("INNER JOIN M_DistributionListLine ll ON (rl.M_DistributionList_ID=ll.M_DistributionList_ID) ") .append("INNER JOIN DD_Order o ON (o.C_BPartner_ID=ll.C_BPartner_ID AND o.DocStatus IN ('DR','IN')) ") .append("INNER JOIN DD_OrderLine ol ON (ol.DD_Order_ID=o.DD_Order_ID AND ol.M_Product_ID=rl.M_Product_ID) ") .append("INNER JOIN M_Locator loc ON (loc.M_Locator_ID=ol.M_Locator_ID AND loc.M_Warehouse_ID=").append(p_M_Warehouse_ID).append(") ") .append("WHERE rl.M_DistributionRun_ID=").append(p_M_DistributionRun_ID).append(" AND rl.IsActive='Y' AND ll.IsActive='Y' AND ol.DatePromised <= ").append(DB.TO_DATE(p_DatePromised)) .append(" GROUP BY o.M_Shipper_ID , ll.C_BPartner_ID, ol.M_Product_ID"); //+ " BETWEEN "+ DB.TO_DATE(p_DatePromised) +" AND "+ DB.TO_DATE(p_DatePromised_To) no = DB.executeUpdate(sql.toString(), get_TrxName()); List records = new Query(getCtx(), MDistributionRunDetail.Table_Name, MDistributionRunDetail.COLUMNNAME_M_DistributionRun_ID + "=?", get_TrxName()).setParameters( new Object[]{p_M_DistributionRun_ID}).list(); for(MDistributionRunDetail record : records) { MDistributionRunLine drl = (MDistributionRunLine) MTable.get(getCtx(), MDistributionRunLine.Table_ID).getPO(record.getM_DistributionRunLine_ID(), get_TrxName()); MProduct product = MProduct.get(getCtx(), record.getM_Product_ID()); BigDecimal ration = record.getRatio(); BigDecimal totalration = getQtyDemand(record.getM_Product_ID()); if (log.isLoggable(Level.INFO)){ log.info("Value:" + product.getValue()); log.info("Product:" + product.getName()); log.info("Qty To Deliver:" + record.getRatio()); log.info("Qty Target:" + record.getMinQty()); log.info("Qty Total Available:" + drl.getTotalQty()); log.info("Qty Total Demand:" + totalration); } BigDecimal factor = ration.divide(totalration, 12 , RoundingMode.HALF_UP); record.setQty(drl.getTotalQty().multiply(factor)); record.saveEx(); } if (log.isLoggable(Level.FINE)) log.fine("inserted #" + no); return no; } // insertDetails private BigDecimal getQtyDemand(int M_Product_ID) { String sql = "SELECT SUM (QtyOrdered-QtyDelivered-TargetQty) " + "FROM DD_OrderLine ol " + "INNER JOIN M_Locator l ON (l.M_Locator_ID=ol.M_Locator_ID) " + "INNER JOIN DD_Order o ON (o.DD_Order_ID=ol.DD_Order_ID) " + " WHERE o.DocStatus IN ('DR','IN') " + "AND ol.DatePromised <= ? " + "AND l.M_Warehouse_ID=? " + "AND ol.M_Product_ID=? " + "GROUP BY M_Product_ID, l.M_Warehouse_ID"; PreparedStatement pstmt = null; ResultSet rs = null; try { pstmt = DB.prepareStatement (sql, get_TrxName()); pstmt.setTimestamp(1, p_DatePromised); pstmt.setInt(2, p_M_Warehouse_ID); pstmt.setInt(3, M_Product_ID); rs = pstmt.executeQuery(); while (rs.next()) { return rs.getBigDecimal(1); } } catch (Exception e) { log.log(Level.SEVERE,"doIt - " + sql, e); return Env.ZERO; } finally { DB.close(rs, pstmt); rs = null; pstmt = null; } return Env.ZERO; } /** * Insert Details * @return number of rows inserted */ private int insertDetailsDistribution() { // Handle NULL StringBuilder sql = new StringBuilder("UPDATE M_DistributionRunLine SET MinQty = 0 WHERE MinQty IS NULL"); int no = DB.executeUpdate(sql.toString(), get_TrxName()); sql = new StringBuilder("UPDATE M_DistributionListLine SET MinQty = 0 WHERE MinQty IS NULL"); no = DB.executeUpdate(sql.toString(), get_TrxName()); // Delete Old sql = new StringBuilder("DELETE FROM T_DistributionRunDetail WHERE M_DistributionRun_ID=") .append(p_M_DistributionRun_ID); no = DB.executeUpdate(sql.toString(), get_TrxName()); if (log.isLoggable(Level.FINE)) log.fine("insertDetails - deleted #" + no); // Insert New sql = new StringBuilder("INSERT INTO T_DistributionRunDetail ") .append("(M_DistributionRun_ID, M_DistributionRunLine_ID, M_DistributionList_ID, M_DistributionListLine_ID,") .append("AD_Client_ID,AD_Org_ID, IsActive, Created,CreatedBy, Updated,UpdatedBy,") .append("C_BPartner_ID, C_BPartner_Location_ID, M_Product_ID,") .append("Ratio, MinQty, Qty) ") .append("SELECT rl.M_DistributionRun_ID, rl.M_DistributionRunLine_ID,ll.M_DistributionList_ID, ll.M_DistributionListLine_ID, ") .append("rl.AD_Client_ID,rl.AD_Org_ID, rl.IsActive, rl.Created,rl.CreatedBy, rl.Updated,rl.UpdatedBy, ") .append("ll.C_BPartner_ID, ll.C_BPartner_Location_ID, rl.M_Product_ID, 0 , ") .append("ol.TargetQty AS MinQty , 0 FROM M_DistributionRunLine rl ") .append("INNER JOIN M_DistributionList l ON (rl.M_DistributionList_ID=l.M_DistributionList_ID) ") .append("INNER JOIN M_DistributionListLine ll ON (rl.M_DistributionList_ID=ll.M_DistributionList_ID) ") .append("INNER JOIN DD_Order o ON (o.C_BPartner_ID=ll.C_BPartner_ID) ") .append("INNER JOIN DD_OrderLine ol ON (ol.DD_Order_ID=o.DD_Order_ID AND ol.M_Product_ID=rl.M_Product_ID) AND ol.DatePromised") .append( "<=").append(DB.TO_DATE(p_DatePromised)) .append(" INNER JOIN M_Locator loc ON (loc.M_Locator_ID=ol.M_Locator_ID AND loc.M_Warehouse_ID=").append(p_M_Warehouse_ID).append(") ") .append(" WHERE rl.M_DistributionRun_ID=").append(p_M_DistributionRun_ID).append(" AND l.RatioTotal<>0 AND rl.IsActive='Y' AND ll.IsActive='Y'"); no = DB.executeUpdate(sql.toString(), get_TrxName()); Query query = MTable.get(getCtx(), I_T_DistributionRunDetail.Table_ID). createQuery(MDistributionRunDetail.COLUMNNAME_M_DistributionRun_ID + "=?", get_TrxName()); query.setParameters(p_M_DistributionRun_ID); List records = query.list(); for(MDistributionRunDetail record : records) { BigDecimal total_ration = DB.getSQLValueBD(get_TrxName(), "SELECT SUM(Ratio) FROM T_DistributionRunDetail WHERE M_DistributionRun_ID=? AND M_Product_ID=? GROUP BY M_Product_ID" , p_M_DistributionRun_ID, record.getM_Product_ID()); MDistributionRunLine drl = (MDistributionRunLine) MTable.get(getCtx(), MDistributionRunLine.Table_ID).getPO(record.getM_DistributionRunLine_ID(), get_TrxName()); BigDecimal ration = record.getRatio(); BigDecimal factor = ration.divide(total_ration,RoundingMode.HALF_UP); record.setQty(factor.multiply(drl.getTotalQty())); record.saveEx(); } if (log.isLoggable(Level.FINE)) log.fine("inserted #" + no); return no; } // insertDetails /************************************************************************** * Create Orders * @return true if created */ private boolean distributionOrders() { //The Quantity Available is distribute with respect to Distribution Order Demand if (p_BasedInDamnd) { int M_Warehouse_ID = 0; if (p_M_Warehouse_ID <= 0) { MOrgInfo oi_source = MOrgInfo.get(getCtx(), m_run.getAD_Org_ID(), get_TrxName()); MWarehouse m_source = MWarehouse.get(getCtx(), oi_source.getM_Warehouse_ID()); if(m_source == null) throw new AdempiereException("Do not exist Defautl Warehouse Source"); M_Warehouse_ID = m_source.getM_Warehouse_ID(); } else M_Warehouse_ID = p_M_Warehouse_ID; // For all lines for (int i = 0; i < m_details.length; i++) { MDistributionRunDetail detail = m_details[i]; String sql = "SELECT * FROM DD_OrderLine ol INNER JOIN DD_Order o ON (o.DD_Order_ID=ol.DD_Order_ID) INNER JOIN M_Locator l ON (l.M_Locator_ID=ol.M_Locator_ID) "; //sql.append(" WHERE o.DocStatus IN ('DR','IN') AND o.C_BPartner_ID = ? AND M_Product_ID=? AND l.M_Warehouse_ID=? AND ol.DatePromised BETWEEN ? AND ? "); sql = sql + " WHERE o.DocStatus IN ('DR','IN') AND o.C_BPartner_ID = ? AND M_Product_ID=? AND l.M_Warehouse_ID=? AND ol.DatePromised <=?"; PreparedStatement pstmt = null; ResultSet rs = null; try { pstmt = DB.prepareStatement (sql.toString(),get_TrxName()); pstmt.setInt(1, detail.getC_BPartner_ID()); pstmt.setInt(2, detail.getM_Product_ID()); pstmt.setInt(3, M_Warehouse_ID); pstmt.setTimestamp(4, p_DatePromised); //pstmt.setTimestamp(5, p_DatePromised_To); rs = pstmt.executeQuery(); while (rs.next()) { // Create Order Line MDDOrderLine line = new MDDOrderLine(getCtx(), rs , get_TrxName()); line.setM_Product_ID(detail.getM_Product_ID()); line.setConfirmedQty(line.getTargetQty().add(detail.getActualAllocation())); if(p_M_Warehouse_ID>0) line.setDescription(Msg.translate(getCtx(), "PlannedQty")); else line.setDescription(m_run.getName()); line.saveEx(); break; } } catch (Exception e) { log.log(Level.SEVERE,"doIt - " + sql, e); return false; } finally { DB.close(rs, pstmt); rs = null; pstmt = null; } } return true; } // Get Counter Org/BP int runAD_Org_ID = m_run.getAD_Org_ID(); if (runAD_Org_ID == 0) runAD_Org_ID = Env.getAD_Org_ID(getCtx()); MOrg runOrg = MOrg.get(getCtx(), runAD_Org_ID); int runC_BPartner_ID = runOrg.getLinkedC_BPartner_ID(get_TrxName()); boolean counter = !m_run.isCreateSingleOrder() // no single Order && runC_BPartner_ID > 0 // Org linked to BP && !m_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) if (log.isLoggable(Level.INFO)) log.info("RunBP=" + runBPartner + " - " + m_docType); if (log.isLoggable(Level.INFO)) log.info("Single=" + m_run.isCreateSingleOrder() + " - " + m_docType + ",SO=" + m_docType.isSOTrx()); if (log.isLoggable(Level.FINE)) log.fine("Counter=" + counter + ",C_BPartner_ID=" + runC_BPartner_ID + "," + runBPartner); // MBPartner bp = null; MDDOrder singleOrder = null; MProduct product = null; MWarehouse m_source = null; MLocator m_locator= null ; MWarehouse m_target= null; MLocator m_locator_to= null; MWarehouse[] ws = null; MOrgInfo oi_source = MOrgInfo.get(getCtx(), m_run.getAD_Org_ID(), get_TrxName()); m_source = MWarehouse.get(getCtx(), oi_source.getM_Warehouse_ID()); if(m_source == null) throw new AdempiereException("Do not exist Defautl Warehouse Source"); m_locator = MLocator.getDefault(m_source); //get the warehouse in transit ws = MWarehouse.getInTransitForOrg(getCtx(), m_source.getAD_Org_ID()); if(ws==null) throw new AdempiereException("Warehouse Intransit do not found"); // Consolidated Single Order if (m_run.isCreateSingleOrder()) { bp = new MBPartner (getCtx(), m_run.getC_BPartner_ID(), get_TrxName()); if (bp.get_ID() == 0) throw new IllegalArgumentException("Business Partner not found - C_BPartner_ID=" + m_run.getC_BPartner_ID()); // if (!p_IsTest) { singleOrder = new MDDOrder (getCtx(), 0, get_TrxName()); singleOrder.setC_DocType_ID(m_docType.getC_DocType_ID()); singleOrder.setIsSOTrx(m_docType.isSOTrx()); singleOrder.setBPartner(bp); if (m_run.getC_BPartner_Location_ID() != 0) singleOrder.setC_BPartner_Location_ID(m_run.getC_BPartner_Location_ID()); singleOrder.setDateOrdered(m_DateOrdered); singleOrder.setDatePromised(p_DatePromised); singleOrder.setM_Warehouse_ID(ws[0].getM_Warehouse_ID()); if (!singleOrder.save()) { log.log(Level.SEVERE, "Order not saved"); return false; } m_counter++; } } int lastC_BPartner_ID = 0; int lastC_BPartner_Location_ID = 0; MDDOrder order = null; // For all lines for (int i = 0; i < m_details.length; i++) { MDistributionRunDetail detail = m_details[i]; // Create Order Header if (m_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(); bp = new MBPartner (getCtx(), detail.getC_BPartner_ID(), get_TrxName()); MOrgInfo oi_target = MOrgInfo.get(getCtx(), bp.getAD_OrgBP_ID(), get_TrxName()); m_target = MWarehouse.get(getCtx(), oi_target.getM_Warehouse_ID()); if(m_target==null) throw new AdempiereException("Do not exist Default Warehouse Target"); m_locator_to = MLocator.getDefault(m_target); if (m_locator == null || m_locator_to == null) { throw new AdempiereException("Do not exist default Locator for Warehouses"); } if(p_ConsolidateDocument) { StringBuilder whereClause = new StringBuilder("DocStatus IN ('DR','IN') AND AD_Org_ID=").append(bp.getAD_OrgBP_ID()).append(" AND ") .append(MDDOrder.COLUMNNAME_C_BPartner_ID).append("=? AND ") .append(MDDOrder.COLUMNNAME_M_Warehouse_ID).append("=? AND ") .append(MDDOrder.COLUMNNAME_DatePromised).append("<=? "); order = new Query(getCtx(), MDDOrder.Table_Name, whereClause.toString(), get_TrxName()) .setParameters(new Object[]{lastC_BPartner_ID, ws[0].getM_Warehouse_ID(), p_DatePromised}) .setOrderBy(MDDOrder.COLUMNNAME_DatePromised +" DESC") .first(); } // New Order if (order == null) { if (!p_IsTest) { order = new MDDOrder (getCtx(), 0, get_TrxName()); order.setAD_Org_ID(bp.getAD_OrgBP_ID()); order.setC_DocType_ID(m_docType.getC_DocType_ID()); order.setIsSOTrx(m_docType.isSOTrx()); // Counter Doc if (counter && bp.getAD_OrgBP_ID() > 0) { if (log.isLoggable(Level.FINE)) log.fine("Counter - From_BPOrg=" + bp.getAD_OrgBP_ID() + "-" + bp + ", To_BP=" + runBPartner); order.setAD_Org_ID(bp.getAD_OrgBP_ID()); if (ws[0].getM_Warehouse_ID() > 0) order.setM_Warehouse_ID(ws[0].getM_Warehouse_ID()); order.setBPartner(runBPartner); } else // normal { if (log.isLoggable(Level.FINE)) log.fine("From_Org=" + runAD_Org_ID + ", To_BP=" + bp); order.setAD_Org_ID(bp.getAD_OrgBP_ID()); order.setBPartner(bp); if (detail.getC_BPartner_Location_ID() != 0) order.setC_BPartner_Location_ID(detail.getC_BPartner_Location_ID()); } order.setM_Warehouse_ID(ws[0].getM_Warehouse_ID()); order.setDateOrdered(m_DateOrdered); order.setDatePromised(p_DatePromised); order.setIsInDispute(false); order.setIsInTransit(false); 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 (p_IsTest) { StringBuilder msglog = new StringBuilder().append(bp.getName()).append(" - ").append(product.getName()); addLog(0,null, detail.getActualAllocation(), msglog.toString()); continue; } if(p_ConsolidateDocument) { String sql = "SELECT DD_OrderLine_ID FROM DD_OrderLine ol INNER JOIN DD_Order o ON (o.DD_Order_ID=ol.DD_Order_ID) WHERE o.DocStatus IN ('DR','IN') AND o.C_BPartner_ID = ? AND M_Product_ID=? AND ol.M_Locator_ID=? AND ol.DatePromised <= ?"; int DD_OrderLine_ID = DB.getSQLValueEx(get_TrxName(), sql, new Object[]{detail.getC_BPartner_ID(),product.getM_Product_ID(), m_locator.getM_Locator_ID(), p_DatePromised}); if (DD_OrderLine_ID <= 0) { MDDOrderLine line = new MDDOrderLine(order); line.setAD_Org_ID(bp.getAD_OrgBP_ID()); line.setM_Locator_ID(m_locator.getM_Locator_ID()); line.setM_LocatorTo_ID(m_locator_to.getM_Locator_ID()); line.setIsInvoiced(false); line.setProduct(product); BigDecimal QtyAllocation = detail.getActualAllocation(); if(QtyAllocation == null) QtyAllocation = Env.ZERO; line.setQty(QtyAllocation); line.setQtyEntered(QtyAllocation); line.setTargetQty(Env.ZERO); String Description =""; if (m_run.getName() != null) Description =Description.concat(m_run.getName()); StringBuilder msgline = new StringBuilder(Description).append(" ").append(Msg.translate(getCtx(), "Qty")) .append(" = ").append(QtyAllocation).append(" "); line.setDescription(msgline.toString()); line.saveEx(); } else { MDDOrderLine line = new MDDOrderLine(getCtx(), DD_OrderLine_ID, get_TrxName()); BigDecimal QtyAllocation = detail.getActualAllocation(); if(QtyAllocation == null) QtyAllocation = Env.ZERO; String Description = line.getDescription(); if (Description == null) Description =""; if (m_run.getName() != null) Description =Description.concat(m_run.getName()); StringBuilder msgline = new StringBuilder(Description).append(" ").append(Msg.translate(getCtx(), "Qty")).append(" = ").append(QtyAllocation).append(" "); line.setDescription(msgline.toString()); line.setQty(line.getQtyEntered().add(QtyAllocation)); line.saveEx(); } } else { // Create Order Line MDDOrderLine line = new MDDOrderLine(order); if (counter && bp.getAD_OrgBP_ID() > 0) ; // don't overwrite counter doc // line.setAD_Org_ID(bp.getAD_OrgBP_ID()); line.setM_Locator_ID(m_locator.getM_Locator_ID()); line.setM_LocatorTo_ID(m_locator_to.getM_Locator_ID()); line.setIsInvoiced(false); line.setProduct(product); line.setQty(detail.getActualAllocation()); line.setQtyEntered(detail.getActualAllocation()); line.setTargetQty(Env.ZERO); String Description =""; if (m_run.getName() != null) Description =Description.concat(m_run.getName()); StringBuilder msgline = new StringBuilder(Description).append(" ").append(Msg.translate(getCtx(), "Qty")).append(" = ") .append(detail.getActualAllocation()).append(" "); line.setDescription(msgline.toString()); line.saveEx(); } StringBuilder msglog = new StringBuilder().append(order.getDocumentNo()) .append(": ").append(bp.getName()).append(" - ").append(product.getName()); addLog(0,null, detail.getActualAllocation(), msglog.toString()); } // finish order order = null; return true; } } // DistributionRun