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

YAXX#83574 Exact export gaat per regio ipv per district. Nu ook aangepast in de hook functie

Browse Source 
svn path=/Customer/trunk/; revision=67404
This commit is contained in:
Arthur Egberink
2024-12-16 11:43:01 +00:00
parent 46b43731a6
commit c7114a0226
1 changed files with 21 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

23
VBXX/vbxx.sql
View File

@@ -357,14 +357,33 @@ AS
AS AS
v_regio_key NUMBER; v_regio_key NUMBER;
BEGIN BEGIN
SELECT alg_regio_key SELECT MIN(d.alg_regio_key)
INTO v_regio_key INTO v_regio_key
FROM fin_factuur f, mld_opdr o, mld_melding m, alg_locatie l, alg_district d FROM fin_factuur f, mld_opdr o, mld_melding m, alg_locatie l, alg_district d
WHERE f.fin_factuur_key = p_fin_key WHERE f.fin_factuur_key = p_fin_key
AND f.mld_opdr_key = o.mld_opdr_key AND f.mld_opdr_key = o.mld_opdr_key
AND o.mld_melding_key = m.mld_melding_key AND o.mld_melding_key = m.mld_melding_key
AND m.mld_alg_locatie_key = l.alg_locatie_key AND m.mld_alg_locatie_key = l.alg_locatie_key
AND l.alg_district_key = d.alg_regio_key; AND l.alg_district_key = d.alg_district_key;
IF v_regio_key IS NOT NULL
THEN
RETURN v_regio_key;
END IF;
SELECT MIN (alg_regio_key)
INTO v_regio_key
FROM fin_factuur f,
cnt_contract_plaats cp,
alg_locatie l,
alg_district d
WHERE f.fin_factuur_key = p_fin_key
AND f.cnt_contract_key = cp.cnt_contract_key
AND ( cp.cnt_alg_plaats_code = 'G'
AND cp.cnt_alg_plaats_key IN (SELECT alg_gebouw_key
FROM alg_gebouw g
WHERE g.alg_locatie_key = l.alg_locatie_key)
OR (cp.cnt_alg_plaats_code = 'L' AND cp.cnt_alg_plaats_key = l.alg_locatie_key))
AND l.alg_district_key = d.alg_district_key;
RETURN v_regio_key; RETURN v_regio_key;
END; END;