181 lines
6.1 KiB
SQL
181 lines
6.1 KiB
SQL
----------------------------SET BILL-TO REP------------------------------------
|
|
|
|
UPDATE
|
|
RLARP.OSMF_DEV S
|
|
SET
|
|
BILL_REP = C.BVSALM
|
|
,BILL_CLASS = C.BVCLAS
|
|
,BILL_TERR = C.BVTERR
|
|
,BILL_CTRY = C.bvctry
|
|
,bill_prov = C.bvprcd
|
|
,bill_post = C.bvpost
|
|
,remit_to = c.bvcomp
|
|
,ACCOUNT = CASE BVADR6 WHEN '' THEN BVNAME ELSE BVADR6 END
|
|
FROM
|
|
LGDAT.CUST C
|
|
WHERE
|
|
C.BVCUST = S.BILL_CUST
|
|
AND (
|
|
COALESCE(S.BILL_REP,'') <> C.BVSALM
|
|
OR COALESCE(S.BILL_CLASS,'') <> C.BVCLAS
|
|
OR COALESCE(S.BILL_TERR,'') <> C.BVTERR
|
|
OR COALESCE(BILL_CTRY,'') <> C.bvctry
|
|
OR COALESCE(bill_prov,'') <> C.bvprcd
|
|
OR COALESCE(bill_post,'') <> C.bvpost
|
|
OR COALESCE(remit_to,'') <> c.bvcomp::text
|
|
);
|
|
|
|
----------------------------SET SHIP-TO REP------------------------------------
|
|
|
|
UPDATE
|
|
RLARP.OSMF_DEV S
|
|
SET
|
|
SHIP_REP = C.BVSALM
|
|
,SHIP_CLASS = C.BVCLAS
|
|
,SHIP_TERR = C.BVTERR
|
|
,dest_CTRY = C.bvctry
|
|
,dest_prov = C.bvprcd
|
|
,dest_post = C.bvpost
|
|
FROM
|
|
LGDAT.CUST C
|
|
WHERE
|
|
C.BVCUST = S.SHIP_CUST
|
|
AND (
|
|
COALESCE(S.SHIP_REP,'') <> C.BVSALM
|
|
OR COALESCE(S.SHIP_CLASS,'') <> C.BVCLAS
|
|
OR COALESCE(S.SHIP_TERR,'') <> C.BVTERR
|
|
OR COALESCE(dest_CTRY,'') <> C.bvctry
|
|
OR COALESCE(dest_prov,'') <> C.bvprcd
|
|
OR COALESCE(dest_post,'') <> C.bvpost
|
|
);
|
|
|
|
----------------------------SET BILLTO GROUP------------------------------------
|
|
|
|
UPDATE
|
|
RLARP.OSMF_DEV O
|
|
SET
|
|
ACCOUNT = CASE BVADR6 WHEN '' THEN BVNAME ELSE BVADR6 END
|
|
FROM
|
|
LGDAT.CUST C
|
|
WHERE
|
|
C.BVCUST = O.BILL_CUST
|
|
AND coalesce(account,'') <> CASE BVADR6 WHEN '' THEN BVNAME ELSE BVADR6 END;
|
|
|
|
|
|
|
|
----------------------------SET SHIPTO GROUP------------------------------------
|
|
|
|
UPDATE
|
|
RLARP.OSMF_DEV O
|
|
SET
|
|
SHIPGRP = CASE BVADR6 WHEN '' THEN BVNAME ELSE BVADR6 END
|
|
FROM
|
|
LGDAT.CUST C
|
|
WHERE
|
|
C.BVCUST = O.SHIP_CUST
|
|
AND CASE BVADR6 WHEN '' THEN BVNAME ELSE BVADR6 END <> COALESCE(O.SHIPGRP,'');
|
|
|
|
|
|
---------------------------SET CHANNEL-----------------------------------------
|
|
|
|
|
|
UPDATE
|
|
rlarp.osmF_dev
|
|
SET
|
|
CHAN = CASE SUBSTRING(BILL_CLASS,2,3)
|
|
--if the bill to class is ditsributor, then it's either warehouse or drop
|
|
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(SHIP_CLASS,2,3)
|
|
WHEN 'DIS' THEN 'WHS'
|
|
ELSE 'DRP'
|
|
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,
|
|
CHANSUB = CASE SUBSTRING(BILL_CLASS,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(SHIP_CLASS,2,3)
|
|
WHEN 'DIS' THEN 'WHS'
|
|
ELSE CASE SUBSTRING(SHIP_CLASS,1,1) WHEN 'R' THEN 'RDP' ELSE 'DRP' END
|
|
END
|
|
WHEN 'MAS' THEN 'RMN'
|
|
WHEN 'NAT' THEN 'RMN'
|
|
ELSE CASE SUBSTRING(SHIP_CLASS,1,1) WHEN 'R' THEN 'RDI' ELSE 'DIR' END
|
|
END
|
|
WHERE
|
|
COALESCE(CHAN,'') <> CASE SUBSTRING(BILL_CLASS,2,3)
|
|
--if the bill to class is ditsributor, then it's either warehouse or drop
|
|
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(SHIP_CLASS,2,3)
|
|
WHEN 'DIS' THEN 'WHS'
|
|
ELSE 'DRP'
|
|
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
|
|
OR
|
|
COALESCE(CHANSUB,'') <> CASE SUBSTRING(BILL_CLASS,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(SHIP_CLASS,2,3)
|
|
WHEN 'DIS' THEN 'WHS'
|
|
ELSE CASE SUBSTRING(SHIP_CLASS,1,1) WHEN 'R' THEN 'RDP' ELSE 'DRP' END
|
|
END
|
|
WHEN 'MAS' THEN 'RMN'
|
|
WHEN 'NAT' THEN 'RMN'
|
|
ELSE CASE SUBSTRING(SHIP_CLASS,1,1) WHEN 'R' THEN 'RDI' ELSE 'DIR' END
|
|
END;
|
|
|
|
|
|
---------------------------SET QUOTA REP---------------------------------------
|
|
|
|
|
|
UPDATE
|
|
RLARP.OSMF_DEV S
|
|
SET
|
|
DSM = CR.QUOTA_REP
|
|
FROM
|
|
(
|
|
SELECT DISTINCT
|
|
VERSION,
|
|
COALESCE(GLEC,'') GLEC,
|
|
MING,
|
|
BILL_CUST,
|
|
SHIP_CUST,
|
|
------------quota rep column--------------
|
|
CASE WHEN COALESCE(ming,'') = 'B52' THEN 'PW' ELSE
|
|
--if the gl expense code is 1RE use the retail rep assigned to the bill-to customer if available
|
|
CASE WHEN COALESCE(glec,'') = '1RE' AND COALESCE(cu.currep,'') <> '' THEN
|
|
cu.currep
|
|
--default logic
|
|
ELSE
|
|
CASE SUBSTR(bill_class,2,3)
|
|
WHEN 'DIS' THEN
|
|
ship_rep
|
|
ELSE
|
|
bill_rep
|
|
END
|
|
END
|
|
END QUOTA_REP
|
|
FROM
|
|
RLARP.OSMF_DEV S
|
|
LEFT OUTER JOIN LGDAT.CUST ON
|
|
BVCUST = BILL_CUST
|
|
LEFT OUTER JOIN lgpgm.usrcust cu ON
|
|
cu.cucust = s.bill_cust
|
|
WHERE
|
|
version = 'ACTUALS'
|
|
) CR
|
|
WHERE
|
|
CR.VERSION = S.VERSION
|
|
AND CR.GLEC = COALESCE(S.GLEC,'')
|
|
AND CR.MING = S.MING
|
|
AND CR.BILL_CUST = S.BILL_CUST
|
|
AND CR.SHIP_CUST = S.SHIP_CUST
|
|
AND COALESCE(S.DSM,'') <> CR.QUOTA_REP;
|