pt/forecast_api
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

overhaul new basket

Browse Source
This commit is contained in:
Trowbridge 2020-02-13 16:41:39 -05:00
parent 07bd753a8e
commit acca526dca
1 changed files with 276 additions and 568 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

634
route_sql/new_basket.sql
View File

@ -30,18 +30,18 @@ target AS (select $$replace_request$$::json def)
SELECT * FROM SELECT * FROM
( (
VALUES VALUES
('Jun',1,6,-1) ('01 - Jun',1,6,-1)
,('Jul',2,7,-1) ,('02 - Jul',2,7,-1)
,('Aug',3,8,-1) ,('03 - Aug',3,8,-1)
,('Sep',4,9,-1) ,('04 - Sep',4,9,-1)
,('Oct',5,10,-1) ,('05 - Oct',5,10,-1)
,('Nov',6,11,-1) ,('06 - Nov',6,11,-1)
,('Dec',7,12,-1) ,('07 - Dec',7,12,-1)
,('Jan',8,1,0) ,('08 - Jan',8,1,0)
,('Feb',9,2,0) ,('09 - Feb',9,2,0)
,('Mar',10,3,0) ,('10 - Mar',10,3,0)
,('Apr',11,4,0) ,('11 - Apr',11,4,0)
,('May',12,5,0) ,('12 - May',12,5,0)
) x(m,s,cal,yr) ) x(m,s,cal,yr)
) )
,SEG AS ( ,SEG AS (
@ -67,30 +67,6 @@ target AS (select $$replace_request$$::json def)
('9TO','Other') ('9TO','Other')
) X(GLEC, SEGM) ) X(GLEC, SEGM)
) )
,MG AS (
SELECT
X.F1, X.MING, X.GRP
FROM
(
VALUES
('L','000','Branded'),
('L','B10','Branded'),
('L','B11','Branded'),
('L','B52','Branded'),
('L','C10','Branded'),
('L','D12','Branded'),
('L','M11','Branded'),
('L','P12','Branded'),
('L','P13','Branded'),
('L','S10','Branded'),
('L','Y10','Branded'),
('L','Y11','Branded'),
('L','Y12','Branded'),
('P','B10','Branded'),
('P','B11','Branded'),
('P','B52','Branded')
) AS X (F1, MING, GRP)
)
,REPC AS ( ,REPC AS (
SELECT SELECT
LTRIM(RTRIM(C.A9)) RCODE LTRIM(RTRIM(C.A9)) RCODE
@ -103,46 +79,6 @@ target AS (select $$replace_request$$::json def)
WHERE WHERE
C.A2 = 'MM' C.A2 = 'MM'
) )
--MOLD DESCRIPTIONS
,MD AS (
SELECT
U.MOLD
,MAX(U.DESCR) DESCR
FROM
(
SELECT
SUBSTR(M.AVPART,1,8) MOLD
,MAX(M.AVDES1) DESCR
FROM
LGDAT.STKMM M
WHERE
LENGTH(M.AVPART) > 8
AND SUBSTR(M.AVGLED,1,1) <= '2'
GROUP BY
SUBSTR(M.AVPART,1,8)
UNION ALL
SELECT
SUBSTR(P.AWPART,1,8) MOLD
,MAX(P.AWDES1) DESCR
FROM
LGDAT.STKMP P
WHERE
LENGTH(P.AWPART) > 8
AND SUBSTR(P.AWGLED,1,1) <= '2'
GROUP BY
SUBSTR(P.AWPART,1,8)
) U
GROUP BY
U.MOLD
)
----------------------------------------------------sales major codes----------------------------------------------------------------------------------------------------------------------------------
,SJ AS (
SELECT * FROM LGDAT.MMSL WHERE COALESCE(BSMNCD,'') = ''
)
----------------------------------------------------sales minor codes----------------------------------------------------------------------------------------------------------------------------------
,SI AS (
SELECT * FROM LGDAT.MMSL WHERE COALESCE(BSMNCD,'') <> ''
)
,copr AS ( ,copr AS (
SELECT SELECT
LTRIM(RTRIM(A9)) AS COMP, LTRIM(RTRIM(A9)) AS COMP,
@ -169,12 +105,12 @@ target AS (select $$replace_request$$::json def)
,terms ,terms
,order_month ,order_month
,mseq.s seq ,mseq.s seq
,orderdate ,order_date
,requestdate ,request_date
,shipdate ,ship_date
,sum(value_usd) value_usd ,sum(value_usd) value_usd
FROM FROM
rlarp.osm_fcpool rlarp.osm_pool
LEFT OUTER JOIN mseq ON LEFT OUTER JOIN mseq ON
mseq.m = order_month mseq.m = order_month
WHERE WHERE
@ -183,50 +119,52 @@ target AS (select $$replace_request$$::json def)
--probably dont want to include adjustments that have blown away volume and good sources of dating info --probably dont want to include adjustments that have blown away volume and good sources of dating info
-----------------additional params------------------- -----------------additional params-------------------
AND calc_status||flag <> 'CLOSEDREMAINDER' --exclude short ships when building order adjustments AND calc_status||flag <> 'CLOSEDREMAINDER' --exclude short ships when building order adjustments
AND adj_orderdate <= adj_shipdate AND order_date <= ship_date
GROUP BY GROUP BY
promo promo
,terms ,terms
,order_month ,order_month
,mseq.s ,mseq.s
,orderdate ,order_date
,requestdate ,request_date
,shipdate ,ship_date
HAVING HAVING
sum(value_usd) <> 0 sum(value_usd) <> 0
) )
--select * from alldates --select * from alldates
,dom AS ( ,dom AS (
SELECT SELECT
extract(day FROM orderdate) DOM extract(day FROM order_date) DOM
,sum(value_usd) value_usd ,sum(value_usd) value_usd
FROM FROM
alldates alldates
GROUP BY GROUP BY
extract(day FROM orderdate) extract(day FROM order_date)
) )
--select * from dom
---------------------may want ot look at a top-5 mix solution in the future facilitated by sum() over (order by sales desc)--------------- ---------------------may want ot look at a top-5 mix solution in the future facilitated by sum() over (order by sales desc)---------------
,mmix AS ( ,mmix AS (
SELECT SELECT
to_char(orderdate,'Mon') _month to_char(order_date,'Mon') _month
,seq ,seq
,promo ,promo
,sum(extract(day from orderdate)*value_usd) dom_wa ,sum(extract(day from order_date)*value_usd) dom_wa
--,requestdate-orderdate rlag --,request_date-order_date rlag
,sum((requestdate-orderdate)*(value_usd)) rlag_wa ,sum((request_date-order_date)*(value_usd)) rlag_wa
--,shipdate - requestdate slag --,ship_date - request_date slag
,sum((shipdate - requestdate)*(value_usd)) slag_wa ,sum((ship_date - request_date)*(value_usd)) slag_wa
,sum(value_usd) value_usd ,sum(value_usd) value_usd
FROM FROM
alldates alldates
GROUP BY GROUP BY
to_char(orderdate,'Mon') to_char(order_date,'Mon')
,seq ,seq
,promo ,promo
--,extract(day from orderdate) --,extract(day from order_date)
--,requestdate-orderdate --,request_date-order_date
--,shipdate - requestdate --,ship_date - request_date
) )
--select * from mmix
,targm AS ( ,targm AS (
SELECT SELECT
je.key as month je.key as month
@ -242,6 +180,7 @@ target AS (select $$replace_request$$::json def)
LEFT OUTER JOIN mseq ON LEFT OUTER JOIN mseq ON
mseq.m = je.key mseq.m = je.key
) )
--select * from targm
,mmixp AS ( ,mmixp AS (
SELECT SELECT
_month _month
@ -255,6 +194,7 @@ target AS (select $$replace_request$$::json def)
FROM FROM
mmix mmix
) )
--select * from mmixp
--month cross join mix --month cross join mix
,mxm AS ( ,mxm AS (
SELECT SELECT
@ -286,114 +226,24 @@ FROM
--this basemix is probably join going to be part-bill-ship with all master data joined later since it is not known if any original is salvaged --this basemix is probably join going to be part-bill-ship with all master data joined later since it is not known if any original is salvaged
,basemix AS ( ,basemix AS (
SELECT SELECT
null::text plnt ---master data sd.fspr
,0::numeric(11,0) "ddord#" ,mxm.promo
,0::numeric(11,0) "dditm#"
,0::numeric(11,0) "fgbol#"
,0::numeric(11,0) "fgent#"
,0::numeric(9,0) "diinv#"
,0::numeric(3,0) "dilin#"
,mxm.promo --history
,null::text return_reas
,null::text terms
,''::text custpo
,'I' dhincr
,null::numeric diext
,null::numeric ditdis
,null::date dcodat
,null::date ddqdat
,null::date dcmdat
,null::date dhidat
,sd.fspr
,null::text remit_to
,null::text bill_class
,(regexp_match(jr.bill_cust_descr,'(.*?)(?= - |$)'))[1] bill_cust
,null:: text bill_rep
,null::text bill_terr
,null::text ship_class
,(regexp_match(jr.ship_cust_descr,'(.*?)(?= - |$)'))[1] ship_cust
,null::text ship_rep
,null::text ship_terr
,null::text quota_rep
,null::text account
,null::text shipgrp
,null::text geo
,null::text chan
,null::text orig_ctry
,null::text orig_prov
,null::text orig_post
,null::text dest_ctry
,null::text dest_prov
,null::text dest_post
,(regexp_match(jr.part_descr,'(.*?)(?= - |$)'))[1] part
,null::text ord_gldc
,null::text majg
,null::text ming
,null::text majs
,null::text mins
,null::text gldc
,null::text glec
,null::text harm
,null::text clss
,null::text brand
,null::text assc
,'41010'::text fs_line
,null::text r_currency
,null::numeric r_rate
,null::text c_currency
,null::numeric c_rate
,0::numeric(15,5) ddqtoi
,0::numeric(15,5) ddqtsi
,0::numeric(15,5) fgqshp
,0::numeric(15,5) diqtsh
,mxm.qty*mxm.momix*jr.mix fb_qty --history value
,0::numeric fb_cst_loc --history part mix
,0::numeric fb_cst_loc_cur
,0::numeric fb_cst_loc_fut
,mxm.amount*mxm.momix*jr.mix fb_val_loc --history value
,0::numeric fb_val_loc_pl
,''::text calc_status
,''::text flag
,make_date(mxm.yr + 2020,mxm.cal,mxm.odom) orderdate
,make_date(mxm.yr + 2020,mxm.cal,mxm.odom) + rlag requestdate
,make_date(mxm.yr + 2020,mxm.cal,mxm.odom) + rlag + slag shipdate
,make_date(mxm.yr + 2020,mxm.cal,mxm.odom) adj_orderdate
,make_date(mxm.yr + 2020,mxm.cal,mxm.odom) + rlag adj_requestdate
,make_date(mxm.yr + 2020,mxm.cal,mxm.odom) + rlag + slag adj_shipdate
,'replace_version' "version"
,'replace_source'||' volume' iter
-----------------------ui columns--------------------------------
,'replace_iterdet' iterdet
,$$replace_iterdef$$::json iterdef
,od.ssyr order_season
,to_char(make_date(mxm.yr + 2020,mxm.cal,mxm.odom),'Mon') order_month
,sd.ssyr ship_season
,to_char(make_date(mxm.yr + 2020,mxm.cal,mxm.odom) + rlag + slag,'Mon') ship_month
,rd.ssyr request_season
,to_char(make_date(mxm.yr + 2020,mxm.cal,mxm.odom) + rlag,'Mon') request_month
,jr.part_descr part_descr
,null::text part_family
,null::text part_group
,null::text branding
,null::text color
,null::text segm
,jr.bill_cust_descr ,jr.bill_cust_descr
,null::text billto_group
,jr.ship_cust_descr ,jr.ship_cust_descr
,null::text shipto_group ,(regexp_match(jr.part_descr,'(.*?)(?= - |$)'))[1] part
,null::text majg_descr ,jr.part_descr
,null::text ming_descr ,substring(jr.part_descr,1,8) part_group
,null::text majs_descr ,mxm.qty*mxm.momix*jr.mix units
,null::text mins_descr ,mxm.amount*mxm.momix*jr.mix value_loc
,null::text mod_chan ,make_date(mxm.yr + 2020,mxm.cal,mxm.odom) order_date
,null::text mod_chansub ,to_char(make_date(mxm.yr + 2020,mxm.cal,mxm.odom),'Mon') order_month
,null::text quota_rep_descr ,od.ssyr order_season
,null::text director_descr ,make_date(mxm.yr + 2020,mxm.cal,mxm.odom) + rlag request_date
,null::numeric value_loc ,to_char(make_date(mxm.yr + 2020,mxm.cal,mxm.odom) + rlag,'Mon') request_month
,null::numeric value_usd ,rd.ssyr request_season
,null::numeric cost_loc ,make_date(mxm.yr + 2020,mxm.cal,mxm.odom) + rlag + slag ship_date
,null::numeric cost_usd ,to_char(make_date(mxm.yr + 2020,mxm.cal,mxm.odom) + rlag + slag,'Mon') ship_month
,null::numeric units ,sd.ssyr ship_season
,jr.mix ,jr.mix
FROM FROM
target target
@ -408,336 +258,190 @@ SELECT
make_date(mxm.yr + 2020,mxm.cal,mxm.odom) + rlag + slag BETWEEN sd.sdat AND sd.edat make_date(mxm.yr + 2020,mxm.cal,mxm.odom) + rlag + slag BETWEEN sd.sdat AND sd.edat
) )
--SELECT * FROM basemix --SELECT * FROM basemix
,log AS (
INSERT INTO rlarp.osm_log(doc) SELECT $$replace_iterdef$$::jsonb doc RETURNING *
)
,final AS ( ,final AS (
SELECT SELECT
COALESCE(m.avdplt,p.awdplt) plnt --master data b.fspr
,b."ddord#" ,i.dplt plnt
,b."dditm#" ,b.promo
,b."fgbol#" ,bc.bvterm terms
,b."fgent#" ,b.bill_cust_descr
,b."diinv#" ,b.ship_cust_descr
,b."dilin#" ,(SELECT rcode FROM repc WHERE repp = log.doc->'scenario'->>'quota_rep_descr') dsm
,b.promo --history ,log.doc->'scenario'->>'quota_rep_descr' quota_rep_descr
,b.return_reas ,(SELECT director FROM repc WHERE repp = log.doc->'scenario'->>'quota_rep_descr') director
,bc.bvterm terms --history cust mix ,coalesce(cg.cgrp,bc.bvname) billto_group
,b.custpo ,coalesce(sg.cgrp,sc.bvname) shipto_group
,b.dhincr ,CASE SUBSTRING(bc.bvclas,2,3)
,b.diext --if the bill to class is ditsributor, then it's either warehouse or drop
,b.ditdis WHEN 'DIS' THEN
,b.dcodat --if the ship-to is a different name than the bill-to then it's drop, otherwise it's warehouse
,b.ddqdat CASE SUBSTRING(sc.bvclas,2,3)
,b.dcmdat WHEN 'DIS' THEN 'WHS'
,b.dhidat ELSE 'DRP'
,b.fspr
,bc.bvcomp remit_to --master data
,bc.bvclas bill_class --master data
,b.bill_cust --history cust mix
,bc.bvsalm bill_rep --master data
,bc.bvterr bill_terr --master data
,sc.bvclas ship_class --master data
,b.ship_cust --history cust mix
,sc.bvsalm ship_rep --master data
,sc.bvterr ship_terr --master data
--quota rep--------------------------------------------
,RTRIM(
COALESCE(
--retail items go to currep, or if null go to 90005
CASE WHEN COALESCE(avgled,awgled) IN ('1RE','1CU') THEN
CASE WHEN bc.bvctry = 'CAN' THEN
--Rachel Bowman
'50300'
ELSE
--retail chain got to Mark Wilkinson
CASE COALESCE(cg.cgrp,bc.bvname)
WHEN 'THE HOME DEPOT' THEN '90005'
WHEN 'DO IT BEST' THEN '90005'
WHEN 'ACE HARDWARE' THEN '90005'
WHEN 'ALDI' THEN '90005'
WHEN 'AMAZON.COM' THEN '90005'
WHEN 'GARDEN RIDGE CORP' THEN '90005'
--all other retail goes to Doran Marable
ELSE '50200'
END END
--CASE WHEN RTRIM(SUBSTRING(LTRIM(SC.BVADR7)||SC.BVNAME,1,30)) = RTRIM(SUBSTRING(LTRIM(BC.BVADR7)||BC.BVNAME,1,30)) THEN 'DIS' ELSE 'DRP' END
--everything else does not involve a distributor and is considered direct
ELSE 'DIR'
END chan
,CASE SUBSTRING(bc.bvclas,2,3)
WHEN 'DIS' THEN
--if the ship-to is a different name than the bill-to then it's drop, otherwise it's warehouse
CASE SUBSTRING(sc.bvclas,2,3)
WHEN 'DIS' THEN 'WHS'
ELSE CASE SUBSTRING(sc.bvclas,1,1) WHEN 'R' THEN 'RDP' ELSE 'DRP' END
END END
ELSE WHEN 'MAS' THEN 'RMN'
CASE WHEN COALESCE(avming,awming) = 'B52' THEN WHEN 'NAT' THEN 'RMN'
'PW' ELSE CASE SUBSTRING(sc.bvclas,1,1) WHEN 'R' THEN 'RDI' ELSE 'DIR' END
--gdir, ndir go to bill-to rep END chansub
ELSE ,null::text chan_retail
CASE WHEN bc.bvclas IN ('GDIR','NDIR') THEN ,b.part
bc.bvsalm ,b.part_descr
ELSE ,b.part_group
sc.bvsalm ,i.brnd branding
END ,i.majg||' - '||i.majgd majg_descr
END ,i.ming||' - '||i.mingd ming_descr
END ,i.majs||' - '||i.majsd majs_descr
,'' ,i.mins||' - '||i.minsd mins_descr
) ,seg.segm
) quota_rep
,coalesce(cg.cgrp,bc.bvname) account
,coalesce(sg.cgrp,sc.bvname) shipgrp
,coalesce(t.geo,'UNDEFINED') geo
,coalesce(c.chan,'UNDEFINED') chan
,ad.qzcryc orig_ctry
,ad.qzprov orig_prov
,ad.qzpost orig_post
,sc.bvctry dest_ctry
,sc.bvprcd dest_prov
,sc.bvpost dest_post
,b.part --history part mix
,COALESCE(m.avglcd, p.awgldc) ord_gldc --master data
,COALESCE(m.avmajg,p.awmajg) majg --master data
,COALESCE(m.avming,p.awming) ming --master data
,COALESCE(m.avmajs,p.awmajs) majs --master data
,COALESCE(m.avmins,p.awmins) mins --master data
,COALESCE(m.avglcd,p.awgldc) gldc --master data
,COALESCE(m.avgled,p.awgled) glec --master data
,COALESCE(m.avharm,p.awharm) harm --master data
,COALESCE(m.avclss,p.awclss) clss --master data
,SUBSTR(COALESCE(m."avcpt#",p."awvpt#"),1,1) brand --master data
,COALESCE(m.avassc,p.awassc) assc --master data
,b.fs_line --master data ,b.fs_line --master data
,bc.bvcurr r_currency --history cust mix ,bc.bvcurr r_currency --history cust mix
,rx.rate r_rate --master data ,rx.rate r_rate --master data
,copr.curr c_currency --master data ,copr.curr c_currency --master data
,cx.rate c_rate --master data ,cx.rate c_rate --master data
,b.ddqtoi ,b.units
,b.ddqtsi ,b.value_loc
,b.fgqshp ,b.value_usd
,b.diqtsh ,COALESCE(im.cgstcs,ip.chstcs, ir.y0stcs)*b.units cost_loc
,b.fb_qty ,COALESCE(im.cgstcs,ip.chstcs, ir.y0stcs)*b.units*cx.rate cost_loc
,COALESCE(im.cgstcs,ip.chstcs, ir.y0stcs)*b.fb_qty fb_cst_loc
,COALESCE(im.cgstcs,ip.chstcs, ir.y0stcs)*b.fb_qty fb_cst_loc_cur
,COALESCE(im.cgstcs,ip.chstcs, ir.y0stcs)*b.fb_qty fb_cst_loc_fut
,b.fb_val_loc
,b.fb_val_loc_pl
,b.calc_status ,b.calc_status
,b.flag ,b.flag
,b.orderdate ,b.order_date
,b.requestdate
,b.shipdate
,b.adj_orderdate
,b.adj_requestdate
,b.adj_shipdate
,b."version"
,b.iter
-----------------------ui columns--------------------------------
,b.iterdet
,b.iterdef
,b.order_season
,b.order_month ,b.order_month
,b.ship_season ,b.order_season
,b.ship_month ,b.request_date
,b.request_season
,b.request_month ,b.request_month
,b.part_descr ,b.request_season
,SUBSTR(b.part,1,3)||coalesce(' - '||F.DESCR,'') part_family ,b.ship_date
,SUBSTRING(b.part,1,8)||coalesce(' - '||MD.DESCR,'') part_group ,b.ship_month
,COALESCE(MG.GRP,'Unbranded') branding ,b.ship_season
,CASE WHEN substring(COALESCE(m.avgled, p.awgled),1,1) <= '2' THEN SUBSTRING(b.part,9,3) ELSE '' END color ,'replace_version' "version"
,COALESCE(SEG.SEGM,'Other') segm ,'replace_source'||' volume' iter
,b.bill_cust_descr ,log.id
,coalesce(cg.cgrp,bc.bvname) billto_group ,log.doc->>'comment' "comment"
,b.ship_cust_descr ,log.doc->>'type' module
,coalesce(sg.cgrp,sc.bvname) shipto_group
,COALESCE(m.avmajg,p.awmajg)||COALESCE(' - '||BQDES,'') majg_descr
,COALESCE(m.avming,p.awming)||COALESCE(' - '||BRDES,'') ming_descr
,COALESCE(m.avmajs,p.awmajs)||COALESCE(' - '||SJ.BSDES1,'') majs_descr
,COALESCE(m.avmins,p.awmins)||COALESCE(' - '||SI.BSDES1,'') mins_descr
,CASE COALESCE(SEG.SEGM,'Other')
WHEN 'Retail' THEN c.RETAIL
ELSE coalesce(c.chan,'UNDEFINED')
END mod_chan
,CASE COALESCE(SEG.SEGM,'Other')
WHEN 'Retail' THEN c.RETAILSUB
ELSE ''
END mod_chansub
,repc.repp quota_rep_descr
,repc.director director_descr
,b.fb_val_loc value_loc
,b.fb_val_loc * rx.rate value_usd
,COALESCE(im.cgstcs,ip.chstcs, ir.y0stcs)*b.fb_qty cost_loc
,COALESCE(im.cgstcs,ip.chstcs, ir.y0stcs)*b.fb_qty*cx.rate cost_usd
,b.fb_qty units
FROM FROM
basemix b basemix b
LEFT OUTER JOIN LGDAT.STKMM M ON CROSS JOIN log
M.AVPART = b.PART LEFT OUTER JOIN rlarp.itemm i ON
LEFT OUTER JOIN LGDAT.STKMP P ON i.itemm = b.part
P.AWPART = b.PART
LEFT OUTER JOIN lgdat.stka a ON
v6part = b.part
AND v6plnt = COALESCE(m.avdplt,p.awdplt)
LEFT OUTER JOIN SEG ON LEFT OUTER JOIN SEG ON
SEG.GLEC = COALESCE(m.avgled,p.awgled) SEG.GLEC = i.glec
--AND SEG.SEGM <> 'Other' --AND SEG.SEGM <> 'Other'
LEFT OUTER JOIN MG ON
MG.F1 = SUBSTR(b.PART,16,1)
AND MG.MING = COALESCE(m.avming,p.awming)
LEFT OUTER JOIN RLARP.FAMILY F ON
F.F3 = SUBSTR(b.PART,1,3)
LEFT OUTER JOIN MD ON
MD.MOLD = SUBSTR(b.PART,1,8)
LEFT OUTER JOIN LGDAT.CUST BC ON LEFT OUTER JOIN LGDAT.CUST BC ON
BC.BVCUST = b.BILL_CUST BC.BVCUST = b.BILL_CUST
LEFT OUTER JOIN LGDAT.CUST SC ON LEFT OUTER JOIN LGDAT.CUST SC ON
SC.BVCUST = b.SHIP_CUST SC.BVCUST = b.SHIP_CUST
LEFT OUTER JOIN RLARP.FFCHNL c ON
c.BILL = bc.bvclas
AND c.SHIP = sc.bvclas
LEFT OUTER JOIN rlarp.ffterr t ON
t.prov = sc.bvprcd AND
t.ctry = sc.bvctry
LEFT OUTER JOIN RLARP.FFCUST CG ON
CG.CUSTN = BC.BVCUST
LEFT OUTER JOIN RLARP.FFCUST SG ON
SG.CUSTN = SC.BVCUST
LEFT OUTER JOIN REPC ON LEFT OUTER JOIN REPC ON
REPC.RCODE = RTRIM( REPC.RCODE = RTRIM(
COALESCE(
--retail items go to currep, or if null go to 90005 --retail items go to currep, or if null go to 90005
CASE WHEN COALESCE(avgled,awgled) IN ('1RE','1CU') THEN CASE WHEN S.GLEC IN ('1RE','1CU') THEN
CASE WHEN bc.bvctry = 'CAN' THEN CASE WHEN BVCTRY = 'CAN' THEN
--Rachel Bowman --Rachel Bowman
'50300' '50300'
ELSE ELSE
--retail chain got to Mark Wilkinson --select customers go to select reps
CASE COALESCE(cg.cgrp,bc.bvname) CASE ACCOUNT
WHEN 'THE HOME DEPOT' THEN '90005' ------Alecia Latini-------------------------------
WHEN 'DO IT BEST' THEN '90005' WHEN 'DO IT BEST' THEN '90006'
WHEN 'ACE HARDWARE' THEN '90005' WHEN 'ACE HARDWARE' THEN '90006'
WHEN 'ALDI' THEN '90005' WHEN 'ALDI' THEN '90006'
WHEN 'AMAZON.COM' THEN '90005' WHEN 'AMAZON.COM' THEN '90006'
WHEN 'GARDEN RIDGE CORP' THEN '90005' WHEN 'GARDEN RIDGE CORP' THEN '90006' --AKA "At Home"
--all other retail goes to Doran Marable WHEN 'TRUE VALUE' THEN '90006'
WHEN 'WAYFAIR' THEN '90006'
WHEN 'GRIFFIN' THEN '90006'
WHEN 'WAL-MART' THEN '90006'
------Tony Landino--------------------------------
WHEN 'THE HOME DEPOT' THEN '50802'
WHEN 'FRED MEYER' THEN '50802'
WHEN 'MENARDS' THEN '50802'
WHEN 'KROGER' THEN '50802'
WHEN 'OCEAN STATE JOBBERS' THEN '50802'
WHEN 'AURORA WHOLESALE' THEN '50802'
WHEN 'LEON KORRAL' THEN '50802'
--all other retail goes to Doran Marable-----------
ELSE '50200' ELSE '50200'
END END
END END
--minor group b52 goes to dedicated rep
ELSE ELSE
CASE WHEN COALESCE(avming,awming) = 'B52' THEN CASE WHEN MING = 'B52' THEN
'PW' 'PW'
--gdir, ndir go to bill-to rep --gdir, ndir go to bill-to rep
ELSE ELSE
CASE WHEN bc.bvclas IN ('GDIR','NDIR') THEN CASE WHEN BILL_CLASS IN ('GDIR','NDIR') THEN
bc.bvsalm BILL_REP
ELSE ELSE
sc.bvsalm SHIP_REP
END END
END END
END END
,''
) )
)
LEFT OUTER JOIN SI ON
SI.BSMJCD = COALESCE(m.avmajs,p.awmajs)
AND SI.BSMNCD = COALESCE(m.avmins,p.awmins)
LEFT OUTER JOIN SJ ON
SJ.BSMJCD = COALESCE(m.avmajs,p.awmajs)
LEFT OUTER JOIN LGDAT.MAJG ON
BQGRP = COALESCE(m.avmajg,p.awmajg)
LEFT OUTER JOIN LGDAT.MMGP ON
BRMGRP = COALESCE(m.avming,p.awming)
AND BRGRP = COALESCE(m.avmajg,p.awmajg)
LEFT OUTER JOIN lgdat.icstm im ON LEFT OUTER JOIN lgdat.icstm im ON
im.cgpart = b.part im.cgpart = b.part
AND im.cgplnt = a.v6plnt AND im.cgplnt = i.dplt
LEFT OUTER JOIN lgdat.icstp ip ON LEFT OUTER JOIN lgdat.icstp ip ON
ip.chpart = b.part ip.chpart = b.part
AND ip.chplnt = a.v6plnt AND ip.chplnt = i.dplt
LEFT OUTER JOIN lgdat.icstr ir ON LEFT OUTER JOIN lgdat.icstr ir ON
ir.y0part = b.part ir.y0part = b.part
AND ir.y0plnt = a.v6plnt AND ir.y0plnt = i.dplt
LEFT OUTER JOIN lgdat.plnt ON LEFT OUTER JOIN lgdat.plnt ON
yaplnt = a.v6plnt yaplnt = a.v6plnt
LEFT OUTER JOIN copr ON LEFT OUTER JOIN copr ON
copr.comp = yacomp::text copr.comp = yacomp::text
LEFT OUTER JOIN rlarp.ffcret cx ON LEFT OUTER JOIN rlarp.ffcret cx ON
cx.perd = '1910' cx.perd = '2008'
AND cx.rtyp = 'MA' AND cx.rtyp = 'MA'
AND cx.fcur = copr.curr AND cx.fcur = copr.curr
AND cx.tcur = 'US' AND cx.tcur = 'US'
LEFT OUTER JOIN rlarp.ffcret rx ON LEFT OUTER JOIN rlarp.ffcret rx ON
rx.perd = '1910' rx.perd = '2008'
AND rx.rtyp = 'MA' AND rx.rtyp = 'MA'
AND rx.fcur = bc.bvcurr AND rx.fcur = bc.bvcurr
AND rx.tcur = 'US' AND rx.tcur = 'US'
LEFT OUTER JOIN LGDAT.ADRS AD ON
AD.QZADR = plnt."yaadr#"
) )
/*
,clone_part_meta AS (
SELECT
b.majg --master data
,b.ming --master data
,b.majs --master data
,b.mins --master data
,b.gldc --master data
,b.glec --master data
,b.harm --master data
,b.clss --master data
,b.brand --master data
,b.assc --master data
,b.segm
,b.majg_descr
,b.ming_descr
,b.majs_descr
,b.mins_descr
,b.quota_rep
,sum(fb_val_loc * r_rate) agg
FROM
rlarp.osm_fcpool b
WHERE
-----------------scenario----------------------------
where_clause
--probably dont want to include adjustments that have blown away volume and good sources of dating info
-----------------additional params-------------------
AND calc_status||flag <> 'CLOSEDREMAINDER' --exclude short ships when building order adjustments
AND adj_orderdate <= adj_shipdate
GROUP BY
b.majg --master data
,b.ming --master data
,b.majs --master data
,b.mins --master data
,b.gldc --master data
,b.glec --master data
,b.harm --master data
,b.clss --master data
,b.brand --master data
,b.assc --master data
,b.segm
,b.majg_descr
,b.ming_descr
,b.majs_descr
,b.mins_descr
,b.quota_rep
ORDER BY
agg desc
)
*/
, ins AS ( , ins AS (
INSERT INTO rlarp.osm_fcpool SELECT * FROM final RETURNING * INSERT INTO rlarp.osm_pool SELECT * FROM final RETURNING *
) )
,insagg AS ( ,insagg AS (
SELECT SELECT
---------customer info-----------------
bill_cust_descr bill_cust_descr
,billto_group ,billto_group
,ship_cust_descr ,ship_cust_descr
,shipto_group ,shipto_group
,quota_rep_descr ,quota_rep_descr
,director_descr ,director
,segm ,segm
,mod_chan ,chan
,mod_chansub ,chansub
---------product info------------------
,majg_descr ,majg_descr
,ming_descr ,ming_descr
,majs_descr ,majs_descr
,mins_descr ,mins_descr
,brand --,brand
,part_family --,part_family
,part_group ,part_group
,branding ,branding
,color --,color
,part_descr ,part_descr
---------dates-------------------------
,order_season ,order_season
,order_month ,order_month
,ship_season ,ship_season
@ -747,6 +451,7 @@ SELECT
,promo ,promo
,version ,version
,iter ,iter
--------values-------------------------
,sum(value_loc) value_loc ,sum(value_loc) value_loc
,sum(value_usd) value_usd ,sum(value_usd) value_usd
,sum(cost_loc) cost_loc ,sum(cost_loc) cost_loc
@ -755,25 +460,28 @@ SELECT
FROM FROM
ins ins
GROUP BY GROUP BY
---------customer info-----------------
bill_cust_descr bill_cust_descr
,billto_group ,billto_group
,ship_cust_descr ,ship_cust_descr
,shipto_group ,shipto_group
,quota_rep_descr ,quota_rep_descr
,director_descr ,director
,segm ,segm
,mod_chan ,chan
,mod_chansub ,chansub
---------product info------------------
,majg_descr ,majg_descr
,ming_descr ,ming_descr
,majs_descr ,majs_descr
,mins_descr ,mins_descr
,brand --,brand
,part_family --,part_family
,part_group ,part_group
,branding ,branding
,color --,color
,part_descr ,part_descr
---------dates-------------------------
,order_season ,order_season
,order_month ,order_month
,ship_season ,ship_season