PCHP#89200 Financiele procedures aangepast zodat ook de facturen van Parking verwerkt kunnen worden.

svn path=/Customer/trunk/; revision=69576
This commit is contained in:
Arthur Egberink
2025-06-30 06:53:28 +00:00
parent 8dd2e3ecc3
commit e285a91669

View File

@@ -140,12 +140,12 @@ AS
v_adm := '650';
END IF;
IF v_user = 'PCHH'
IF v_user = 'PCHH' -- PCHH is gemigreerd in de PCHD omgeving
THEN
v_adm := '100';
END IF;
IF v_user = 'PCHP'
IF v_user = 'PCHP' -- PCHP is gemigreerd in de PCHD omgeving
THEN
v_adm := '250';
END IF;
@@ -1154,7 +1154,8 @@ AS
SELECT result, result_order
FROM pchx_v_exp_verwerk_exact_adm
WHERE administratie = pchx.get_administratienr
OR (pchx.get_user = 'PCHD' AND administratie = '100');
OR (pchx.get_user = 'PCHD' AND administratie = '100')
OR (pchx.get_user = 'PCHD' AND administratie = '250');
-- Procedure om alle geexporteerde facturen naar status verwerkt te zetten.
@@ -1309,6 +1310,7 @@ BEGIN
IF pchx.get_user = 'PCHD'
THEN
pchx_export_verwerk_exact_adm (p_applname, p_applrun, p_filedir, p_filename, '100');
pchx_export_verwerk_exact_adm (p_applname, p_applrun, p_filedir, p_filename, '250');
END IF;
END;
/
@@ -1915,7 +1917,7 @@ BEGIN
|| '"/>');
END IF;
IF pchx.get_user = 'PCHD' AND p_administratie <> '100'
IF pchx.get_user = 'PCHD' AND p_administratie <> '100' AND p_administratie <> '250'
THEN
pchx.add_xml_row (
v_bestand,
@@ -1988,6 +1990,8 @@ BEGIN
THEN
-- Na de migratie van PCHH (administratie 100) naar PCHD moeten we ook voor administratie 100 de export uitvoerende
pchx_select_scansys_adm (p_applname, p_applrun, '100');
-- Na de migratie van PCHP (administratie 250) naar PCHD moeten we ook voor administratie 250 de export uitvoerende
pchx_select_scansys_adm (p_applname, p_applrun, '250');
END IF;
END;
/
@@ -4939,7 +4943,7 @@ BEGIN
|| rec.kenmerk1);
END IF;
IF pchx.get_user = 'PCHD' AND rec.kenmerk6 <> '100' THEN
IF pchx.get_user = 'PCHD' AND rec.kenmerk6 <> '100' AND rec.kenmerk6 <> '250' THEN
PCHX.fin_set_projectloc_code (rec.fin_factuur_key);
END IF;
END;
@@ -5061,7 +5065,7 @@ BEGIN
v_errorhint := 'Geen kostensoort factuurregel';
IF pchx.get_user = 'PCHD' AND rec.kenmerk6 <> '100' THEN
IF pchx.get_user = 'PCHD' AND rec.kenmerk6 <> '100' AND rec.kenmerk6 <> '250' THEN
--Kostensoort (factuurregel)
PCHX.fin_set_kostensoort (rec.fin_factuur_key, rec.fin_factuurregel_key, rec.kenmerk2);
END IF;
@@ -5097,7 +5101,7 @@ BEGIN
v_afw_boekdatum);
END IF;
IF pchx.get_user = 'PCHD' AND rec.kenmerk6 <> '100' THEN
IF pchx.get_user = 'PCHD' AND rec.kenmerk6 <> '100' AND rec.kenmerk6 <> '250' THEN
PCHX.fin_set_locatie_code (rec.fin_factuur_key, rec.fin_factuurregel_key);
END IF;