WDKA#77976 -- Verwerking PAT-import niet volledig uitgevoerd

svn path=/Customer/trunk/; revision=60214
This commit is contained in:
Norbert Wassink
2023-04-26 12:40:05 +00:00
parent 5d6d5092df
commit 07e9cfbfbd

View File

@@ -1967,22 +1967,33 @@ BEGIN
v_ins_count :=0;
v_newdate := NULL;
v_test_datum := fac.safe_to_date (rec.laatste_vis_test_str,'DD-MM-YYYY');
IF v_test_datum IS NULL THEN
IF rec.v_laatste_datum_str IS NOT NULL AND LENGTH(rec.v_laatste_datum_str)>0
THEN
v_test_datum := fac.safe_to_date (rec.v_laatste_datum_str,'DD-MM-YYYY');
ELSIF rec.laatste_vis_test_str IS NOT NULL AND LENGTH(rec.laatste_vis_test_str)>0
THEN
v_test_datum := fac.safe_to_date (rec.laatste_vis_test_str,'DD-MM-YYYY');
ELSE
v_test_datum := TO_DATE(SYSDATE,'DD-MM-YYYY');
END IF;
-- v_volgende_testdatum := fac.safe_to_date (rec.v_volgende_testdatum_str,'DD-MM-YYYY');
v_ins_key:=-1;
v_ins_discipline_key:=-1;
BEGIN
SELECT ins_deel_key, ins_discipline_key
INTO v_ins_key, v_ins_discipline_key
FROM ins_v_deel_gegevens
WHERE ins_deel_omschrijving=rec.smartwareid;
EXCEPTION WHEN NO_DATA_FOUND THEN
fac.imp_writelog (p_import_key,
'W',
'Object met Smartware ID : '||rec.smartwareid ||' is niet bekend in Facilitor.',
'Object niet gevonden!');
IF v_ins_key IS NULL OR LENGTH(v_ins_key)=0
THEN
v_ins_key:=-1;
v_ins_discipline_key:=-1;
END IF;
EXCEPTION WHEN NO_DATA_FOUND THEN
v_ins_key:=-1;
v_ins_discipline_key:=-1;
END;
@@ -2031,7 +2042,7 @@ BEGIN
v_ins_deelsrtcontrole_key:=-1;
END;
v_count:=0;
-- v_count:=0;
IF v_ins_deelsrtcontrole_key=-1 AND v_ins_srtcontrole_key != -1 THEN
v_aanduiding := 'Aanmaken ins_deelcontrole gaat fout ('||v_count||') voor object '||rec.smartwareid;
@@ -2363,6 +2374,11 @@ BEGIN
'Smartware data niet verwerkt!');
END IF;
ELSE
fac.imp_writelog (p_import_key,
'W',
'Object met Smartware ID : '||rec.smartwareid ||' is niet bekend in Facilitor.',
'Object niet gevonden!');
END IF;
END LOOP;