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

AAIT#69170: Per kostenplaatsgroep limieten aanpassen.

Browse Source 
svn path=/Database/trunk/; revision=55114
This commit is contained in:
Maykel Geerdink
2022-02-24 16:30:54 +00:00
parent ee225765a5
commit 7e66b6f380
4 changed files with 31 additions and 8 deletions
Download Patch File Download Diff File Expand all files Collapse all files

22
PRS/PRS_PAC.SRC
View File

@@ -279,6 +279,8 @@ AS
lkpgverantwkey1 prs_kostenplaatsgrp.prs_perslid_key%TYPE;
lkpgverantwkey2 prs_kostenplaatsgrp.prs_kostenplaatsgrp_fiat2_key%TYPE;
lkpgverantwkey3 prs_kostenplaatsgrp.prs_kostenplaatsgrp_fiat3_key%TYPE;
lkpgfinlimit1 prs_kostenplaatsgrp.prs_kostenplaatsgrp_fin_limit1%TYPE;
lkpgfinlimit2 prs_kostenplaatsgrp.prs_kostenplaatsgrp_fin_limit2%TYPE;
lexcludeisvervanger NUMBER;
lexcludeiskpgverantw NUMBER;
lkpverantwlimiet fac_profiel.fac_profiel_limiet%TYPE;
@@ -387,10 +389,14 @@ AS
BEGIN
SELECT COALESCE(kg.prs_perslid_key, -1),
COALESCE(kg.prs_kostenplaatsgrp_fiat2_key, -1),
COALESCE(kg.prs_kostenplaatsgrp_fiat3_key, -1)
COALESCE(kg.prs_kostenplaatsgrp_fiat3_key, -1),
COALESCE(kg.prs_kostenplaatsgrp_fin_limit1, fac.safe_To_Number(fac.getsetting ('mld_opdr_kpg_fin_limit1'))),
COALESCE(kg.prs_kostenplaatsgrp_fin_limit2, fac.safe_To_Number(fac.getsetting ('mld_opdr_kpg_fin_limit2')))
INTO lkpgverantwkey1,
lkpgverantwkey2,
lkpgverantwkey3
lkpgverantwkey3,
lkpgfinlimit1,
lkpgfinlimit2
FROM prs_kostenplaats k,
prs_kostenplaatsgrp kg
WHERE prs_kostenplaats_key = pkostenplaats_key
@@ -421,11 +427,11 @@ AS
WHEN lteller = 1
THEN
lkpgverantwkey := lkpgverantwkey1;
llastfiat := lgrens < fac.getsetting ('mld_opdr_kpg_fin_limit1');
llastfiat := lgrens < lkpgfinlimit1;
WHEN lteller = 2
THEN
lkpgverantwkey := lkpgverantwkey2;
llastfiat := lgrens < fac.getsetting ('mld_opdr_kpg_fin_limit2');
llastfiat := lgrens < lkpgfinlimit2;
WHEN lteller = 3
THEN
lkpgverantwkey := lkpgverantwkey3;
@@ -483,10 +489,10 @@ AS
-- Er kan dan in dat geval nagegaan worden tot welk bedrag er is gefiatteerd.
THEN
prs.getfiatteur(o.prs_kostenplaats_key, pexcludekey, mld_opdr_kosten, std.mld_ins_discipline_key, COALESCE(mld_opdr_fiatbedrag, -1))
WHEN mld_opdr_fiatbedrag >= fac.getsetting ('mld_opdr_kpg_fin_limit2')
WHEN mld_opdr_fiatbedrag >= COALESCE(kpg.prs_kostenplaatsgrp_fin_limit2, fac.safe_To_Number(fac.getsetting ('mld_opdr_kpg_fin_limit2')))
THEN
COALESCE(prs_kostenplaatsgrp_fiat3_key, -1)
WHEN mld_opdr_fiatbedrag >= fac.getsetting ('mld_opdr_kpg_fin_limit1')
WHEN mld_opdr_fiatbedrag >= COALESCE(kpg.prs_kostenplaatsgrp_fin_limit1, fac.safe_To_Number(fac.getsetting ('mld_opdr_kpg_fin_limit1')))
THEN
COALESCE(prs_kostenplaatsgrp_fiat2_key, -1)
ELSE
@@ -515,10 +521,10 @@ AS
AND fac_tracking_refkey = b.bes_bestelling_key)
THEN
prs.getfiatteur(b.prs_kostenplaats_key, pexcludekey, binfo.totaal, binfo.ins_discipline_key, COALESCE(bes_bestelling_fiatbedrag, -1))
WHEN bes_bestelling_fiatbedrag >= fac.getsetting('mld_opdr_kpg_fin_limit2')
WHEN bes_bestelling_fiatbedrag >= COALESCE(kpg.prs_kostenplaatsgrp_fin_limit2, fac.safe_To_Number(fac.getsetting ('mld_opdr_kpg_fin_limit2')))
THEN
COALESCE(prs_kostenplaatsgrp_fiat3_key, -1)
WHEN bes_bestelling_fiatbedrag >= fac.getsetting('mld_opdr_kpg_fin_limit1')
WHEN bes_bestelling_fiatbedrag >= COALESCE(kpg.prs_kostenplaatsgrp_fin_limit1, fac.safe_To_Number(fac.getsetting ('mld_opdr_kpg_fin_limit1')))
THEN
COALESCE(prs_kostenplaatsgrp_fiat2_key, -1)
ELSE

4
PRS/PRS_TAB.SRC
View File

@@ -313,6 +313,10 @@ CREATE_TABLE(prs_kostenplaatsgrp,0) (
NUMBER(8),
prs_kostenplaatsgrp_limperiode /* 0(of NULL)=geen(oneindig), 1=maand, 2=jaar */
NUMBER(1),
prs_kostenplaatsgrp_fin_limit1
NUMBER(8),
prs_kostenplaatsgrp_fin_limit2
NUMBER(8),
-- prs_perslid_key
-- NUMBER(10)
-- CONSTRAINT prs_r_prs_perslid_key11 REFERENCES prs_perslid(prs_perslid_key),