details:   https://code.openbravo.com/erp/devel/pi/rev/3bc16b78fc85
changeset: 29766:3bc16b78fc85
user:      Mark <markmm82 <at> gmail.com>
date:      Mon Jul 11 13:40:10 2016 -0400
summary:   Fixes issue 33325: Sales Inv Report Legacy shows negative cost for 
Credit Memo

Fixed the way how the cost is calculated in 
ReportInvoiceCustomerDimensionalAnalysesJR_legacy_data to retrieve the document 
cost of a Credit Memo document in negative because it is a return document, 
similar to a negative Standard Sales Invoice.

details:   https://code.openbravo.com/erp/devel/pi/rev/fbb6588f5b6d
changeset: 29767:fbb6588f5b6d
user:      Alvaro Ferraz <alvaro.ferraz <at> openbravo.com>
date:      Wed Jul 13 01:09:53 2016 +0200
summary:   Related to issue 33325: Code review improvements

diffstat:

 
src/org/openbravo/erpCommon/ad_reports/ReportInvoiceCustomerDimensionalAnalysesJR_legacy_data.xsql
 |  16 +++++++--
 1 files changed, 12 insertions(+), 4 deletions(-)

diffs (58 lines):

diff -r 429e7e4d6c93 -r fbb6588f5b6d 
src/org/openbravo/erpCommon/ad_reports/ReportInvoiceCustomerDimensionalAnalysesJR_legacy_data.xsql
--- 
a/src/org/openbravo/erpCommon/ad_reports/ReportInvoiceCustomerDimensionalAnalysesJR_legacy_data.xsql
        Thu Jun 23 18:31:34 2016 +0200
+++ 
b/src/org/openbravo/erpCommon/ad_reports/ReportInvoiceCustomerDimensionalAnalysesJR_legacy_data.xsql
        Wed Jul 13 01:09:53 2016 +0200
@@ -12,7 +12,7 @@
  * under the License. 
  * The Original Code is Openbravo ERP. 
  * The Initial Developer of the Original Code is Openbravo SLU 
- * All portions are Copyright (C) 2001-2010 Openbravo SLU 
+ * All portions are Copyright (C) 2001-2016 Openbravo SLU 
  * All Rights Reserved. 
  * Contributor(s):  ______________________________________.
  ************************************************************************
