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

WDKA#68779 -- Inrichten Wedeka

Browse Source 
svn path=/Customer/trunk/; revision=58648
This commit is contained in:
Norbert Wassink
2023-01-12 14:38:45 +00:00
parent c879f4e3d8
commit d8eaf1d480
1 changed files with 19 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files

25
WDKA/WDKA.sql
View File

@@ -1840,14 +1840,27 @@ BEGIN
IF v_ins_deelsrtcontrole_key>0 THEN
v_aanduiding := 'Update deelsrtcontrole ('||v_count||')';
BEGIN
-- Is de test succesvol of niet
IF UPPER(rec.test_resultaat)='GOED' OR UPPER(rec.laatste_vis_resultaat)='GOED' THEN
IF UPPER(rec.test_resultaat)='GOED' OR UPPER(rec.laatste_vis_resultaat)='GOED' THEN
SELECT ins_controlemode_key
INTO v_controlemode_key
FROM ins_controlemode
WHERE UPPER(ins_controlemode_oms)='UITGEVOERD';
v_insdeelstr_status := 6;
ELSE
SELECT ins_controlemode_key
INTO v_controlemode_key
FROM ins_controlemode
WHERE UPPER(ins_controlemode_oms)='REPARATIE';
v_insdeelstr_status:=5;
END IF;
EXCEPTION
WHEN NO_DATA_FOUND THEN
v_controlemode_key:=10; -- Uitgevoerd
v_insdeelstr_status := 6;
ELSE
v_controlemode_key:=11; -- Reparatie/ Fout
v_insdeelstr_status:=5;
END IF;
END;
UPDATE ins_deelsrtcontrole
SET ins_deelsrtcontrole_status=v_insdeelstr_status,