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

TWYN#77774 verschil totaaloverzicht tussen online en pfd versie

Browse Source 
svn path=/Customer/trunk/; revision=60097
This commit is contained in:
Erik Groener
2023-04-19 13:37:28 +00:00
parent 121394d248
commit 20841883dc
1 changed files with 29 additions and 19 deletions
Download Patch File Download Diff File Expand all files Collapse all files

48
TWYN/twyn_pac.sql
View File

@@ -497,13 +497,13 @@ AS
, p_datum_tot IN VARCHAR2
, p_cursor OUT t_cursor
, p_where IN VARCHAR2 DEFAULT NULL
);
);
PROCEDURE twyn_v_meerminderwerk_opdr ( user_key IN NUMBER
, p_datum_van IN VARCHAR2
, p_datum_tot IN VARCHAR2
, p_cursor OUT t_cursor
, p_where IN VARCHAR2 DEFAULT NULL
);
);
END twyn;
/
CREATE OR REPLACE PACKAGE BODY twyn
@@ -552,9 +552,14 @@ AS
|| ' , twyn_v_bgt_projectdatum p'
|| ' , mld_opdr o'
|| ' WHERE ( f.prs_kostensoort_key = b.prs_kostensoort_key'
|| ' OR ( f.bgt_kostenrubriek_key = b.bgt_kostenrubriek_key'
|| ' OR ( f.prs_kostensoortgrp_key = b.prs_kostensoortgrp_key'
|| ' AND f.prs_kostensoort_key IS NULL'
|| ' AND b.prs_kostensoort_key IS NULL'
|| ' )'
|| ' OR ( f.bgt_kostenrubriek_key = b.bgt_kostenrubriek_key'
|| ' AND f.prs_kostensoortgrp_key IS NULL'
|| ' AND b.prs_kostensoortgrp_key IS NULL'
|| ' )'
|| ' )'
|| ' AND f.bgt_project_key = p.bgt_project_key'
|| ' AND f.prs_kostensoort_key = o.prs_kostensoort_key'
@@ -582,9 +587,14 @@ AS
|| ' , bgt_budget b'
|| ' , twyn_v_bgt_projectdatum p'
|| ' WHERE ( f.prs_kostensoort_key = b.prs_kostensoort_key'
|| ' OR ( f.bgt_kostenrubriek_key = b.bgt_kostenrubriek_key'
|| ' OR ( f.prs_kostensoortgrp_key = b.prs_kostensoortgrp_key'
|| ' AND f.prs_kostensoort_key IS NULL'
|| ' AND b.prs_kostensoort_key IS NULL'
|| ' )'
|| ' OR ( f.bgt_kostenrubriek_key = b.bgt_kostenrubriek_key'
|| ' AND f.prs_kostensoortgrp_key IS NULL'
|| ' AND b.prs_kostensoortgrp_key IS NULL'
|| ' )'
|| ' )'
|| ' AND f.bgt_project_key = p.bgt_project_key'
|| ' AND f.ins_discipline_verwijder IS NULL'
@@ -884,7 +894,7 @@ AS
OPEN p_cursor FOR 'SELECT * FROM (' || v_part_T || ')';
END;
PROCEDURE twyn_v_meerminderwerk_fact (
user_key IN NUMBER,
p_datum_van IN VARCHAR2,
@@ -897,7 +907,7 @@ AS
v_datum_tot DATE;
v_part_W VARCHAR2 (32767);
v_part_D VARCHAR2 (32767);
v_part_D VARCHAR2 (32767);
v_part_T VARCHAR2 (32767);
v_where VARCHAR2 (32767);
BEGIN
@@ -909,7 +919,7 @@ AS
WHEN v_part_W IS NOT NULL THEN 'AND ' || v_part_W
ELSE ''
END;
v_part_D :=
CASE
WHEN p_datum_van IS NOT NULL
@@ -919,7 +929,7 @@ AS
|| ''', ''dd-mm-yyyy'')'
|| ' AND (fin_factuur_advies >= TO_DATE('''
|| p_datum_van
|| ''', ''dd-mm-yyyy'') OR fin_factuur_advies IS NULL)'
|| ''', ''dd-mm-yyyy'') OR fin_factuur_advies IS NULL)'
ELSE
''
END
@@ -933,14 +943,14 @@ AS
|| p_datum_tot
|| ''', ''dd-mm-yyyy'') OR fin_factuur_advies IS NULL)'
END;
v_part_T :=
'SELECT * '
|| 'FROM twyn_v_meerminderwerk_fact'
|| ' WHERE 1=1'
|| ' WHERE 1=1'
|| ' '
|| v_part_D
|| v_part_D
|| ' '
|| v_where;
@@ -958,7 +968,7 @@ AS
v_datum_tot DATE;
v_part_W VARCHAR2 (32767);
v_part_D VARCHAR2 (32767);
v_part_D VARCHAR2 (32767);
v_part_T VARCHAR2 (32767);
v_where VARCHAR2 (32767);
BEGIN
@@ -970,7 +980,7 @@ AS
WHEN v_part_W IS NOT NULL THEN 'AND ' || v_part_W
ELSE ''
END;
v_part_D :=
CASE
WHEN p_datum_van IS NOT NULL
@@ -980,7 +990,7 @@ AS
|| ''', ''dd-mm-yyyy'')'
|| ' AND (ff.fin_factuur_advies >= TO_DATE('''
|| p_datum_van
|| ''', ''dd-mm-yyyy'') OR ff.fin_factuur_advies IS NULL)'
|| ''', ''dd-mm-yyyy'') OR ff.fin_factuur_advies IS NULL)'
ELSE
''
END
@@ -994,7 +1004,7 @@ AS
|| p_datum_tot
|| ''', ''dd-mm-yyyy'') OR ff.fin_factuur_advies IS NULL)'
END;
v_part_T :=
'SELECT p.ins_discipline_key, '
@@ -1062,9 +1072,9 @@ AS
|| ' AND COALESCE(BGT.getGefactureerd(m.mld_opdr_key, 0, null, to_date(''' || p_datum_tot || ''', ''dd-mm-yyyy'')), 0) = 0'
|| ' )'
|| ' OR (COALESCE(BGT.getGefactureerd(m.mld_opdr_key, 0, null, to_date(''' || p_datum_tot || ''', ''dd-mm-yyyy'')), 0) <> 0)'
|| ' )'
|| ' )'
|| ' '
|| v_where
|| v_where
|| ' ORDER BY b.prs_leverancier_nr, '
|| ' p.scode, '
|| ' m.mld_opdr_ordernr, '
@@ -1072,7 +1082,7 @@ AS
OPEN p_cursor FOR 'SELECT * FROM (' || v_part_T || ')';
END;
END;
/