@@ -43,13 +43,16 @@
          C_CURRENCY_CONVERT(SUM(COSTREF), ?, ?, TO_DATE(TRDATE), NULL, 
TRCLIENTID, TRORGID) AS CONVCOSTREF,      
          TRCURRENCYID, TRDATE, TRCLIENTID, TRORGID
       FROM (SELECT to_char('1') AS NIVEL1, to_char('2') AS NIVEL2, 
to_char('3') AS NIVEL3, to_char('4') AS NIVEL4, to_char('5') AS NIVEL5, 
to_char('6') AS NIVEL6, to_char('7') AS NIVEL7, to_char('16') AS NIVEL8, 
to_char('18') AS NIVEL9, to_char('20') AS NIVEL10,
-      C_INVOICELINE.LINENETAMT, C_INVOICELINE.QTYINVOICED, 
C_INVOICELINE.QTYINVOICED*M_PRODUCT.WEIGHT AS WEIGHT, 
M_GET_PRODUCT_COST(M_PRODUCT.M_PRODUCT_ID, C_INVOICE.DATEINVOICED, 
NULL)*C_INVOICELINE.QTYINVOICED AS COST, 
+      CASE WHEN C_DOCTYPE.DOCBASETYPE='ARC' THEN C_INVOICELINE.LINENETAMT*-1 
ELSE C_INVOICELINE.LINENETAMT END AS LINENETAMT,
+      CASE WHEN C_DOCTYPE.DOCBASETYPE='ARC' THEN C_INVOICELINE.QTYINVOICED*-1 
ELSE C_INVOICELINE.QTYINVOICED END AS QTYINVOICED, 
C_INVOICELINE.QTYINVOICED*M_PRODUCT.WEIGHT AS WEIGHT,
+      CASE WHEN C_DOCTYPE.DOCBASETYPE='ARC' THEN 
M_GET_PRODUCT_COST(M_PRODUCT.M_PRODUCT_ID, C_INVOICE.DATEINVOICED, 
NULL)*C_INVOICELINE.QTYINVOICED*-1 ELSE 
M_GET_PRODUCT_COST(M_PRODUCT.M_PRODUCT_ID, C_INVOICE.DATEINVOICED, 
NULL)*C_INVOICELINE.QTYINVOICED END AS COST,
       0 AS LINENETREF, 0 AS QTYINVOICEDREF, 0 AS WEIGHT_REF, 0 AS COSTREF, 
C_UOM.UOMSYMBOL,
       C_INVOICE.C_CURRENCY_ID AS TRCURRENCYID,  
          TO_DATE(COALESCE(C_INVOICE.DATEINVOICED, NOW())) AS TRDATE,      
          C_INVOICELINE.AD_CLIENT_ID AS TRCLIENTID,      
          C_INVOICELINE.AD_ORG_ID AS TRORGID
       FROM C_INVOICE left join AD_USER on C_INVOICE.SALESREP_ID = 
AD_USER.AD_USER_ID
+                     left join C_DOCTYPE on 
C_INVOICE.C_DOCTYPE_ID=C_DOCTYPE.C_DOCTYPE_ID
                      left join C_PROJECT on C_INVOICE.C_PROJECT_ID = 
C_PROJECT.C_PROJECT_ID,
            C_INVOICELINE left join C_UOM on C_INVOICELINE.C_UOM_ID = 
C_UOM.C_UOM_ID
                          left join M_PRODUCT on C_INVOICELINE.M_PRODUCT_ID = 
M_PRODUCT.M_PRODUCT_ID
@@ -69,12 +72,15 @@
       AND 1=1
       UNION ALL SELECT to_char('8') AS NIVEL1 , to_char('9') AS NIVEL2 , 
to_char('10') AS NIVEL3 , to_char('11') AS NIVEL4 , to_char('12') AS NIVEL5 , 
to_char('13') AS NIVEL6 , to_char('14') AS NIVEL7 , to_char('17') AS NIVEL8 , 
to_char('19') AS NIVEL9 , to_char('21') AS NIVEL10,
       0 AS LINENETAMT, 0 AS QTYINVOICED, 0 AS WEIGHT, 0 AS COST, 
-      C_INVOICELINE.LINENETAMT AS LINENETREF, C_INVOICELINE.QTYINVOICED AS 
QTYINVOICEDREF, C_INVOICELINE.QTYINVOICED*M_PRODUCT.WEIGHT AS WEIGHT_REF, 
M_GET_PRODUCT_COST(M_PRODUCT.M_PRODUCT_ID, C_INVOICE.DATEINVOICED, 
NULL)*C_INVOICELINE.QTYINVOICED AS COSTREF, C_UOM.UOMSYMBOL,
+      CASE WHEN C_DOCTYPE.DOCBASETYPE='ARC' THEN C_INVOICELINE.LINENETAMT*-1 
ELSE C_INVOICELINE.LINENETAMT END AS LINENETREF,
+      CASE WHEN C_DOCTYPE.DOCBASETYPE='ARC' THEN C_INVOICELINE.QTYINVOICED*-1 
ELSE C_INVOICELINE.QTYINVOICED END AS QTYINVOICEDREF, 
C_INVOICELINE.QTYINVOICED*M_PRODUCT.WEIGHT AS WEIGHT_REF,
+      CASE WHEN C_DOCTYPE.DOCBASETYPE='ARC' THEN 
M_GET_PRODUCT_COST(M_PRODUCT.M_PRODUCT_ID, C_INVOICE.DATEINVOICED, 
NULL)*C_INVOICELINE.QTYINVOICED*-1 ELSE 
M_GET_PRODUCT_COST(M_PRODUCT.M_PRODUCT_ID, C_INVOICE.DATEINVOICED, 
NULL)*C_INVOICELINE.QTYINVOICED END AS COSTREF, C_UOM.UOMSYMBOL,
       C_INVOICE.C_CURRENCY_ID AS TRCURRENCYID,  
          TO_DATE(COALESCE(C_INVOICE.DATEINVOICED, NOW())) AS TRDATE,      
          C_INVOICELINE.AD_CLIENT_ID AS TRCLIENTID,      
          C_INVOICELINE.AD_ORG_ID AS TRORGID
       FROM C_INVOICE left join AD_USER on C_INVOICE.SALESREP_ID = 
AD_USER.AD_USER_ID
+                     left join C_DOCTYPE on 
C_INVOICE.C_DOCTYPE_ID=C_DOCTYPE.C_DOCTYPE_ID
                      left join C_PROJECT on C_INVOICE.C_PROJECT_ID = 
C_PROJECT.C_PROJECT_ID, 
            C_INVOICELINE left join M_PRODUCT on C_INVOICELINE.M_PRODUCT_ID = 
M_PRODUCT.M_PRODUCT_ID
                          left join C_UOM     on C_INVOICELINE.C_UOM_ID = 
C_UOM.C_UOM_ID
@@ -214,7 +220,9 @@
          0 AS CONVCOSTREF,
       TRCURRENCYID, TRDATE, TRCLIENTID, TRORGID
       FROM (SELECT to_char('1') AS NIVEL1, to_char('2') AS NIVEL2, 
to_char('3') AS NIVEL3, to_char('4') AS NIVEL4, to_char('5') AS NIVEL5, 
to_char('6') AS NIVEL6, to_char('7') AS NIVEL7, to_char('9') AS NIVEL8, 
to_char('10') AS NIVEL9, to_char('11') AS NIVEL10,
-      CASE WHEN C_DOCTYPE.DOCBASETYPE='ARC' THEN C_INVOICELINE.LINENETAMT*-1 
ELSE C_INVOICELINE.LINENETAMT END AS LINENETAMT, C_INVOICELINE.QTYINVOICED, 
C_INVOICELINE.QTYINVOICED*M_PRODUCT.WEIGHT AS WEIGHT, 
M_GET_PRODUCT_COST(M_PRODUCT.M_PRODUCT_ID, C_INVOICE.DATEINVOICED, 
NULL)*C_INVOICELINE.QTYINVOICED AS COST,
+      CASE WHEN C_DOCTYPE.DOCBASETYPE='ARC' THEN C_INVOICELINE.LINENETAMT*-1 
ELSE C_INVOICELINE.LINENETAMT END AS LINENETAMT,
+      CASE WHEN C_DOCTYPE.DOCBASETYPE='ARC' THEN C_INVOICELINE.QTYINVOICED*-1 
ELSE C_INVOICELINE.QTYINVOICED END AS QTYINVOICED, 
C_INVOICELINE.QTYINVOICED*M_PRODUCT.WEIGHT AS WEIGHT,
+      CASE WHEN C_DOCTYPE.DOCBASETYPE='ARC' THEN 
M_GET_PRODUCT_COST(M_PRODUCT.M_PRODUCT_ID, C_INVOICE.DATEINVOICED, 
NULL)*C_INVOICELINE.QTYINVOICED*-1 ELSE 
M_GET_PRODUCT_COST(M_PRODUCT.M_PRODUCT_ID, C_INVOICE.DATEINVOICED, 
NULL)*C_INVOICELINE.QTYINVOICED END AS COST,
       0 AS LINENETREF, 0 AS QTYINVOICEDREF, 0 AS WEIGHT_REF, C_UOM.UOMSYMBOL,
       C_INVOICE.C_CURRENCY_ID AS TRCURRENCYID,  
          TO_DATE(COALESCE(C_INVOICE.DATEINVOICED, NOW())) AS TRDATE,      

------------------------------------------------------------------------------
What NetFlow Analyzer can do for you? Monitors network bandwidth and traffic
patterns at an interface-level. Reveals which users, apps, and protocols are 
consuming the most bandwidth. Provides multi-vendor support for NetFlow, 
J-Flow, sFlow and other flows. Make informed decisions using capacity planning
reports.http://sdm.link/zohodev2dev
_______________________________________________
Openbravo-commits mailing list
Openbravo-commits@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/openbravo-commits

Reply via email to