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

Versie 5.4.3 Gold A patches

Browse Source 
svn path=/Database/trunk/; revision=23297
This commit is contained in:
Jos Groot Lipman
2014-11-10 16:40:26 +00:00
parent d1f5566712
commit cb0ea98bc5
6 changed files with 36 additions and 25 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
FAC/FAC_PAC.SRC
View File

@@ -4400,7 +4400,8 @@ CREATE OR REPLACE PACKAGE BODY fac AS
WHERE di.ins_srtcontrole_key = xcp.ins_srtcontrole_key(+)
AND di.ins_deel_key = xcp.ins_deel_key(+)
AND di.ins_deel_key = p_insdeel
AND di.ins_srtcontrole_key = p_srtcontrole);
AND di.ins_srtcontrole_key = p_srtcontrole
AND (xcp.ins_srtcontroledl_xcp_eind(+) IS NULL OR xcp.ins_srtcontroledl_xcp_eind(+) > TRUNC(SYSDATE, 'DD')));
RETURN inspdate;
END;
@@ -4475,7 +4476,8 @@ CREATE OR REPLACE PACKAGE BODY fac AS
WHERE di.ins_srtcontrole_key = xcp.ins_srtcontrole_key(+)
AND di.ins_deel_key = xcp.ins_deel_key(+)
AND di.ins_deel_key = p_insdeel
AND di.ins_srtcontrole_key = p_srtcontrole);
AND di.ins_srtcontrole_key = p_srtcontrole
AND (xcp.ins_srtcontroledl_xcp_eind(+) IS NULL OR xcp.ins_srtcontroledl_xcp_eind(+) > TRUNC(SYSDATE, 'DD')));
RETURN lsteps;
END;

5
FAC/FAC_PACX.SRC
View File

@@ -6358,7 +6358,6 @@ AS
v_van res_rsv_ruimte.res_rsv_ruimte_van%TYPE;
v_tot res_rsv_ruimte.res_rsv_ruimte_tot%TYPE;
v_bezoekers res_rsv_ruimte.res_rsv_ruimte_bezoekers%TYPE;
v_prijs res_rsv_ruimte.res_rsv_ruimte_prijs%TYPE;
v_ruimteprijs res_rsv_ruimte.res_rsv_ruimte_prijs%TYPE;
v_korting res_rsv_ruimte.res_rsv_ruimte_korting%TYPE;
v_totaal res_rsv_ruimte.res_rsv_ruimte_totaal%TYPE;
@@ -6498,8 +6497,8 @@ AS
IF NOT p_concise
THEN
createxmltagvalue ('bezoekers', v_bezoekers);
createxmltagvalue ('ruimteprijs', v_prijs);
createxmltagvalue ('prijs', v_prijs - COALESCE(v_korting, 0)); -- korting al verwerkt
createxmltagvalue ('ruimteprijs', v_ruimteprijs);
createxmltagvalue ('prijs', v_ruimteprijs - COALESCE(v_korting, 0)); -- korting al verwerkt
createxmltagvalue ('korting', v_korting);
createxmltagvalue ('afgesprokentotaal', v_totaal);
createxmltagvalue ('status_bokey', v_status_bo_key);

2
FAC/FAC_SET.SRC
View File

