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

Merge DB50

Browse Source 
svn path=/Database/trunk/; revision=68179
This commit is contained in:
Koen Reefman
2025-02-25 09:13:55 +00:00
parent b356a98234
commit e5539038eb
10 changed files with 80 additions and 25 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
CNT/CNT_PAC.SRC
View File

@@ -295,7 +295,11 @@ CREATE OR REPLACE PACKAGE BODY cnt AS
SELECT c.cnt_contract_key
FROM cnt_contract c
WHERE c.cnt_contract_inactiveren = 1
AND TRUNC(c.cnt_contract_looptijd_tot) < TRUNC(SYSDATE);
AND TRUNC(c.cnt_contract_looptijd_tot) < TRUNC(SYSDATE)
AND NOT EXISTS (SELECT f.fin_factuur_key -- Contract mag geen openstaande facturen hebben.
FROM fin_factuur f
WHERE f.cnt_contract_key = c.cnt_contract_key
AND f.fin_factuur_statuses_key NOT IN (1,7));
BEGIN
BEGIN
SELECT prs_perslid_key

1
FAC/FAC_INI.SRC
View File

@@ -2994,6 +2994,7 @@ DEF_MENUITEM(2, 'lcl_menu_fac_bookmarks' , '', 'FAC', 'appl/fac/fac_bookm
DEF_MENUITEM(2, 'lcl_menu_cht_chatkanalen' , '', 'CHT', 'appl/mgt/cht_discipline.asp', 0, 0, 'WEB_PRSSYS', 'W', '1', '');
DEF_MENUITEM(2, 'lcl_menu_fac_eigen_tabellen' , '', 'FAC', 'appl/mgt/fac_usrtab.asp', 0, 0, 'WEB_PRSSYS', 'W', '1', '');
DEF_MENUITEM(2, 'lcl_menu_prs_bedrijf_system' , '', 'FAC', 'appl/prs/prs_bedrijf_search.asp?intern=2', 0, 0, 'WEB_PRSSYS', 'W', '1', '');
DEF_MENUITEM(2, 'lcl_menu_system_adresses' , '', 'FAC', 'appl/mgt/prs_bedrijfadres.asp', 0, 0, 'WEB_PRSSYS', 'W', '1', '');
DEF_MENUITEM(2, 'lcl_menu_fac_xsledit' , '', 'FAC', 'appl/fac/fac_edit_xsl.asp', 0, 0, 'WEB_PRSSYS', 'W', '1', '');
DEF_MENUITEM(2, 'lcl_menu_fac_jobs' , '', 'FAC', 'appl/fac/job_search.asp', 0, 0, 'WEB_PRSSYS', 'W', '1', '');
DEF_MENUITEM(2, 'lcl_menu_fac_importfuncties' , '', 'FAC', 'appl/imp/imp_search.asp', 0, 0, 'WEB_IMPORT', 'W', '1', '');

19
FAC/FAC_LCL.SRC
View File

@@ -762,10 +762,10 @@ FAC_LCL('frm_columnsframe','Kolommen', 'Columns')
FAC_LCL('frm_prscontactlistframe','Contactpersonen', 'Contact persons')
FAC_LCL('frm_prsdienstlistframe','Diensten', 'Services')
FAC_LCL('frm_prsadreslistframe','Systeemadressen', 'System Addresses')
FAC_LCL('frm_prsadreslistframe','Systeemadressen', 'System addresses')
FAC_LCL('frm_facadresframe','Adressen', 'Addresses')
FAC_LCL('frm_prsbdrijfframe','Bedrijf', 'Company')
FAC_LCL('frm_badrframe','Technische adressen', 'Tech addresses')
FAC_LCL('frm_badrframe','Systeemadressen', 'System addresses')
FAC_LCL('frm_sleframe','Sleutel', 'Key')
@@ -839,7 +839,7 @@ FAC_LCL('lcl_alg_del_txt_verdieping', 'Verwijderen verdieping', 'Delete floor')
FAC_LCL('lcl_alg_del_txt_ruimte', 'Verwijderen ruimte', 'Delete room')
FAC_LCL('lcl_alg_del_txt_werkplek', 'Verwijderen werkplek', 'Delete workplace')
FAC_LCL('lcl_prs_del_txt_bedrijf', 'Weet u zeker dat u dit bedrijf wilt verwijderen?', 'Are you sure you want to delete this company?')
FAC_LCL('lcl_prs_del_txt_bedrijfadres', 'Weet u zeker dat u dit technisch adres wilt verwijderen?', 'Are you sure you want to delete this technical address?')
FAC_LCL('lcl_prs_del_txt_bedrijfadres', 'Weet u zeker dat u dit systeemadres wilt verwijderen?', 'Are you sure you want to delete this system address?')
FAC_LCL('lcl_prs_del_txt_afdeling', 'Weet u zeker dat u deze afdeling wilt verwijderen?', 'Are you sure you want to delete this department?')
FAC_LCL('lcl_pda_bez_delete', 'Weet u zeker dat u deze bezoeker wilt verwijderen?', 'Are you sure you want to delete this visitor?')
FAC_LCL('lcl_pda_bez_afs_delete', 'De afspraak zal dan ook verwijderd worden.', 'Doing so will also delete the appointment.')
@@ -3478,10 +3478,10 @@ FAC_LCL('lcl_prs_companies_dienst', 'Dienst', 'Service')
FAC_LCL('lcl_prs_companies_dienst_locs', 'Locaties', 'Locations')
FAC_LCL('lcl_prs_companies_dienst_title', 'Diensten', 'Services')
FAC_LCL('lcl_prs_uitvoertijd', 'Uitvoertijd', 'Processing time')
FAC_LCL('lcl_prs_bedrijfadres_title', 'Technische adressen', 'Technical addresses')
FAC_LCL('lcl_prs_bedrijfadres_title', 'Systeemadressen', 'System addresses')
FAC_LCL('lcl_prs_bedrijfadres_srtnoti_frame', 'Gebeurtenis', 'Event')
FAC_LCL('lcl_prs_bedrijfadres_srtnoti_title', 'Gebeurtenissen', 'Events')
FAC_LCL('lcl_prs_bedrijfadres_frame', 'Technisch adres', 'Technical address')
FAC_LCL('lcl_prs_bedrijfadres_frame', 'Systeemadres', 'System address')
FAC_LCL('lcl_prs_bedrijfadres_omschrijving', 'Omschrijving', 'Description')
FAC_LCL('lcl_prs_bedrijfadres_type', 'Kanaal', 'Channel')
@@ -3492,6 +3492,8 @@ FAC_LCL('lcl_prs_bedrijfadres_type_c', 'Contracten', 'Contracts')
FAC_LCL('lcl_prs_bedrijfadres_type_v', 'Bestelvoorraad info', 'Stock info')
FAC_LCL('lcl_prs_bedrijfadres_type_n', 'Notificaties', 'Notifications')
FAC_LCL('lcl_prs_bedrijfadres_type_i', 'Service (IOT)', 'Service (IOT)')
FAC_LCL('lcl_prs_bedrijfadres_type_s', 'Systeem', 'System')
FAC_LCL('lcl_prs_bedrijfadres_type_p', 'Planning aanvraag', 'Planning request')
FAC_LCL('lcl_prs_bedrijfadres_type_r', 'Catering', 'Catering')
FAC_LCL('lcl_prs_bedrijfadres_type_g', 'Generiek kanaal', 'Generic channel')
FAC_LCL('lcl_prs_bedrijfadres_type_e_intern', 'ERP synchronisatie', 'ERP synchronisation')
@@ -4566,6 +4568,7 @@ FAC_LCL('lcl_menu_prs_bo_use', 'Persoonsgegevens', 'Persons details')
FAC_LCL('lcl_menu_prs_bo', '> Persoon', '> Person')
FAC_LCL('lcl_menu_prs_bedrijf_intern', 'Bedrijf', 'Company')
FAC_LCL('lcl_menu_prs_bedrijf_system', 'Externe systemen', 'External systems')
FAC_LCL('lcl_menu_system_adresses', 'Systeemadressen', 'System adresses')
FAC_LCL('lcl_menu_prs_browser', 'Afdelingbrowser', 'Department browser')
FAC_LCL('lcl_menu_prs_dep_name_level1', 'Afdelingsniveau 1', 'Department level 1')
FAC_LCL('lcl_menu_prs_dep_name_level2', 'Afdelingsniveau 2', 'Department level 2')
@@ -6962,7 +6965,7 @@ FAC_LCL('mld_typeopdr_bez_register', 'Bezoekersregistratie', 'Visitor registrati
FAC_LCL('mld_typeopdr_afhandeling', 'Afhandeltekst verplicht bij afmelden', 'Text mandatory when closing order')
FAC_LCL('mld_typeopdr_confirmforsend', 'Opdrachtverzending', 'Order sending')
FAC_LCL('mld_typeopdr_confirmforsendLOV',
'0;Direct versturen;1;Eerste vragen;2;Markeren',
'0;Direct versturen;1;Eerst vragen;2;Markeren',
'0;Send directly;1;Ask first;2;Mark')
FAC_LCL('mld_typeopdr_kosten_verplicht', 'Opdrachtbedrag verplicht', 'Order amount mandatory')
FAC_LCL('mld_typeopdr_kosten_verplichtLOV',
@@ -8002,8 +8005,8 @@ FAC_LCL('lcl_noti_PRSDEL', 'Persoon verwijderd', 'Person deleted')
FAC_LCL('lcl_noti_PRSLOG', 'Persoon ingelogd', 'Person logged in')
FAC_LCL('lcl_noti_PRSKPU', 'Kostenplaats gewijzigd', 'Cost centre changed')
FAC_LCL('lcl_noti_PRSANO', 'Persoon is geanonimiseerd', 'Person is anonymized')
FAC_LCL('lcl_noti_PRSUPB', 'Bedrijf gewijzigd', 'Company changed')
FAC_LCL('lcl_noti_PRSUPT', 'Technisch adres gewijzigd', 'Technical address changed')
FAC_LCL('lcl_noti_PRSUPB', 'Bedrijf gewijzigd', 'Company changed')
FAC_LCL('lcl_noti_PRSUPT', 'Systeemadres gewijzigd', 'System address changed')
FAC_LCL('lcl_noti_RESNEW', 'Uw reservering ##KEY## (##DESC##) is geregistreerd', 'Your reservation ##KEY## (##DESC##) is registered')
FAC_LCL('lcl_noti_RESUPD', 'Uw reservering ##KEY## (##DESC##) is aangepast', 'Your reservation ##KEY## (##DESC##) is changed')

32
FAC/FAC_PAC.SRC
View File

@@ -2416,15 +2416,37 @@ CREATE OR REPLACE PACKAGE BODY fac AS
AND aa.prs_afdeling_key = p.prs_afdeling_key
AND ba.prs_bedrijf_key = aa.prs_bedrijf_key
AND ba.prs_bedrijfadres_startdatum <= SYSDATE
-- AND ba.prs_bedrijfadres_type = 'G' // maakt me dat uit?
AND ba.prs_bedrijfadres_type = 'S' // Systeem notificaties
AND basrt.prs_bedrijfadres_key = ba.prs_bedrijfadres_key
AND basrt.fac_srtnotificatie_key = skey
)
LOOP
putnotificationsrtprio (NULL, NULL, pcode, pref, poptmessage, 0 /* poptstatus */,
NULL, NULL, pxref, pprio, psender, NULL,
pbedrijfadreskey => bedrijfadresrec.prs_bedrijfadres_key -- enige bijzondere, rest gewoon blind doorgeven
);
INSERT INTO fac_notificatie (fac_srtnotificatie_key,
fac_notificatie_status,
prs_perslid_key_sender,
fac_notificatie_oms,
fac_notificatie_refkey,
fac_notificatie_extrakey,
fac_notificatie_prioriteit,
fac_notificatie_sender_email,
fac_notificatie_lang,
fac_notificatie_systeemadres,
fac_notificatie_attachments,
prs_bedrijfadres_key,
fac_notificatie_notbefore)
VALUES (skey,
0,
pfrom,
soms,
pref,
pxref,
pprio,
psender,
llang,
lsysteem,
pattach,
bedrijfadresrec.prs_bedrijfadres_key, -- enige bijzondere, rest gewoon blind doorgeven,
SYSDATE); -- hier geen delay + NVL(l_srtnoti_delay/ 60/ 60/ 24, 0));
END LOOP;
END IF;

2
FAC/FAC_SET.SRC
View File

@@ -916,6 +916,8 @@ DEFINE_SETTING('PUO', 0001, 'WEB_PRSSYS', 'puo_lcl_friendly_sftp' , 'string
DEFINE_SETTING('PUO', 0001, 'WEB_PRSSYS', 'puo_lcl_friendly_http' , 'string' , 'Opdracht per SOAP gestuurd naar {0}' , 'Friendly text for http tracking')
DEFINE_SETTING('PUO', 0001, 'WEB_PRSSYS', 'puo_lcl_friendly_mailto' , 'string' , 'Opdracht per e-mail gestuurd naar {0}' , 'Friendly text for mail tracking')
DEFINE_SETTING('PUO', 0001, 'WEB_PRSSYS', 'puo_lcl_tracknoti' , 'string' , 'Notificatie {0} verstuurd aan {1}' , 'Friendly text for notification mail tracking')
DEFINE_SETTING('PUO', 0001, 'WEB_PRSSYS', 'puo_lcl_tracknoti_sys' , 'string' , 'Notificatie {0} verstuurd naar {1}' , 'Friendly text for system tracking {0} is notification, {1} is company')
DEFINE_SETTING('PUO', 0001, 'WEB_PRSSYS', 'puo_lcl_tracknoti_sys_fail' , 'string' , ' (na {0} gefaalde poging(en))' , 'Friendly text for system tracking failing')
DEFINE_SETTING('PUO', 0001, 'WEB_PRSSYS', 'puo_subjectprefix' , 'string' , 'Facilitor bestelling: Bestelopdracht nr.' , 'Mail subject prefix for BES orders (to be followed by ordernr)')
DEFINE_SETTING('PUO', 0001, 'WEB_PRSSYS', 'puo_subjectprefixcnt' , 'string' , 'Facilitor contract nr.' , 'Mail subject prefix for CNT')
DEFINE_SETTING('PUO', 0001, 'WEB_PRSSYS', 'puo_subjectprefixres' , 'string' , 'Facilitor reservering nr.' , 'Mail subject prefix for RES')

18
FAC/FAC_TRI.SRC
View File

@@ -397,12 +397,22 @@ BEGIN
-- Always clear the notify_to_statinfo bit, even when no :new.prs_perslid_key_receiver
:NEW.fac_notificatie_status := BITAND (:NEW.fac_notificatie_status, 255 - 1);
:NEW.fac_notificatie_queue:=UPPER(:NEW.fac_notificatie_queue);
END;
/
IF BITAND(:NEW.fac_notificatie_status, 255 - 64) > 0 -- Alleen custom-queue negeren we
OR :NEW.prs_bedrijfadres_key IS NOT NULL
OR :NEW.fac_notificatie_systeemadres IS NOT NULL
CREATE_TRIGGER(fac_t_fac_notificatie_A_IU)
AFTER INSERT OR UPDATE
ON fac_notificatie
FOR EACH ROW
BEGIN
IF INSERTING OR UPDATING ('fac_notificatie_notbefore')
THEN
tsk.starttask(p_taskcode => 'PUTORDERS', p_nextrun => :NEW.fac_notificatie_notbefore);
IF BITAND(:NEW.fac_notificatie_status, 255 - 64) > 0 -- Alleen custom-queue negeren we
OR :NEW.prs_bedrijfadres_key IS NOT NULL
OR :NEW.fac_notificatie_systeemadres IS NOT NULL
THEN
tsk.starttask(p_taskcode => 'PUTORDERS', p_nextrun => :NEW.fac_notificatie_notbefore);
END IF;
END IF;
END;
/

2
INS/INS_TAB.SRC
View File

@@ -716,7 +716,7 @@ CREATE_TABLE(ins_deelsrtcontrole, 0)
VARCHAR(4000 CHAR),
ins_deelsrtcontrole_plandatum
DATE,
ins_deelsrtcontrole_status // (vooralsnog 0;Ingepland 2;Gestart/In behandeling 5;Afgemeld/Gereed gemeld; 6;Afgerond)
ins_deelsrtcontrole_status // (vooralsnog 0;Ingepland 2;Gestart/In behandeling 3;Ter uitvoering 5;Afgemeld/Gereed gemeld; 6;Afgerond)
NUMBER(1)
DEFAULT (6)
CONSTRAINT ins_c_deelsrtcontrole_status NOT NULL,

2
MLD/MLD_PAC.SRC
View File

@@ -526,7 +526,7 @@ CREATE OR REPLACE PACKAGE BODY mld AS
THEN
newstatus := pstatus;
eventcode := 'ORDNEW';
IF teverzenden IS NULL OR teverzenden = 1 -- gebruiker heeft aangegeven 'niet versturen'
IF teverzenden IS NULL OR teverzenden = 0 -- gebruiker heeft aangegeven 'niet versturen'
THEN
l_notificeren := 0;
END IF;

8
RES/RES_VIE.SRC
View File

@@ -681,8 +681,7 @@ CREATE_VIEW(res_v_udr_reservering, 1)
opmerking,
visibility,
ruimte_prijs,
ruimte_korting,
ruimte_totaal
ruimte_korting
)
AS
SELECT rrr.res_rsv_ruimte_key,
@@ -859,9 +858,8 @@ AS
rsa.res_srtactiviteit_omschrijving,
rrr.res_rsv_ruimte_opmerking,
rrr.res_rsv_ruimte_visibility,
rrr.res_rsv_ruimte_prijs,
rrr.res_rsv_ruimte_korting,
rrr.res_rsv_ruimte_totaal
res.getruimteprijs(rrr.res_rsv_ruimte_key),
rrr.res_rsv_ruimte_korting
FROM res_v_aanwezigrsv_ruimte rrr,
res_activiteit ra,
res_srtactiviteit rsa,

15
_UP/DB49to50.src
View File

@@ -71,6 +71,14 @@ ALTER TABLE prs_bedrijfadres
ALTER TABLE prs_bedrijf DROP CONSTRAINT prs_c_prs_bedrijf_intern; // mag ook 2 zijn
ALTER PACKAGE fac COMPILE; // anders (mogelijk nog) invalid en lukt het volgende niet
ALTER PACKAGE fac COMPILE BODY;
UPDATE prs_bedrijf
SET prs_bedrijf_intern = 2, // is nu logischer
prs_bedrijf_uitvoerende = NULL
WHERE prs_bedrijf_naam = 'Aareon Facilitor Mobile app';
ALTER TABLE prs_contactpersoon
ADD prs_contactpersoon_systeem
NUMBER(1) DEFAULT 0 NOT NULL;
@@ -109,6 +117,10 @@ DEF_FAC_SRTNOT('RESSND', 1, 'lcl_noti_RESSND', 'res/res_reservering.asp?rsv_ruim
DEF_MENUITEM(2, 'lcl_menu_prs_bedrijf_system' , '', 'FAC', 'appl/prs/prs_bedrijf_search.asp?intern=2', 0, 0, 'WEB_PRSSYS', 'W', '1', '');
MENU_INS_AFTER('lcl_menu_prs_bedrijf_system', 'lcl_menu_fac_eigen_tabellen', 1);
DEF_MENUITEM(2, 'lcl_menu_system_adresses' , '', 'FAC', 'appl/mgt/prs_bedrijfadres.asp', 0, 0, 'WEB_PRSSYS', 'W', '1', '');
MENU_INS_AFTER('lcl_menu_system_adresses', 'lcl_menu_prs_bedrijf_system', 1);
/////////////////////////////////////////////////////////////////////////////////////////// FCLT#80469
@@ -316,6 +328,9 @@ ALTER TABLE mld_typeopdr
NUMBER(1)
DEFAULT 0;
UPDATE mld_typeopdr
SET mld_typeopdr_confirm_for_send = fac.getsetting('mld_opdr_confirm_for_send');
/////////////////////////////////////////////////////////////////////////////////////////// CARG#85437
ALTER TABLE bes_disc_params
ADD bes_disc_params_autodeliverdays