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

LPNL#71678 Kan catering FIP artikel sheet niet inlezen met (nieuwe) kostensoorten

Browse Source 
svn path=/Database/trunk/; revision=66991
This commit is contained in:
Erik Groener
2024-11-12 07:41:53 +00:00
parent e203dbacb0
commit 5ca6d26a50
1 changed files with 104 additions and 101 deletions
Download Patch File Download Diff File Expand all files Collapse all files

33
FAC/FAC_PACF.SRC
View File

@@ -11966,7 +11966,7 @@ BEGIN
fac.imp_writelog (p_import_key,
'I',
v_aanduiding,
'Catalogus is nieuw'
'Catalogus ' || v_res_discipline_oms || ' is nieuw'
);
END;
@@ -11984,7 +11984,7 @@ BEGIN
fac.imp_writelog (p_import_key,
'I',
v_aanduiding,
'Kostensoort is nieuw'
'Kostensoort ' || v_res_kostensoort_oms || ' is nieuw'
);
END;
END IF;
@@ -12365,20 +12365,13 @@ BEGIN
EXCEPTION
WHEN NO_DATA_FOUND
THEN
SELECT prs_s_prs_kostensoort_key.NEXTVAL
INTO v_res_kostensoort_key
FROM DUAL;
INSERT INTO prs_kostensoort
(prs_kostensoort_key,
prs_kostensoort_oms
)
VALUES (v_res_kostensoort_key,
rec.res_kostensoort_oms
);
fac.imp_writelog (p_import_key, 'W', 'Kostensoort [' || rec.res_kostensoort_oms || '] bestaat niet', '');
END;
END IF;
IF v_res_kostensoort_key IS NOT NULL
THEN
BEGIN
SELECT ins_discipline_key
INTO v_res_discipline_key
@@ -12458,8 +12451,7 @@ BEGIN
res_artikel_prijs = rec.res_artikel_prijs,
res_artikel_prijs_vast = rec.res_artikel_prijs_vast,
res_artikel_inkoopprijs = rec.res_artikel_inkoopprijs,
res_artikel_kostenpersoneel =
rec.res_artikel_kostenpersoneel,
res_artikel_kostenpersoneel = rec.res_artikel_kostenpersoneel,
res_artikel_kostenalgemeen = rec.res_artikel_kostenalgemeen,
res_artikel_btw = rec.res_artikel_btw,
res_artikel_opmerking = rec.res_artikel_opmerking,
@@ -12472,6 +12464,7 @@ BEGIN
v_count_update := v_count_update + 1;
END IF;
END IF;
END;
END LOOP;
@@ -12502,6 +12495,16 @@ BEGIN
''
);
END IF;
IF (v_count_tot > (v_count_ins + v_count_update))
THEN
fac.imp_writelog
(p_import_key,
'S',
'Reserveringen: aantal artikelregels overgeslagen: '
|| TO_CHAR (v_count_tot - v_count_ins - v_count_update),
''
);
END IF;
COMMIT;
EXCEPTION