@@ -631,7 +631,7 @@ DEFINE_SETTING('PUO', 0001, 'puo_smtpserverport' , 'number' , '25'
DEFINE_SETTING('PUO', 0001, 'puo_smtpauthenticate' , 'number' , '0' , 'Authentication when sendusing cdoSendUsingPort 0=cdoAnonymous, 1=cdoBasic, 2=cdoNTLM')
DEFINE_SETTING('PUO', 0001, 'puo_sendusername' , 'string' , '' , 'Username when puo_smtpauthenticate=cdoBasic')
DEFINE_SETTING('PUO', 0001, 'puo_sendpassword' , 'string' , '' , 'Password when puo_smtpauthenticate=cdoBasic')
DEFINE_SETTING('PUO', 0001, 'puo_flags' , 'number' , '255' , '1=send notifications, 2=send orders, 4=send cust notifications, 7=send all')
DEFINE_SETTING('PUO', 0001, 'puo_flags' , 'number' , '255' , '+1=send notifications, +2=send orders, +4=all orders Immediate')
DEFINE_SETTING('PUO', 0001, 'puo_order_flexfiles' , 'number' , '0' , 'Include flexfiles with sent orders')
DEFINE_SETTING('PUO', 0001, 'bdradrfiles_path' , 'string' , NULL , 'Technische adressen bijlagen folder')
DEFINE_SETTING('PUO', 0001, 'puo_lcl_friendly_mailto' , 'string' , 'Opdracht per e-mail gestuurd naar {0}' , 'Friendly text for mail tracking')

12
MLD/MLD_PAC.SRC
View File

@@ -36,7 +36,9 @@ CREATE OR REPLACE PACKAGE mld AS
stdm_key IN NUMBER,
prio IN NUMBER,
alg_key IN NUMBER,
ins_key IN NUMBER) RETURN MLD_T_UITVOERTIJD;
ins_key IN NUMBER,
eenheid IN VARCHAR2 DEFAULT NULL
) RETURN MLD_T_UITVOERTIJD;
FUNCTION getactualuitvoer (p_melding_key IN NUMBER) RETURN MLD_T_UITVOERTIJD;
FUNCTION getstduitvoer (stdm_key IN NUMBER,
prio IN NUMBER,
@@ -1071,7 +1073,8 @@ CREATE OR REPLACE PACKAGE BODY mld AS
m.mld_stdmelding_key,
m.mld_melding_spoed,
m.mld_alg_onroerendgoed_keys,
v_ins_key_min_uitvoertijd
v_ins_key_min_uitvoertijd,
m.mld_melding_t_uitvoertijd.eenheid
)
INTO v_actual_uitvoertijd_object
FROM mld_melding m
@@ -1084,7 +1087,8 @@ CREATE OR REPLACE PACKAGE BODY mld AS
stdm_key IN NUMBER,
prio IN NUMBER,
alg_key IN NUMBER, -- Altijd gebouw of hoger, locatie niet ondersteund
ins_key IN NUMBER -- Object met de laagste uitvoertijd
ins_key IN NUMBER, -- Object met de laagste uitvoertijd
eenheid IN VARCHAR2 DEFAULT NULL
)
RETURN MLD_T_UITVOERTIJD
AS
@@ -1098,7 +1102,7 @@ CREATE OR REPLACE PACKAGE BODY mld AS
getSLAparams(stdm_key, prio, alg_key, ins_key,
v_mld_stdmelding_regime, v_actual_uitvoertijd_object, v_beginuur, v_einduur, v_werkdagen);
IF v_actual_uitvoertijd_object.eenheid = 'D'
IF COALESCE(eenheid, v_actual_uitvoertijd_object.eenheid) = 'D'
THEN
v_uitvoertijdtype := 'DAGEN';
ELSE

29
RES/RES_PAC.SRC
View File

