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

CSUN#70849 emailadressen importeren

Browse Source 
svn path=/Database/trunk/; revision=56052
This commit is contained in:
Erik Groener
2022-05-30 07:09:49 +00:00
parent fcdb3ae4e2
commit 791a3f2e46
2 changed files with 27 additions and 23 deletions
Download Patch File Download Diff File Expand all files Collapse all files

48
PRS/PRS_PAC.SRC
View File

@@ -104,7 +104,7 @@ AS
PROCEDURE import_perslid (p_import_key IN NUMBER, p_seq_of_columns IN VARCHAR2, p_header IN VARCHAR2);
PROCEDURE update_perslid (p_import_key IN NUMBER, p_sleutelkolom IN VARCHAR2, p_alg_type IN VARCHAR2);
PROCEDURE update_perslid (p_import_key IN NUMBER, p_sleutelkolom IN VARCHAR2, p_alg_type IN VARCHAR2, p_import_kenmerk IN NUMBER DEFAULT 0);
PROCEDURE delete_perslid (p_import_key IN NUMBER, p_perslid_key IN NUMBER);
@@ -1808,7 +1808,8 @@ AS
-- R,V,G,L,D - werkplek(en) op dit niveau verwijderen
PROCEDURE update_perslid (p_import_key IN NUMBER,
p_sleutelkolom IN VARCHAR2,
p_alg_type IN VARCHAR2)
p_alg_type IN VARCHAR2,
p_import_kenmerk IN NUMBER DEFAULT 0)
IS
c_fielddelimitor VARCHAR2 (1) := ';';
@@ -2279,26 +2280,29 @@ AS
COMMIT; -- persoon in ieder geval toegevoegd.
upsertkenmerk_imp(v_perslid_key, recPersLid.prs_kenmerk1);
upsertkenmerk_imp(v_perslid_key, recPersLid.prs_kenmerk2);
upsertkenmerk_imp(v_perslid_key, recPersLid.prs_kenmerk3);
upsertkenmerk_imp(v_perslid_key, recPersLid.prs_kenmerk4);
upsertkenmerk_imp(v_perslid_key, recPersLid.prs_kenmerk5);
upsertkenmerk_imp(v_perslid_key, recPersLid.prs_kenmerk6);
upsertkenmerk_imp(v_perslid_key, recPersLid.prs_kenmerk7);
upsertkenmerk_imp(v_perslid_key, recPersLid.prs_kenmerk8);
upsertkenmerk_imp(v_perslid_key, recPersLid.prs_kenmerk9);
upsertkenmerk_imp(v_perslid_key, recPersLid.prs_kenmerk10);
upsertkenmerk_imp(v_perslid_key, recPersLid.prs_kenmerk11);
upsertkenmerk_imp(v_perslid_key, recPersLid.prs_kenmerk12);
upsertkenmerk_imp(v_perslid_key, recPersLid.prs_kenmerk13);
upsertkenmerk_imp(v_perslid_key, recPersLid.prs_kenmerk14);
upsertkenmerk_imp(v_perslid_key, recPersLid.prs_kenmerk15);
upsertkenmerk_imp(v_perslid_key, recPersLid.prs_kenmerk16);
upsertkenmerk_imp(v_perslid_key, recPersLid.prs_kenmerk17);
upsertkenmerk_imp(v_perslid_key, recPersLid.prs_kenmerk18);
upsertkenmerk_imp(v_perslid_key, recPersLid.prs_kenmerk19);
upsertkenmerk_imp(v_perslid_key, recPersLid.prs_kenmerk20);
IF (p_import_kenmerk = 1)
THEN
upsertkenmerk_imp(v_perslid_key, recPersLid.prs_kenmerk1);
upsertkenmerk_imp(v_perslid_key, recPersLid.prs_kenmerk2);
upsertkenmerk_imp(v_perslid_key, recPersLid.prs_kenmerk3);
upsertkenmerk_imp(v_perslid_key, recPersLid.prs_kenmerk4);
upsertkenmerk_imp(v_perslid_key, recPersLid.prs_kenmerk5);
upsertkenmerk_imp(v_perslid_key, recPersLid.prs_kenmerk6);
upsertkenmerk_imp(v_perslid_key, recPersLid.prs_kenmerk7);
upsertkenmerk_imp(v_perslid_key, recPersLid.prs_kenmerk8);
upsertkenmerk_imp(v_perslid_key, recPersLid.prs_kenmerk9);
upsertkenmerk_imp(v_perslid_key, recPersLid.prs_kenmerk10);
upsertkenmerk_imp(v_perslid_key, recPersLid.prs_kenmerk11);
upsertkenmerk_imp(v_perslid_key, recPersLid.prs_kenmerk12);
upsertkenmerk_imp(v_perslid_key, recPersLid.prs_kenmerk13);
upsertkenmerk_imp(v_perslid_key, recPersLid.prs_kenmerk14);
upsertkenmerk_imp(v_perslid_key, recPersLid.prs_kenmerk15);
upsertkenmerk_imp(v_perslid_key, recPersLid.prs_kenmerk16);
upsertkenmerk_imp(v_perslid_key, recPersLid.prs_kenmerk17);
upsertkenmerk_imp(v_perslid_key, recPersLid.prs_kenmerk18);
upsertkenmerk_imp(v_perslid_key, recPersLid.prs_kenmerk19);
upsertkenmerk_imp(v_perslid_key, recPersLid.prs_kenmerk20);
END IF;
v_aanduiding := recPersLid.prs_perslid_nr || '|'
|| recPersLid.prs_perslid_naam || '|'