PZEE#78747 Procedure pzee.prs_mandaten aanpassen
svn path=/Customer/trunk/; revision=60850
This commit is contained in:
@@ -43,32 +43,21 @@ AS
|
||||
v_errormsg VARCHAR2 (200);
|
||||
|
||||
CURSOR c IS
|
||||
SELECT p.prs_perslid_key,
|
||||
kp.prs_kostenplaats_key,
|
||||
kp.prs_kostenplaats_nr,
|
||||
kp.prs_kostenplaats_omschrijving
|
||||
FROM prs_perslid p, prs_kostenplaats kp
|
||||
WHERE p.prs_perslid_verwijder IS NULL
|
||||
AND kp.prs_kostenplaatsgrp_key = 1
|
||||
AND kp.prs_kostenplaats_verwijder IS NULL
|
||||
AND ( kp.prs_kostenplaats_eind IS NULL
|
||||
OR TRUNC (kp.prs_kostenplaats_eind) > TRUNC (SYSDATE))
|
||||
AND NOT EXISTS
|
||||
SELECT p.prs_perslid_key
|
||||
FROM prs_perslid p
|
||||
WHERE p.prs_perslid_verwijder IS NULL
|
||||
AND NOT EXISTS
|
||||
(SELECT *
|
||||
FROM prs_perslidkostenplaats m
|
||||
WHERE m.prs_kostenplaats_key =
|
||||
kp.prs_kostenplaats_key
|
||||
AND m.prs_perslid_key = p.prs_perslid_key);
|
||||
WHERE m.prs_perslid_key = p.prs_perslid_key);
|
||||
BEGIN
|
||||
FOR rec IN C
|
||||
LOOP
|
||||
INSERT INTO prs_perslidkostenplaats (
|
||||
prs_perslid_key,
|
||||
prs_kostenplaats_key,
|
||||
prs_perslid_key,
|
||||
prs_perslidkostenplaats_boeken,
|
||||
prs_perslidkostenplaats_aanmk)
|
||||
VALUES (rec.prs_perslid_key,
|
||||
rec.prs_kostenplaats_key,
|
||||
VALUES (rec.prs_perslid_key,
|
||||
1,
|
||||
SYSDATE);
|
||||
|
||||
@@ -85,7 +74,7 @@ AS
|
||||
|| '/'
|
||||
|| oracle_err_mes
|
||||
|| ')';
|
||||
fac.writelog ('Mandatering externe medewerker',
|
||||
fac.writelog ('Mandatering medewerker',
|
||||
'E',
|
||||
v_errormsg,
|
||||
'');
|
||||
|
||||
Reference in New Issue
Block a user