@@ -28,7 +28,7 @@ CREATE OR REPLACE PACKAGE res AS
FUNCTION res_deel_in_scope (pres_deel_key IN NUMBER, palg_ruimte_key IN NUMBER) RETURN BOOLEAN;
FUNCTION res_artikel_in_scope (pres_artikel_key IN NUMBER, palg_ruimte_key IN NUMBER) RETURN BOOLEAN;
FUNCTION getalg_ruimte_key (pres_rsv_ruimte_key IN NUMBER) RETURN NUMBER;
FUNCTION getruimteprijs (pres_rsv_ruimte_key IN NUMBER) RETURN NUMBER;
FUNCTION getruimteprijs (pres_rsv_ruimte_key IN NUMBER, ignoretotaal IN NUMBER DEFAULT NULL) RETURN NUMBER;
FUNCTION getdeelprijs (pres_rsv_deel_key IN NUMBER) RETURN NUMBER;
FUNCTION getartikelprijs (pres_rsv_artikel_key IN NUMBER) RETURN NUMBER;
FUNCTION getdeelresprijs (pres_rsv_ruimte_key IN NUMBER) RETURN NUMBER;
@@ -1018,7 +1018,7 @@ AS
RETURN alg_ruimte_key;
END;
FUNCTION getruimteprijs (pres_rsv_ruimte_key IN NUMBER)
FUNCTION getruimteprijs (pres_rsv_ruimte_key IN NUMBER, ignoretotaal IN NUMBER DEFAULT NULL)
RETURN NUMBER IS
room_price res_ruimte.res_ruimte_prijs%TYPE;
room_price_fixed res_ruimte.res_ruimte_prijs_vast%TYPE;
@@ -1027,6 +1027,7 @@ AS
price_evening res_ruimte.res_ruimte_prijs_avond%TYPE;
price_allday res_ruimte.res_ruimte_prijs_dag%TYPE;
room_price_total res_rsv_ruimte.res_rsv_ruimte_prijs%TYPE;
afgesprokentotaal res_rsv_ruimte.res_rsv_ruimte_totaal%TYPE;
prs_kostenplaats_extern prs_kostenplaats.prs_kostenplaats_extern%TYPE;
ruimte_prijsfactor_intern res_ruimte.res_ruimte_prijsfactor_intern%TYPE;
@@ -1055,9 +1056,11 @@ AS
BEGIN
-- Is de reservering verwijderd
SELECT rrr.res_rsv_ruimte_verwijder,
rrr.res_status_fo_key
rrr.res_status_fo_key,
res_rsv_ruimte_totaal
INTO verwijderdatum,
statusfokey
statusfokey,
afgesprokentotaal
FROM res_rsv_ruimte rrr
WHERE rrr.res_rsv_ruimte_key = pres_rsv_ruimte_key;
@@ -1090,6 +1093,11 @@ AS
RETURN 0;
END IF;
IF afgesprokentotaal IS NOT NULL AND ignoretotaal IS NULL
THEN
return afgesprokentotaal; -- dit is simpel
END IF;
-- Als Uitgevoerd/verwerkt, dan is de prijs al geregistreerd en bekend
BEGIN
SELECT res_rsv_ruimte_prijs
@@ -1544,7 +1552,6 @@ AS
artikelprijs NUMBER := 0;
deelprijs NUMBER := 0;
korting res_rsv_ruimte.res_rsv_ruimte_korting%TYPE;
totaal res_rsv_ruimte.res_rsv_ruimte_totaal%TYPE;
verwijderdatum res_rsv_ruimte.res_rsv_ruimte_verwijder%TYPE;
statusfokey res_rsv_ruimte.res_status_fo_key%TYPE;
CURSOR cartikel
@@ -1563,12 +1570,10 @@ AS
-- Is de reservering verwijderd
SELECT rrr.res_rsv_ruimte_verwijder,
rrr.res_status_fo_key,
COALESCE(res_rsv_ruimte_korting, 0),
res_rsv_ruimte_totaal
COALESCE(res_rsv_ruimte_korting, 0)
INTO verwijderdatum,
statusfokey,
korting,
totaal
korting
FROM res_rsv_ruimte rrr
WHERE rrr.res_rsv_ruimte_key = pres_rsv_ruimte_key;
@@ -1576,11 +1581,7 @@ AS
IF verwijderdatum IS NOT NULL AND statusfokey != 4 -- Verwijderde reservering met FO status die niet is vervallen: 0% korting doorberekenen.
THEN
korting := 0;
ELSE -- Actuele reservering of verwijderde reservering met FO status is vervallen: 100% korting doorberekenen
IF totaal IS NOT NULL
THEN
return totaal; -- dit is simpel
END IF;
-- ELSE -- Actuele reservering of verwijderde reservering met FO status is vervallen: 100% korting doorberekenen
END IF;
ruimteprijs := res.getruimteprijs(pres_rsv_ruimte_key);

7
_UP/DB22to23.src
View File

@@ -299,7 +299,7 @@ ALTER TABLE fac_notificatie ADD fac_notificatie_attachments VARCHAR2(4000);
/////////////////////////////////////////////////////////////////////////////////////////// FSN#27051
CREATE_TYPE (MLD_T_UITVOERTIJD)
AS
OBJECT (tijdsduur NUMBER(8,5), eenheid VARCHAR2(1));
OBJECT (tijdsduur NUMBER(12,5), eenheid VARCHAR2(1));
/
/* mld_stdmelding */
@@ -589,6 +589,11 @@ ALTER TABLE res_rsv_ruimte ADD res_rsv_ruimte_totaal
/////////////////////////////////////////////////////////////////////////////////////////// CLEANUP
-- mld_melding_uitvoertijd mag nu leeg blijven; het veld verwijderen we later
ALTER TABLE mld_melding DROP CONSTRAINT mld_c_mld_melding_uitvoertijd2;
// FSN#30840 AKZA/DEMO had de volgende ook nog?
BEGIN
adm.tryalter('TABLE mld_melding DROP CONSTRAINT mld_c_mld_melding_uitvoertijd1');
END;
/
DROP VIEW mld_v_stdmelding_gegevens;
-- This cleanup is done with DB23to24
--ALTER TABLE mld_stdmelding DROP COLUMN mld_stdmelding_urgentie;