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

FCLT#57833: Normalisering van de opdrachttypes.

Browse Source 
svn path=/Database/trunk/; revision=43276
This commit is contained in:
Maykel Geerdink
2019-07-09 11:30:30 +00:00
parent 353336d558
commit 21842c1044
2 changed files with 23 additions and 11 deletions
Download Patch File Download Diff File Expand all files Collapse all files

14
FIN/FIN_PAC.SRC
View File

@@ -308,7 +308,7 @@ AS
factuurschemabedrag cnt_factuurschema.cnt_factuurschema_bedrag%TYPE;
contractkosten cnt_contract.cnt_contract_kosten%TYPE;
opdrachtkosten mld_opdr.mld_opdr_kosten%TYPE;
matchtype mld_typeopdr.mld_typeopdr_matchtype%TYPE;
typeopdr_uren mld_typeopdr.mld_typeopdr_uren%TYPE;
factuurbedrag NUMBER (12, 2);
bestelbedrag NUMBER (12, 2); -- van de opdracht waar deze factuur over gaat
totaalgefactureerd NUMBER (12, 2); -- met deze factuur erbij eerder gefactureerd van dezelfde B(R)OC
@@ -557,15 +557,15 @@ AS
--
WHEN ftype = 'O'
THEN
-- controleer op basis van typeopdr.matchtype
-- controleer op basis van typeopdr_uren
BEGIN
SELECT o.mld_opdr_kosten,
sm.mld_ins_discipline_key,
top.mld_typeopdr_matchtype,
top.mld_typeopdr_uren,
o.mld_statusopdr_key
INTO opdrachtkosten,
discipline,
matchtype,
typeopdr_uren,
opdrstatus
FROM mld_opdr o,
mld_melding m,
@@ -586,7 +586,7 @@ AS
END;
DBMS_OUTPUT.put_line ('opdrachtkosten: ' || opdrachtkosten);
DBMS_OUTPUT.put_line ('matchtype: ' || matchtype);
DBMS_OUTPUT.put_line ('typeopdr_uren: ' || typeopdr_uren);
DBMS_OUTPUT.put_line ('opdrstatus: ' || opdrstatus);
SELECT MAX( (SELECT ks.prs_kostensoort_btw
@@ -614,9 +614,9 @@ AS
RETURN -1;
END IF;
IF matchtype = 3
IF typeopdr_uren = 5 -- Opdrachttype-Uren: Interne uren per week verplicht(5).
THEN
DBMS_OUTPUT.put_line ('matchtype unsupported yet!');
DBMS_OUTPUT.put_line ('typeopdr_uren "Internal hours per week(5)" unsupported yet!');
RETURN 0;
END IF;