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

PIVP#74972 -- Fase 2 implementatie

Browse Source 
svn path=/Customer/trunk/; revision=59886
This commit is contained in:
Norbert Wassink
2023-04-05 12:57:05 +00:00
parent d4bcb8cd50
commit a6d509ce63
1 changed files with 17 additions and 16 deletions
Download Patch File Download Diff File Expand all files Collapse all files

33
PIVP/PIVP.sql
View File

@@ -3344,7 +3344,8 @@ AS
md.ins_discipline_omschrijving
FROM mld_discipline md
WHERE SUBSTR(md.ins_discipline_omschrijving,1,2)='FM'
AND md.ins_discipline_verwijder IS NULL;
AND md.ins_discipline_verwijder IS NULL
ORDER BY 2;
CREATE OR REPLACE VIEW PIVP_V_RUIMTEEXPORT
@@ -3558,12 +3559,12 @@ AS
FAC_GEBRUIKERSGROEP fgg,
prs_perslid p,
fac_srtnotificatie fs
WHERE TO_CHAR (SYSDATE, 'dd') = '20' -- Op de ochtend na 1ste van de maand!
WHERE TO_CHAR (SYSDATE, 'dd') = '02' -- Op de ochtend na 1ste van de maand!
AND UPPER (r.fac_usrrap_omschrijving) = UPPER('BEHEER: Hidden rapportage tbv. Exact Diensten facturatie')
AND fs.fac_srtnotificatie_code='CUST03'
AND fg.FAC_GROEP_OMSCHRIJVING='PIVP_NotificatieGroep'
AND fgg.FAC_GROEP_KEY = fg.FAC_GROEP_KEY
AND p.PRS_PERSLID_KEY = fgg.PRS_PERSLID_KEY;
AND fg.fac_groep_omschrijving='PIVP_NotificatieGroep'
AND fgg.fac_groep_key = fg.fac_groep_key
AND p.prs_perslid_key = fgg.prs_perslid_key;
CREATE OR REPLACE VIEW PIVP_V_noti_exact_res
@@ -3581,7 +3582,7 @@ AS
fac_gebruikersgroep fgg,
prs_perslid p,
fac_srtnotificatie fs
WHERE TO_CHAR (SYSDATE, 'dd') = '20' -- Op de ochtend na 1ste van de maand!
WHERE TO_CHAR (SYSDATE, 'dd') = '02' -- Op de ochtend na 1ste van de maand!
AND UPPER (r.fac_usrrap_omschrijving) = UPPER('BEHEER: Hidden rapportage tbv. Exact res')
AND fs.fac_srtnotificatie_code='CUST04'
AND fg.fac_groep_omschrijving='PIVP_NotificatieGroep'
@@ -3639,7 +3640,7 @@ BEGIN
DELETE FROM fac_rapport
WHERE fac_rapport.fac_rapport_node LIKE 'EXM_MLD%';
-- eerst controlerene of we de eerste van een nieuw kwartaal zijn.
-- Exports vinden plaats op maand basis
v_startmonth := TO_CHAR(TO_NUMBER(TO_CHAR(SYSDATE,'MM'))-1);
v_currentyear := TO_CHAR(TO_NUMBER(TO_CHAR(SYSDATE,'YYYY')));
@@ -3669,9 +3670,9 @@ BEGIN
v_bestand:= 'EXM_MLD';
*/
-- PUUR OM EENVOUDIGER TE KUNNEN TESTEN
v_startDate:=TO_DATE('01-03-2023','DD-MM-YYYY');
v_endDate:=TO_DATE('31-03-2023','DD-MM-YYYY');
v_factuurdatum := TO_DATE('31-03-2023','DD-MM-YYYY');
-- v_startDate:=TO_DATE('01-03-2023','DD-MM-YYYY');
-- v_endDate:=TO_DATE('31-03-2023','DD-MM-YYYY');
-- v_factuurdatum := TO_DATE('31-03-2023','DD-MM-YYYY');
v_bestand:= 'EXM_MLD';
FOR rec in mld(v_startDate, v_endDate)
LOOP
@@ -3741,7 +3742,7 @@ BEGIN
pivp.add_xml_row (v_bestand, '</InvoiceLine>');
-- UPDATE mld_melding set mld_melding_externsyncdate=SYSDATE WHERE mld_melding_key=rec_regel.melding_key;
UPDATE mld_melding set mld_melding_externsyncdate=SYSDATE WHERE mld_melding_key=rec_regel.melding_key;
END LOOP;
IF v_sub_count>0 THEN
@@ -3820,7 +3821,7 @@ BEGIN
-- eerst controlerene of we de eerste van een nieuw kwartaal zijn.
v_currentmonth := TO_NUMBER(TO_CHAR(SYSDATE,'MM'));
v_currentmonth :=10;
-- v_currentmonth :=10;
IF v_currentmonth=1 OR v_currentmonth=4 OR v_currentmonth=7 OR v_currentmonth=10
THEN
CASE v_currentmonth
@@ -3844,9 +3845,9 @@ BEGIN
-- PUUR OM EENVOUDIGER TE KUNNEN TESTEN
v_startDate:=TO_DATE('01-01-2023','DD-MM-YYYY');
v_endDate:=TO_DATE('31-03-2023','DD-MM-YYYY');
v_factuurdatum := TO_DATE('31-03-2023','DD-MM-YYYY');
--v_startDate:=TO_DATE('01-01-2023','DD-MM-YYYY');
--v_endDate:=TO_DATE('31-03-2023','DD-MM-YYYY');
--v_factuurdatum := TO_DATE('31-03-2023','DD-MM-YYYY');
------
v_bestand:= 'EXR_RES';
@@ -3918,7 +3919,7 @@ BEGIN
pivp.add_xml_row (v_bestand, '</InvoiceLine>');
-- UPDATE res_rsv_ruimte set res_rsv_ruimte_externsyncdat=SYSDATE WHERE res_rsv_ruimte_key=rec.res_rsv_ruimte_key;
UPDATE res_rsv_ruimte set res_rsv_ruimte_externsyncdate=SYSDATE WHERE res_rsv_ruimte_key=rec_regel.rrr_key;
END LOOP;