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

BLCC#38429 Herinrichting fin. processen volgens NEN+BLCC#38849 TF-export op 9/1

Browse Source 
svn path=/Customer/trunk/; revision=32173
This commit is contained in:
Maarten van der Heide
2017-01-02 16:51:48 +00:00
parent 5e6fc654b5
commit a54f735538
1 changed files with 24 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

29
BLCC/blcc.sql
View File

@@ -483,10 +483,27 @@ AS
TO_CHAR (fac.gettrackingdate ('ORDAFM', o.mld_opdr_key), 'yyyy-mm-dd')
deliverydate,
COALESCE (ksm.prs_kostensoort_oms, ksv.prs_kostensoort_oms)
costtype -- CostTypeExternalId
costtype, -- CostTypeExternalId
DECODE (aog.alg_gebouw_code,
NULL, 'C-0000-000-00',
'122-001N', 'C-0122-001-01',
'122-00TW', 'C-0122-000-00',
'122-03B', 'C-0122-003-01',
'122-32A', 'C-0122-032-01',
'122-93A', 'C-0122-093-01',
'122-93B', 'C-0122-093-02', -- ???
'122-93C', 'C-0122-093-03',
'122-93D', 'C-0122-093-04',
'122-93E', 'C-0122-093-05', -- ???
'122-94A', 'C-0122-094-01',
'122-94B', 'C-0122-094-02',
'124-037Itter', 'C-0122-037-00',
'C-0' || aog.alg_gebouw_code || '-00')
costproject -- CostProjectExternalId
FROM mld_opdr o,
--fac_tracking t,
mld_melding m,
alg_v_allonrgoed_gegevens aog,
mld_stdmelding sm,
ins_tab_discipline td,
ins_srtdiscipline sd,
@@ -503,6 +520,7 @@ AS
AND o.mld_opdr_kosten > 0
AND o.mld_typeopdr_key != 103 -- Geen RFQs
AND o.mld_melding_key = m.mld_melding_key
AND m.mld_alg_onroerendgoed_keys = aog.alg_onroerendgoed_keys(+)
AND m.mld_stdmelding_key = sm.mld_stdmelding_key
AND sm.mld_ins_discipline_key = td.ins_discipline_key
AND td.ins_srtdiscipline_key = sd.ins_srtdiscipline_key
@@ -609,7 +627,7 @@ BEGIN
-- IF nacht na 1e werkdag van de maand (<28>n geen weekend <20>n geen vrije dag)!
-- count_work_days (d1,d2) bepaalt het #werkdagen van d1 tot d2 (als d1=d2,
-- dan return 0); daarom bepalen tov. laatste dag van vorige maand!
IF FAC.count_work_days (TRUNC (SYSDATE, 'mm') - 1, SYSDATE - 1) = 1
IF FAC.count_work_days (TRUNC (SYSDATE, 'mm') - 1, SYSDATE - 1) = 6 -- BLCC#38849: EENMALIG de 6e werkdag (een week later)!!!
AND TO_CHAR (SYSDATE - 1, 'd') BETWEEN '2' AND '6'
AND v_holiday = 0
THEN
@@ -725,6 +743,7 @@ BEGIN
blcc_add_xml_element (v_bestand, 'VatExternalId', 'IH'); -- Hard op 'IH'
blcc_add_xml_element (v_bestand, 'DeliveryDate', rec.deliverydate); -- ORDAFM of laatste dag van maand voor RES
blcc_add_xml_element (v_bestand, 'CostTypeExternalId', rec.costtype); -- Kostensoort uit soortmelding
blcc_add_xml_element (v_bestand, 'CostProjectExternalId', rec.costproject); -- Transformatie van MLD-Gebouwcode
blcc_add_xml_row (v_bestand, '</OrderLine>');
blcc_add_xml_row (v_bestand, '</OrderLines>');
--blcc_add_xml_row (v_bestand, '</parms>');
@@ -1217,7 +1236,7 @@ AS -- View bevat alleen inhoud op de dag na de 2e werkdag van de maand!
|| ';vrij_tekstveld_3',
0
FROM DUAL
WHERE FAC.count_work_days (TRUNC (SYSDATE, 'mm') - 1, SYSDATE - 1) = 1
WHERE FAC.count_work_days (TRUNC (SYSDATE, 'mm') - 1, SYSDATE - 1) = 6 -- BLCC#38849: EENMALIG de 6e werkdag (een week later)!!!
AND TO_CHAR (SYSDATE - 1, 'd') BETWEEN '2' AND '6'
AND NOT EXISTS
(SELECT 1
@@ -1286,7 +1305,7 @@ AS -- View bevat alleen inhoud op de dag na de 2e werkdag van de maand!
ORDER BY debiteur,
fclt_x_maand || '-' || SUBSTR (factuurdatum, 1, 2),
grootboek)
WHERE FAC.count_work_days (TRUNC (SYSDATE, 'mm') - 1, SYSDATE - 1) = 1
WHERE FAC.count_work_days (TRUNC (SYSDATE, 'mm') - 1, SYSDATE - 1) = 6 -- BLCC#38849: EENMALIG de 6e werkdag (een week later)!!!
AND TO_CHAR (SYSDATE - 1, 'd') BETWEEN '2' AND '6'
AND NOT EXISTS
(SELECT 1
@@ -1354,7 +1373,7 @@ BEGIN
-- IF nacht na 1e werkdag van de maand (<28>n geen weekend <20>n geen vrije dag)!
-- count_work_days (d1,d2) bepaalt het #werkdagen van d1 tot d2 (als d1=d2,
-- dan return 0); daarom bepalen tov. laatste dag van vorige maand!
IF FAC.count_work_days (TRUNC (SYSDATE, 'mm') - 1, SYSDATE - 1) = 1
IF FAC.count_work_days (TRUNC (SYSDATE, 'mm') - 1, SYSDATE - 1) = 6 -- BLCC#38849: EENMALIG de 6e werkdag (een week later)!!!
AND TO_CHAR (SYSDATE - 1, 'd') BETWEEN '2' AND '6'
AND v_holiday = 0
THEN