FCLT#71731 Alleen eerste prs_werkplek volledig, rest concise

svn path=/Database/trunk/; revision=55636
This commit is contained in:
Jos Groot Lipman
2022-04-20 07:55:03 +00:00
parent b8432543f0
commit dee75b2501

View File

@@ -2227,6 +2227,7 @@ AS
v_externid prs_perslid.prs_perslid_externid%TYPE;
v_externsyncdate prs_perslid.prs_perslid_externsyncdate%TYPE;
v_visibility prs_perslid.prs_perslid_visibility%TYPE;
v_firstwpdone BOOLEAN;
CURSOR c1
IS
@@ -2335,11 +2336,13 @@ AS
mydatetochar ('einddatum', v_einddatum);
createxmltagvalue ('uurloon', mynumbertochar (v_uurloon));
v_firstwpdone := FALSE;
FOR rec1 IN c1
LOOP
create_prs_werkplek_node (rec1.prs_werkplek_key,
p_key,
FALSE); -- is toch helaas nodig voor UWVA#25793
v_firstwpdone); -- Eentje volledig is soms nodig (WVA#25793)
v_firstwpdone := TRUE; -- rest concise
END LOOP;
create_prs_afdeling_node (v_afdeling_key, 'afdeling');