VOLK#77515 Uitbesteding Servicedesk Retail locaties SNS

svn path=/Customer/trunk/; revision=59999
This commit is contained in:
Suzan Wiegerinck
2023-04-13 14:36:38 +00:00
parent 36774195d3
commit c423740c61

View File

@@ -1354,6 +1354,7 @@ AS
oracle_err_mes VARCHAR2 (200); oracle_err_mes VARCHAR2 (200);
v_errorhint VARCHAR2 (100); v_errorhint VARCHAR2 (100);
v_aanduiding VARCHAR2 (100); v_aanduiding VARCHAR2 (100);
v_afmeldtekst VARCHAR2 (4000);
CURSOR coll IS CURSOR coll IS
SELECT o.mld_opdr_key, SELECT o.mld_opdr_key,
@@ -1379,23 +1380,28 @@ BEGIN
FOR rec IN coll FOR rec IN coll
LOOP LOOP
BEGIN BEGIN
mld.setopdrachtstatus (rec.mld_opdr_key, 6, 3);
fac.trackaction ('ORDTRK', SELECT at.mld_afmeldtekst_omschrijving
rec.mld_opdr_key, INTO v_afmeldtekst
NULL, FROM mld_afmeldtekst at
NULL, WHERE at.mld_afmeldtekst_key = 21;
'Opdracht naar Colliers automatisch afgemeld');
mld.setmeldingstatus (rec.mld_melding_key, UPDATE mld_melding m
5, SET m.mld_melding_opmerking = v_afmeldtekst;
3,
0); mld.setmeldingstatus (rec.mld_melding_key, 5, 3);
fac.trackaction ('MLDTRK', fac.trackaction ('MLDTRK',
rec.mld_melding_key, rec.mld_melding_key,
NULL, NULL,
NULL, NULL,
'Melding naar Colliers automatisch afgemeld'); 'Melding naar Colliers automatisch afgemeld');
mld.setopdrachtstatus (rec.mld_opdr_key, 6, 3);
fac.trackaction ('ORDTRK',
rec.mld_opdr_key,
NULL,
NULL,
'Opdracht naar Colliers automatisch afgemeld');
COMMIT; COMMIT;
END; END;