AAAH#52771 -- Aanpassing header personenimport
svn path=/Customer/trunk/; revision=37533
This commit is contained in:
Arthur Egberink
@@ -119,12 +119,18 @@ BEGIN
|
||||
WHERE fac_import_key = p_import_key
|
||||
AND fac_imp_file_line LIKE '%givenName%';
|
||||
|
||||
-- Tijdelijke aanpassing om backwards compatable te zijn AAAH#`52771
|
||||
UPDATE fac_imp_file
|
||||
SET fac_imp_file_line = REPLACE (fac_imp_file_line, 'CostCenter', 'Departmentnumber')
|
||||
WHERE fac_import_key = p_import_key
|
||||
AND fac_imp_file_line LIKE '%givenName%';
|
||||
|
||||
v_seq_of_columns :=
|
||||
'0;0;0;0;0;0;9;2;0;1;0;0;0;0;0;6;7;8;0;3;4;5;0;0;0;0;0;28;29;30;31;32;33;34;35;36;37;38;39;40;41;42;43;44;45;46';
|
||||
prs.import_perslid (
|
||||
p_import_key,
|
||||
v_seq_of_columns,
|
||||
'"givenName";"sn";"EmployeeID";"Title";"sAMAccountName";"TelephoneNumber";"Mobile";"mail";"CostCenter"%');
|
||||
'"givenName";"sn";"EmployeeID";"Title";"sAMAccountName";"TelephoneNumber";"Mobile";"mail";"Departmentnumber"%');
|
||||
END aaah_import_perslid;
|
||||
/
|
||||
|
||||
@@ -159,7 +165,7 @@ BEGIN
|
||||
prs.delete_perslid (p_import_key, rec.prs_perslid_key);
|
||||
END;
|
||||
END LOOP;
|
||||
|
||||
|
||||
UPDATE prs_perslid
|
||||
SET fac_profiel_key = 23
|
||||
WHERE fac_profiel_key IS NULL
|
||||
@@ -411,21 +417,21 @@ AS
|
||||
INTO v_adres_key_lev, v_count
|
||||
FROM mld_adres
|
||||
WHERE UPPER(REPLACE(mld_adres_bezoek_postcode, ' ')) = UPPER(REPLACE(rec.aflever_postcode, ' '));
|
||||
|
||||
-- Test of er meer afleveradressen zijn met dezelfde postcode
|
||||
|
||||
-- Test of er meer afleveradressen zijn met dezelfde postcode
|
||||
IF v_count > 1 THEN
|
||||
BEGIN
|
||||
SELECT MAX(mld_adres_key), COUNT(*)
|
||||
INTO v_adres_key_lev2, v_count
|
||||
FROM mld_adres
|
||||
WHERE UPPER(REPLACE(mld_adres_bezoek_postcode, ' ')) = UPPER(REPLACE(rec.aflever_postcode, ' '))
|
||||
AND UPPER(REPLACE(mld_adres_bezoek_adres, ' ')) = UPPER(REPLACE(rec.aflever_adres, ' '));
|
||||
|
||||
IF v_count = 1
|
||||
AND UPPER(REPLACE(mld_adres_bezoek_adres, ' ')) = UPPER(REPLACE(rec.aflever_adres, ' '));
|
||||
|
||||
IF v_count = 1
|
||||
THEN
|
||||
v_adres_key_lev := v_adres_key_lev2;
|
||||
END IF;
|
||||
|
||||
|
||||
EXCEPTION WHEN OTHERS
|
||||
THEN
|
||||
fac.imp_writelog (p_import_key,
|
||||
@@ -434,23 +440,23 @@ AS
|
||||
'Fout bij verwerken update Absoluta.');
|
||||
END;
|
||||
END IF;
|
||||
|
||||
|
||||
IF v_adres_key_lev IS NULL
|
||||
THEN
|
||||
v_adres_key_lev := c_adres_key_lev;
|
||||
END IF;
|
||||
|
||||
|
||||
EXCEPTION WHEN OTHERS
|
||||
THEN
|
||||
-- terugvallen op de standaard.
|
||||
v_adres_key_lev := c_adres_key_lev;
|
||||
|
||||
|
||||
fac.imp_writelog (p_import_key,
|
||||
'W',
|
||||
v_aanduiding || ' Afleveradres kan niet gevonden worden',
|
||||
'Fout bij verwerken update Absoluta.');
|
||||
END;
|
||||
|
||||
|
||||
|
||||
IF v_bestelling_key IS NULL
|
||||
THEN
|
||||
@@ -481,7 +487,7 @@ AS
|
||||
AND sd.bes_srtdeel_nr LIKE '%/' || rec.supplier_ref;
|
||||
EXCEPTION
|
||||
WHEN NO_DATA_FOUND THEN
|
||||
v_bestelling_key := NULL;
|
||||
v_bestelling_key := NULL;
|
||||
WHEN OTHERS THEN
|
||||
v_bestelling_key := NULL;
|
||||
fac.imp_writelog (p_import_key,
|
||||
@@ -492,7 +498,7 @@ AS
|
||||
|
||||
-- We gaan een nieuwe bestelling aanmaken die vanuit Absoluta geiniteerd is.
|
||||
-- We hebben dan geen kostenplaats, dus zoeken we deze op in FACILITOR.
|
||||
|
||||
|
||||
BEGIN
|
||||
SELECT prs_kostenplaats_key
|
||||
INTO v_kostenplaats_key
|
||||
@@ -502,9 +508,9 @@ AS
|
||||
EXCEPTION WHEN NO_DATA_FOUND
|
||||
THEN
|
||||
v_kostenplaats_key := c_kostenplaats_key;
|
||||
END;
|
||||
END;
|
||||
|
||||
IF v_bestelling_key IS NULL
|
||||
IF v_bestelling_key IS NULL
|
||||
THEN
|
||||
-- maak nieuwe bestelling aan
|
||||
INSERT INTO bes_bestelling (bes_bestelling_status,
|
||||
@@ -528,7 +534,7 @@ AS
|
||||
RETURNING bes_bestelling_key
|
||||
INTO v_bestelling_key;
|
||||
v_bestelling_status := 2; -- nieuw
|
||||
|
||||
|
||||
-- maak nieuwe opdracht aan
|
||||
INSERT INTO bes_bestelopdr (bes_bestelopdr_id,
|
||||
bes_bestelopdr_status,
|
||||
@@ -550,7 +556,7 @@ AS
|
||||
INTO v_bestelopdr_key;
|
||||
v_bestelopdr_status := 2;
|
||||
END IF;
|
||||
|
||||
|
||||
ELSE
|
||||
-- Verzamel bestelopdracht gegevens.
|
||||
v_errormsg := 'Zoek bestelopdr';
|
||||
@@ -558,7 +564,7 @@ AS
|
||||
INTO v_bestelopdr_key, v_bestelopdr_status
|
||||
FROM bes_bestelopdr bo
|
||||
WHERE bo.bes_bestelopdr_id = rec.bes_bestelopdr_id;
|
||||
|
||||
|
||||
-- Verzamel bestelgegevens.
|
||||
v_errormsg := 'Zoek bestelling';
|
||||
SELECT bes_bestelling_key, bes_bestelling_status
|
||||
@@ -575,9 +581,9 @@ AS
|
||||
FROM bes_bestelling_item bi, bes_srtdeel sd
|
||||
WHERE bi.bes_bestelling_key = v_bestelling_key
|
||||
AND bi.bes_srtdeel_key = sd.bes_srtdeel_key;
|
||||
|
||||
|
||||
-- Als dit niet lukt (bijvoorbeeld bij een nieuwe bestelling), dan gebruiken we de catalogus tag (accounthash) uit de xml.
|
||||
IF v_srtgroep_key IS NULL
|
||||
IF v_srtgroep_key IS NULL
|
||||
THEN
|
||||
SELECT MAX(bes_srtgroep_key)
|
||||
INTO v_srtgroep_key
|
||||
@@ -586,7 +592,7 @@ AS
|
||||
AND bdp.bes_ins_discipline_key = sg.ins_discipline_key
|
||||
AND sg.bes_srtgroep_verwijder IS NULL;
|
||||
END IF;
|
||||
|
||||
|
||||
-- kunnen we helemaal niets vinden dan vallen we terug op de default.
|
||||
IF v_srtgroep_key IS NULL
|
||||
THEN
|
||||
|
||||
Reference in New Issue
Block a user