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

TDNL#80795 Aanpassing import Werkplekken

Browse Source 
svn path=/Customer/trunk/; revision=67009
This commit is contained in:
Norbert Wassink
2024-11-12 18:19:56 +00:00
parent 0fe960f7ee
commit 0a84def1d6
1 changed files with 19 additions and 7 deletions
Download Patch File Download Diff File Expand all files Collapse all files

26
TDNL/TDNL.sql
View File

@@ -512,14 +512,15 @@ BEGIN
BEGIN -- gaan we eerst het object opzoeken als de ins_deel_omschrijving anders dan de vorige
v_aanduiding:= 'Object met omschrijving '||rec.ins_deel_omschrijving||' is niet gevonden';
SELECT i.ins_deel_key INTO v_ins_deel_key
FROM ins_deel i, ins_srtdeel sd
FROM ins_deel i
WHERE i.ins_deel_omschrijving=rec.ins_deel_omschrijving
AND i.ins_deel_verwijder IS NULL
AND sd.INS_SRTDEEL_KEY=i.INS_SRTDEEL_KEY
AND UPPER(sd.INS_SRTDEEL_OMSCHRIJVING) = UPPER(rec.ins_srtdeel);
AND i.ins_deel_verwijder IS NULL;
--AND sd.INS_SRTDEEL_KEY=i.INS_SRTDEEL_KEY
--AND UPPER(sd.INS_SRTDEEL_OMSCHRIJVING) = UPPER(rec.ins_srtdeel);
v_kenmerk_aanmaakdatum:= TO_DATE(rec.kenmerk_aanmaakdatum,'DD-MM-YYYY HH24:MI:SS');
v_kenmerk_verwijderdatum:=TO_DATE(rec.kenmerk_verwijderdatum,'DD-MM-YYYY HH24:MI:SS');
v_kenmerk_aanmaakdatum:= fac.safe_to_date(rec.kenmerk_aanmaakdatum,'DD-MM-YYYY HH24:MI:SS');
v_kenmerk_verwijderdatum:=fac.safe_to_date(rec.kenmerk_verwijderdatum,'DD-MM-YYYY HH24:MI:SS');
v_aanduiding:= '1-Fout bij wegschrijven van Meterstand voor object '||rec.ins_deel_omschrijving||'-'||v_ins_deel_key||' met waarde '||rec.kenmerk_waarde;
-- KIJKEN OF ER AL EEN KENMERK IS op de deel_key, kenmerk-key en aanmaak datum en verwijder datum
@@ -528,7 +529,7 @@ BEGIN
WHERE ins_deel_key=v_ins_deel_key
AND ins_kenmerk_key=v_ins_kenmerk_key
AND ins_kenmerkdeel_aanmaak = v_kenmerk_aanmaakdatum
AND ins_kenmerkdeel_verwijder=v_kenmerk_verwijderdatum
-- AND ins_kenmerkdeel_verwijder=v_kenmerk_verwijderdatum
AND ins_kenmerkdeel_waarde=rec.kenmerk_waarde;
IF v_count=0 AND v_ins_deel_key >0 THEN
@@ -544,6 +545,12 @@ BEGIN
v_kenmerk_verwijderdatum,
rec.kenmerk_waarde);
v_records:=v_records+1;
ELSE
fac.imp_writelog (p_import_key,
'W',
'Reeds aanwezig',
v_aanduiding);
END IF;
EXCEPTION
WHEN NO_DATA_FOUND THEN
@@ -551,6 +558,11 @@ BEGIN
'W',
'Niet gevonden',
v_aanduiding);
WHEN TOO_MANY_ROWS THEN
fac.imp_writelog (p_import_key,
'W',
'Vaker gevonden',
v_aanduiding);
END;
ELSE