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
Hide 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(
create or replace PROCEDURE DWH_SALES(
AS_FR_DATE DATE, AS_FR_DATE DATE,
AS_TO_DATE DATE) AS_TO_DATE DATE)
AS AS
...@@ -246,134 +247,84 @@ BEGIN ...@@ -246,134 +247,84 @@ BEGIN
CASE CASE
WHEN SRETURNDET.RET_REP_FLAG = 'R' WHEN SRETURNDET.RET_REP_FLAG = 'R'
AND SRETURN.TRAN_TYPE IN('SR') AND SRETURN.TRAN_TYPE IN('SR')
THEN DECODE(INVOICE_TRACE.INVOICE_ID, NULL, SRETURNDET.QUANTITY__STDUOM, ( THEN 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) )
ELSE 0 ELSE 0
END) AS SALEABLE_RETURN_QTY, END
) AS SALEABLE_RETURN_QTY,
( (
CASE CASE
WHEN SRETURNDET.RET_REP_FLAG = 'R' WHEN SRETURNDET.RET_REP_FLAG = 'R'
AND SRETURN.TRAN_TYPE IN('SR') AND SRETURN.TRAN_TYPE IN('SR')
THEN DECODE(INVOICE_TRACE.INVOICE_ID, NULL, SRETURNDET.QUANTITY__STDUOM * SRETURNDET.RATE__STDUOM, ( THEN 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) )
ELSE 0 ELSE 0
END) AS SALEABLE_RETURN_AMT, END
) AS SALEABLE_RETURN_AMT,
( (
CASE CASE
WHEN SRETURNDET.RET_REP_FLAG = 'R' WHEN SRETURNDET.RET_REP_FLAG = 'R'
AND SRETURN.TRAN_TYPE IN('BR', 'DR') AND SRETURN.TRAN_TYPE IN('BR', 'DR')
THEN DECODE(INVOICE_TRACE.INVOICE_ID, NULL, SRETURNDET.QUANTITY__STDUOM, ( THEN 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) )
ELSE 0 ELSE 0
END) AS BREAKAGE_RETURN_QTY, END
) AS BREAKAGE_RETURN_QTY,
( (
CASE CASE
WHEN SRETURNDET.RET_REP_FLAG = 'R' WHEN SRETURNDET.RET_REP_FLAG = 'R'
AND SRETURN.TRAN_TYPE IN('BR', 'DR') AND SRETURN.TRAN_TYPE IN('BR', 'DR')
THEN DECODE(INVOICE_TRACE.INVOICE_ID, NULL, SRETURNDET.QUANTITY__STDUOM * SRETURNDET.RATE__STDUOM, ( THEN 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) )
ELSE 0 ELSE 0
END) AS BREAKAGE_RETURN_AMT, END
) AS BREAKAGE_RETURN_AMT,
( (
CASE CASE
WHEN SRETURNDET.RET_REP_FLAG = 'R' WHEN SRETURNDET.RET_REP_FLAG = 'R'
AND SRETURN.TRAN_TYPE = 'ER' AND SRETURN.TRAN_TYPE = 'ER'
AND SRETURNDET.DISCOUNT <> 100 AND SRETURNDET.DISCOUNT <> 100
THEN DECODE(INVOICE_TRACE.INVOICE_ID, NULL, SRETURNDET.QUANTITY__STDUOM, ( THEN 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) )
ELSE 0 ELSE 0
END) AS EXPIRY_RETURN_QTY, END
) AS EXPIRY_RETURN_QTY,
( (
CASE CASE
WHEN SRETURNDET.RET_REP_FLAG = 'R' WHEN SRETURNDET.RET_REP_FLAG = 'R'
AND SRETURN.TRAN_TYPE = 'ER' AND SRETURN.TRAN_TYPE = 'ER'
AND SRETURNDET.DISCOUNT <> 100 AND SRETURNDET.DISCOUNT <> 100
THEN DECODE(INVOICE_TRACE.INVOICE_ID, NULL, SRETURNDET.QUANTITY__STDUOM * SRETURNDET.RATE__STDUOM, ( THEN 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) )
ELSE 0 ELSE 0
END) AS EXPIRY_RETURN_AMT, END
) AS EXPIRY_RETURN_AMT,
( (
CASE CASE
WHEN SRETURNDET.RET_REP_FLAG = 'R' WHEN SRETURNDET.RET_REP_FLAG = 'R'
AND SRETURN.TRAN_TYPE IN('IC') AND SRETURN.TRAN_TYPE IN('IC')
THEN DECODE(INVOICE_TRACE.INVOICE_ID, NULL, SRETURNDET.QUANTITY__STDUOM, ( THEN 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) )
ELSE 0 ELSE 0
END) AS CORRECTION_RETURN_QTY, END
) AS CORRECTION_RETURN_QTY,
( (
CASE CASE
WHEN SRETURNDET.RET_REP_FLAG = 'R' WHEN SRETURNDET.RET_REP_FLAG = 'R'
AND SRETURN.TRAN_TYPE IN('IC') AND SRETURN.TRAN_TYPE IN('IC')
THEN DECODE(INVOICE_TRACE.INVOICE_ID, NULL, SRETURNDET.QUANTITY__STDUOM * SRETURNDET.RATE__STDUOM, ( THEN 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) )
ELSE 0 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, 0) AS REPL_RETURN_QTY,
DECODE(SRETURNDET.RET_REP_FLAG, 'P', SRETURNDET.QUANTITY__STDUOM * SRETURNDET.RATE__STDUOM, 0) AS REPL_RETURN_VALUE, DECODE(SRETURNDET.RET_REP_FLAG, 'P', SRETURNDET.QUANTITY__STDUOM * SRETURNDET.RATE__STDUOM, 0) AS REPL_RETURN_VALUE,
( (
CASE CASE
WHEN SRETURNDET.RET_REP_FLAG = 'R' WHEN SRETURNDET.RET_REP_FLAG = 'R'
THEN DECODE(INVOICE_TRACE.INVOICE_ID, NULL, SRETURNDET.QUANTITY__STDUOM, ( THEN 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) )
ELSE 0 ELSE 0
END) AS RETURN_QTY, END
) AS RETURN_QTY,
( (
CASE CASE
WHEN SRETURNDET.RET_REP_FLAG = 'R' WHEN SRETURNDET.RET_REP_FLAG = 'R'
THEN DECODE(INVOICE_TRACE.INVOICE_ID, NULL, SRETURNDET.QUANTITY__STDUOM * SRETURNDET.RATE__STDUOM, ( THEN 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) )
ELSE 0 ELSE 0
END) AS GROSS_RETURN_VALUE, END
) AS GROSS_RETURN_VALUE,
SRETURNDET.NET_AMT AS NET_RETURN_VALUE, SRETURNDET.NET_AMT AS NET_RETURN_VALUE,
( (
CASE CASE
...@@ -405,10 +356,10 @@ BEGIN ...@@ -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',' ',' ','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, 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, 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, + 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, 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_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,'MRP_GST'),0) AS MRP,
NVL(FN_RPICK_MRP_PTR(SRETURNDET.ITEM_CODE, SRETURN.TRAN_DATE,SRETURNDET.LOT_NO,'PTR_GST'),0) AS PTR, NVL(FN_RPICK_MRP_PTR(SRETURNDET.ITEM_CODE, SRETURN.TRAN_DATE,SRETURNDET.LOT_NO,'PTR_GST'),0) AS PTR,
...@@ -456,13 +407,4 @@ BEGIN ...@@ -456,13 +407,4 @@ BEGIN
EXCEPTION EXCEPTION
WHEN OTHERS THEN WHEN OTHERS THEN
dbms_output.put_line(' Error occured '); dbms_output.put_line(' Error occured ');
END; 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