LOGI#65820 PERSOON-import/Wijzigen header en volgorde

svn path=/Customer/trunk/; revision=51139

LOGI/logi.sql

@@ -20,12 +20,22 @@ SET DEFINE OFF
 
 CREATE OR REPLACE PROCEDURE logi_import_persoon (p_import_key IN NUMBER)
 AS
+    v_errormsg        VARCHAR2 (1000) := '';
     oracle_err_num    NUMBER;
     oracle_err_mes    VARCHAR2 (200);
-    v_errormsg        VARCHAR2 (400);
-    v_errorhint       VARCHAR2 (400);
 BEGIN
-    v_errorhint := 'Generieke import';
+
+    -- Standaard import gebaseerd op ';' als 'fielddelimitor', dus eerst ','
+    -- door ';' vervangen (voorkennis: geen komma's tussen dubbele quotes en
+    -- anders jammer dan).
+    v_errormsg := 'Delimiter van komma naar puntkomma';
+
+      UPDATE fac_imp_file
+         SET fac_imp_file_line = REPLACE (fac_imp_file_line, ',', ';')
+       WHERE fac_import_key = p_import_key;
+    COMMIT;
+
+    v_errormsg := 'Generieke import';
 
     -- De sequence array staat beschreven in PRS_PAC.SRC bij de prs.import_perslid procedure.
     -- OUD: 'employeeID;sn;givenName;infix;uid;mail;orglevel7;orglevel7id;a1physicalDeliveryOfficeName%';
@@ -38,12 +48,13 @@ BEGIN
         || '0;0;0;0;0;0',
         'Member ID;Last Name;First Name;Infix;Groupinfra;Email Address;Department ID;Department Name;Location Description%');
 
+    v_errormsg := 'Functie + afdeling op vaste waarde';
+
     UPDATE fac_imp_perslid
        SET prs_srtperslid_omschrijving = 'Onbekend';
 
     UPDATE fac_imp_perslid
        SET prs_afdeling_naam = 'CGI';
-
     COMMIT;
 EXCEPTION
     WHEN OTHERS