admin/Customer
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

SCBR#62668 Groveko assortiment in Facilitor

Browse Source 
svn path=/Customer/trunk/; revision=47058
This commit is contained in:
Suzan Wiegerinck
2020-06-08 08:41:42 +00:00
parent 1fac7f58f7
commit c87edfb140
1 changed files with 52 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

52
SCBR/SCBR.sql
View File

@@ -283,6 +283,58 @@ AS
kp.prs_kostenplaats_nr,
bo.bes_bestelopdr_id;
CREATE OR REPLACE PACKAGE SCBR
AS
PROCEDURE bes_after_insert (p_bes_bestelling_key IN NUMBER);
END;
/
CREATE OR REPLACE PACKAGE BODY SCBR
AS
PROCEDURE bes_after_insert (p_bes_bestelling_key IN NUMBER)
IS
v_count NUMBER;
v_kostenplaats NUMBER;
BEGIN
-- STAP 1: kostenplaats bepalen adhv de gekozen projectcode
SELECT COUNT (kpl.prs_kostenplaats_key)
INTO v_count
FROM bes_bestelling bs,
bes_kenmerkbestell km,
fac_usrdata ud,
fac_usrtab ut,
prs_kostenplaats kpl
WHERE bs.bes_bestelling_key = p_bes_bestelling_key
AND km.bes_bestelling_key = bs.bes_bestelling_key
AND km.bes_kenmerkbestell_waarde = ud.fac_usrdata_key
AND ud.fac_usrtab_key = ut.fac_usrtab_key
AND ud.fac_usrdata_prijs = kpl.prs_kostenplaats_nr;
--- Stap 2: als 1 kostenplaats gevonden kon worden, dan deze opnemen bij de bestelling
IF v_count = 1
THEN
SELECT kpl.prs_kostenplaats_key
INTO v_kostenplaats
FROM bes_bestelling bs,
bes_kenmerkbestell km,
fac_usrdata ud,
fac_usrtab ut,
prs_kostenplaats kpl
WHERE bs.bes_bestelling_key = p_bes_bestelling_key
AND km.bes_bestelling_key = bs.bes_bestelling_key
AND km.bes_kenmerkbestell_waarde = ud.fac_usrdata_key
AND ud.fac_usrtab_key = ut.fac_usrtab_key
AND ud.fac_usrdata_prijs = kpl.prs_kostenplaats_nr;
UPDATE bes_bestelling b
SET b.prs_kostenplaats_key = v_kostenplaats
WHERE b.bes_bestelling_key = p_bes_bestelling_key;
END IF;
COMMIT;
END;
END SCBR;
------ payload end ------
SET DEFINE OFF