Skip to content

B
business-java
Commit affbc888 authored by pborate's avatar pborate
Browse files
Options

Updated changes for dwh_sales procedure 

git-svn-id: http://15.206.35.175/svn/proteus/business-java/trunk@201270 ce508802-f39f-4f6c-b175-0d175dae99d5
parent 11a97dc3
Show whitespace changes
Inline Side-by-side
Showing with 35 additions and 93 deletions
webitm-dashboard/ibase/dashboard/module-resource/scm/Sales Trends/SQL/dwh_sales_procedure.sql
View file @ affbc888
create or replace PROCEDURE DWH_SALES(
AS_FR_DATE DATE,
AS_TO_DATE DATE)
......@@ -246,134 +247,84 @@ BEGIN
CASE
WHEN SRETURNDET.RET_REP_FLAG = 'R'
AND SRETURN.TRAN_TYPE IN('SR')
THEN DECODE(INVOICE_TRACE.INVOICE_ID, NULL, SRETURNDET.QUANTITY__STDUOM, (
CASE
WHEN COALESCE(INVOICE_TRACE.LINE_TYPE,'C') = 'F'
AND INVOICE_TRACE.RATE__STDUOM = 0
THEN 0
ELSE SRETURNDET.QUANTITY__STDUOM
END) )
THEN SRETURNDET.QUANTITY__STDUOM
ELSE 0
END) AS SALEABLE_RETURN_QTY,
END
) AS SALEABLE_RETURN_QTY,
(
CASE
WHEN SRETURNDET.RET_REP_FLAG = 'R'
AND SRETURN.TRAN_TYPE IN('SR')
THEN DECODE(INVOICE_TRACE.INVOICE_ID, NULL, SRETURNDET.QUANTITY__STDUOM * SRETURNDET.RATE__STDUOM, (
CASE
WHEN COALESCE(INVOICE_TRACE.LINE_TYPE,'C') = 'F'
AND INVOICE_TRACE.RATE__STDUOM = 0
THEN 0
ELSE SRETURNDET.QUANTITY__STDUOM * INVOICE_TRACE.RATE__STDUOM
END) )
THEN SRETURNDET.QUANTITY__STDUOM * SRETURNDET.RATE__STDUOM
ELSE 0
END) AS SALEABLE_RETURN_AMT,
END
) AS SALEABLE_RETURN_AMT,
(
CASE
WHEN SRETURNDET.RET_REP_FLAG = 'R'
AND SRETURN.TRAN_TYPE IN('BR', 'DR')
THEN DECODE(INVOICE_TRACE.INVOICE_ID, NULL, SRETURNDET.QUANTITY__STDUOM, (
CASE
WHEN COALESCE(INVOICE_TRACE.LINE_TYPE,'C') = 'F'
AND INVOICE_TRACE.RATE__STDUOM = 0
THEN 0
ELSE SRETURNDET.QUANTITY__STDUOM
END) )
THEN SRETURNDET.QUANTITY__STDUOM
ELSE 0
END) AS BREAKAGE_RETURN_QTY,
END
) AS BREAKAGE_RETURN_QTY,
(
CASE
WHEN SRETURNDET.RET_REP_FLAG = 'R'
AND SRETURN.TRAN_TYPE IN('BR', 'DR')
THEN DECODE(INVOICE_TRACE.INVOICE_ID, NULL, SRETURNDET.QUANTITY__STDUOM * SRETURNDET.RATE__STDUOM, (
CASE
WHEN COALESCE(INVOICE_TRACE.LINE_TYPE,'C') = 'F'
AND INVOICE_TRACE.RATE__STDUOM = 0
THEN 0
ELSE SRETURNDET.QUANTITY__STDUOM * INVOICE_TRACE.RATE__STDUOM
END) )
THEN SRETURNDET.QUANTITY__STDUOM * SRETURNDET.RATE__STDUOM
ELSE 0
END) AS BREAKAGE_RETURN_AMT,
END
) AS BREAKAGE_RETURN_AMT,
(
CASE
WHEN SRETURNDET.RET_REP_FLAG = 'R'
AND SRETURN.TRAN_TYPE = 'ER'
AND SRETURNDET.DISCOUNT <> 100
THEN DECODE(INVOICE_TRACE.INVOICE_ID, NULL, SRETURNDET.QUANTITY__STDUOM, (
CASE
WHEN COALESCE(INVOICE_TRACE.LINE_TYPE,'C') = 'F'
AND INVOICE_TRACE.RATE__STDUOM = 0
THEN 0
ELSE SRETURNDET.QUANTITY__STDUOM
END) )
THEN SRETURNDET.QUANTITY__STDUOM
ELSE 0
END) AS EXPIRY_RETURN_QTY,
END
) AS EXPIRY_RETURN_QTY,
(
CASE
WHEN SRETURNDET.RET_REP_FLAG = 'R'
AND SRETURN.TRAN_TYPE = 'ER'
AND SRETURNDET.DISCOUNT <> 100
THEN DECODE(INVOICE_TRACE.INVOICE_ID, NULL, SRETURNDET.QUANTITY__STDUOM * SRETURNDET.RATE__STDUOM, (
CASE
WHEN COALESCE(INVOICE_TRACE.LINE_TYPE,'C') = 'F'
AND INVOICE_TRACE.RATE__STDUOM = 0
THEN 0
ELSE SRETURNDET.QUANTITY__STDUOM * INVOICE_TRACE.RATE__STDUOM
END) )
THEN SRETURNDET.QUANTITY__STDUOM * SRETURNDET.RATE__STDUOM
ELSE 0
END) AS EXPIRY_RETURN_AMT,
END
) AS EXPIRY_RETURN_AMT,
(
CASE
WHEN SRETURNDET.RET_REP_FLAG = 'R'
AND SRETURN.TRAN_TYPE IN('IC')
THEN DECODE(INVOICE_TRACE.INVOICE_ID, NULL, SRETURNDET.QUANTITY__STDUOM, (
CASE
WHEN COALESCE(INVOICE_TRACE.LINE_TYPE,'C') = 'F'
AND INVOICE_TRACE.RATE__STDUOM = 0
THEN 0
ELSE SRETURNDET.QUANTITY__STDUOM
END) )
THEN SRETURNDET.QUANTITY__STDUOM
ELSE 0
END) AS CORRECTION_RETURN_QTY,
END
) AS CORRECTION_RETURN_QTY,
(
CASE
WHEN SRETURNDET.RET_REP_FLAG = 'R'
AND SRETURN.TRAN_TYPE IN('IC')
THEN DECODE(INVOICE_TRACE.INVOICE_ID, NULL, SRETURNDET.QUANTITY__STDUOM * SRETURNDET.RATE__STDUOM, (
CASE
WHEN COALESCE(INVOICE_TRACE.LINE_TYPE,'C') = 'F'
AND INVOICE_TRACE.RATE__STDUOM = 0
THEN 0
ELSE SRETURNDET.QUANTITY__STDUOM * INVOICE_TRACE.RATE__STDUOM
END) )
THEN SRETURNDET.QUANTITY__STDUOM * SRETURNDET.RATE__STDUOM
ELSE 0
END) AS CORRECTION_RETURN_AMT,
END
) AS CORRECTION_RETURN_AMT,
DECODE(SRETURNDET.RET_REP_FLAG, 'P', SRETURNDET.QUANTITY__STDUOM, 0) AS REPL_RETURN_QTY,
DECODE(SRETURNDET.RET_REP_FLAG, 'P', SRETURNDET.QUANTITY__STDUOM * SRETURNDET.RATE__STDUOM, 0) AS REPL_RETURN_VALUE,
(
CASE
WHEN SRETURNDET.RET_REP_FLAG = 'R'
THEN DECODE(INVOICE_TRACE.INVOICE_ID, NULL, SRETURNDET.QUANTITY__STDUOM, (
CASE
WHEN COALESCE(INVOICE_TRACE.LINE_TYPE,'C') = 'F'
AND INVOICE_TRACE.RATE__STDUOM = 0
THEN 0
ELSE SRETURNDET.QUANTITY__STDUOM
END) )
THEN SRETURNDET.QUANTITY__STDUOM
ELSE 0
END) AS RETURN_QTY,
END
) AS RETURN_QTY,
(
CASE
WHEN SRETURNDET.RET_REP_FLAG = 'R'
THEN DECODE(INVOICE_TRACE.INVOICE_ID, NULL, SRETURNDET.QUANTITY__STDUOM * SRETURNDET.RATE__STDUOM, (
CASE
WHEN COALESCE(INVOICE_TRACE.LINE_TYPE,'C') = 'F'
AND INVOICE_TRACE.RATE__STDUOM = 0
THEN 0
ELSE SRETURNDET.QUANTITY__STDUOM * INVOICE_TRACE.RATE__STDUOM
END) )
THEN SRETURNDET.QUANTITY__STDUOM * SRETURNDET.RATE__STDUOM
ELSE 0
END) AS GROSS_RETURN_VALUE,
END
) AS GROSS_RETURN_VALUE,
SRETURNDET.NET_AMT AS NET_RETURN_VALUE,
(
CASE
......@@ -405,10 +356,10 @@ BEGIN
NVL(FN_RGET_TAX_NEW('S-RET',SRETURN.TRAN_ID,CAST(SRETURNDET.LINE_NO AS CHAR(3)),'IGST_TAX',' ',' ','P'),0) AS IGST_RATE,
NVL(FN_RGET_TAX_NEW('S-RET',SRETURN.TRAN_ID,CAST(SRETURNDET.LINE_NO AS CHAR(3)),'IGST_TAX',' ',' ','T'),0) AS IGST_AMT,
0 AS DISC_AMT_INV,
((NVL((((NVL(SRETURNDET.QUANTITY,0)*NVL(SRETURNDET.RATE__STDUOM,0)*NVL(SRETURN.EXCH_RATE,0))*NVL(SRETURNDET.DISCOUNT,0))/100),0)
((NVL((((NVL(SRETURNDET.QUANTITY__STDUOM,0)*NVL(SRETURNDET.RATE__STDUOM,0)*NVL(SRETURN.EXCH_RATE,0))*NVL(SRETURNDET.DISCOUNT,0))/100),0)
+ NVL(FN_RGET_TAX_NEW('S-RET', SRETURN.TRAN_ID, CAST(SRETURNDET.LINE_NO AS CHAR(3)),'DISC_GST',' ',' ','T')*(-1),0))) AS DISC_AMT_RET,
0 AS DISC_AMT_REPL,
DECODE(SRETURNDET.RET_REP_FLAG,'P',((NVL((((NVL(SRETURNDET.QUANTITY,0)*NVL(SRETURNDET.RATE__STDUOM,0)*NVL(SRETURN.EXCH_RATE,0))*NVL(SRETURNDET.DISCOUNT,0))/100),0)
DECODE(SRETURNDET.RET_REP_FLAG,'P',((NVL((((NVL(SRETURNDET.QUANTITY__STDUOM,0)*NVL(SRETURNDET.RATE__STDUOM,0)*NVL(SRETURN.EXCH_RATE,0))*NVL(SRETURNDET.DISCOUNT,0))/100),0)
+ NVL(FN_RGET_TAX_NEW('S-RET', SRETURN.TRAN_ID, CAST(SRETURNDET.LINE_NO AS CHAR(3)),'DISC_GST',' ',' ','T')*(-1),0))), 0) AS DISC_AMT_REPL_RET,
NVL(FN_RPICK_MRP_PTR(SRETURNDET.ITEM_CODE, SRETURN.TRAN_DATE,SRETURNDET.LOT_NO,'MRP_GST'),0) AS MRP,
NVL(FN_RPICK_MRP_PTR(SRETURNDET.ITEM_CODE, SRETURN.TRAN_DATE,SRETURNDET.LOT_NO,'PTR_GST'),0) AS PTR,
......@@ -457,12 +408,3 @@ BEGIN
WHEN OTHERS THEN
dbms_output.put_line(' Error occured ');
END;
\ No newline at end of file
set serveroutput on;
EXEC DWH_SALES('01-NOV-18','30-NOV-18');
EXEC DWH_SALES('01-DEC-18','31-DEC-18');
EXEC DWH_SALES('01-JAN-19','31-JAN-19');
EXEC DWH_SALES('01-FEB-19','28-FEB-19');
EXEC DWH_SALES('01-MAR-19','31-MAR-19');
EXEC DWH_SALES('01-APR-19','30-APR-19');
EXEC DWH_SALES('01-MAY-19','31-MAY-19');
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment