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

Merge DB32c patches

Browse Source 
svn path=/Database/trunk/; revision=36724
This commit is contained in:
Jos Groot Lipman
2018-01-25 08:27:42 +00:00
parent be0d6a56cd
commit a3bfd2d204
1 changed files with 17 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

20
FIN/FIN_PAC.SRC
View File

@@ -653,15 +653,29 @@ AS
-- Keurt een ingevoerde factuur (onvoorwaardelijk) goed of (als rejecttoo) af op basis van de matchingscriteria
PROCEDURE matchandsetfactuur (pfactuur_key IN NUMBER, prejecttoo IN BOOLEAN)
IS
lgoedkeurder fin_factuur.prs_perslid_key_goedkeur%TYPE;
BEGIN
CASE fin.matchfactuur (pfactuur_key)
WHEN 1
THEN
IF fac.getsetting('fin_enable_goedkeuren') <> 0
IF fac.getsetting('fin_enable_goedkeuren') = 0 -- validation unavailable
THEN
fin.setfactuurstatus (pfactuur_key, 6, NULL);
ELSIF fac.getsetting('fin_enable_goedkeuren') = 2 -- validation required
THEN
fin.setfactuurstatus (pfactuur_key, 5, NULL);
ELSE
fin.setfactuurstatus (pfactuur_key, 6, NULL);
ELSE -- validation optional (fin_enable_goedkeuren = 1)
SELECT f.prs_perslid_key_goedkeur
INTO lgoedkeurder
FROM fin_factuur f
WHERE fin_factuur_key = pfactuur_key;
IF lgoedkeurder IS NULL
THEN
fin.setfactuurstatus (pfactuur_key, 6, NULL);
ELSE
fin.setfactuurstatus (pfactuur_key, 5, NULL);
END IF;
END IF;
WHEN -1
THEN