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

FCLT#68072 FIP sheet meldingen uitbreiden met icons voor vakgroep en melding

Browse Source 
svn path=/Database/trunk/; revision=55004
This commit is contained in:
Erik Groener
2022-02-16 13:32:04 +00:00
parent 0c899f5e86
commit dd6e3abc81
3 changed files with 50 additions and 26 deletions
Download Patch File Download Diff File Expand all files Collapse all files

71
FAC/FAC_PACF.SRC
View File

@@ -15,7 +15,6 @@
*/
-- Procedures om catalogi in te lezen en te verwerken
/* Formatted on 25-7-2011 10:40:10 (QP5 v5.115.810.9015) */
CREATE OR REPLACE PROCEDURE fac_import_catalogus (
p_import_key IN NUMBER
)
@@ -513,7 +512,6 @@ EXCEPTION
END fac_import_catalogus;
/
/* Formatted on 19-7-2011 17:34:34 (QP5 v5.115.810.9015) */
CREATE OR REPLACE PROCEDURE fac_update_catalogus (
p_import_key IN NUMBER
)
@@ -1188,7 +1186,6 @@ EXCEPTION
END fac_update_catalogus;
/
/* Formatted on 13/08/2008 09:46 (Formatter Plus v4.8.7) */
CREATE OR REPLACE PROCEDURE fac_import_oprognose (
p_import_key IN NUMBER
)
@@ -1297,7 +1294,6 @@ END fac_import_oprognose;
/
/* Formatted on 13/08/2008 12:46 (Formatter Plus v4.8.7) */
CREATE OR REPLACE PROCEDURE fac_update_oprognose (
p_import_key IN NUMBER
)
@@ -1704,7 +1700,6 @@ END;
--// 1. ALG
/* Formatted on 9-7-2013 10:22:36 (QP5 v5.115.810.9015) */
CREATE OR REPLACE PROCEDURE fac_import_onrgoed1 (p_import_key IN NUMBER)
AS
c_delim VARCHAR2 (1) := ';';
@@ -2403,7 +2398,6 @@ EXCEPTION
END fac_import_onrgoed1;
/
/* Formatted on 9-7-2013 11:48:12 (QP5 v5.115.810.9015) */
CREATE OR REPLACE PROCEDURE fac_update_onrgoed1 (p_import_key IN NUMBER)
IS
v_errormsg VARCHAR2 (1000) := '-';
@@ -3173,7 +3167,6 @@ END fac_update_onrgoed1_del;
/* Formatted on 11-3-2010 16:19:44 (QP5 v5.136.908.31019) */
CREATE OR REPLACE PROCEDURE fac_import_onrgoed2 (p_import_key IN NUMBER
)
AS
@@ -5760,6 +5753,8 @@ AS
v_stdmelding_afmeldtext VARCHAR2(255); -- N1
v_stdmelding_doublecheck VARCHAR2(255); -- N4
v_stdmelding_slabewaken VARCHAR2(255); -- N1
v_discipline_image VARCHAR2(255); -- C255
v_stdmelding_image VARCHAR2(255); -- C255
-- Overige velden (alleen gebruikt voor numeriek-validatie)
v_stdmelding_urgentie_n mld_stdmelding.mld_stdmelding_t_accepttijd.tijdsduur%TYPE;
v_stdmelding_uitvoertijd_n mld_stdmelding.mld_stdmelding_t_uitvoertijd.tijdsduur%TYPE;
@@ -5813,6 +5808,8 @@ BEGIN
fac.imp_getfield (v_newline, c_fielddelimitor, v_stdmelding_afmeldtext); -- N1
fac.imp_getfield (v_newline, c_fielddelimitor, v_stdmelding_doublecheck); -- N4
fac.imp_getfield (v_newline, c_fielddelimitor, v_stdmelding_slabewaken); -- N1
fac.imp_getfield (v_newline, c_fielddelimitor, v_discipline_image);
fac.imp_getfield (v_newline, c_fielddelimitor, v_stdmelding_image);
--
-- Spaties ervoor en erachter verwijderen.
v_srtdiscipline_omschrijving := TRIM(v_srtdiscipline_omschrijving);
@@ -5839,6 +5836,8 @@ BEGIN
v_stdmelding_afmeldtext := TRIM(v_stdmelding_afmeldtext);
v_stdmelding_doublecheck := TRIM(v_stdmelding_doublecheck);
v_stdmelding_slabewaken := TRIM(v_stdmelding_slabewaken);
v_discipline_image := TRIM(v_discipline_image);
v_stdmelding_image := TRIM(v_stdmelding_image);
--
v_aanduiding :=
'|'
@@ -5889,7 +5888,10 @@ BEGIN
|| v_stdmelding_doublecheck
|| '|'
|| v_stdmelding_slabewaken
|| '| ';
|| '|'
|| v_discipline_image
|| '|'
|| v_stdmelding_image;
-- Ik controleer of ik een geldige header heb, dat is: in de juiste kolommen
-- de juiste kolomkop. Ik controleer alleen de verplichte kolommen, ik zou ze ook
-- allemaal kunnen doen..
@@ -6080,6 +6082,26 @@ BEGIN
SELECT DECODE (UPPER(v_stdmelding_doublecheck), 'I', '1', 'A', '2', 'B', '3', '0') INTO v_stdmelding_doublecheck FROM DUAL; -- waarden: [0,1,2,3]
END IF;
--
IF LENGTH (v_discipline_image) > 255
THEN
v_discipline_image := SUBSTR (v_discipline_image, 1, 255);
fac.imp_writelog (p_import_key,
'W',
v_aanduiding,
'Discipline image wordt afgebroken tot [' || v_discipline_image || ']'
);
END IF;
--
IF LENGTH (v_stdmelding_image) > 255
THEN
v_stdmelding_image := SUBSTR (v_stdmelding_image, 1, 255);
fac.imp_writelog (p_import_key,
'W',
v_aanduiding,
'Standaardmelding image wordt afgebroken tot [' || v_stdmelding_image || ']'
);
END IF;
--
-- Insert geformatteerde import record
-- We hebben hier vooralsnog de oude uitvoertijden, zonder type
IF v_ongeldig = 0
@@ -6109,7 +6131,9 @@ BEGIN
mld_stdmelding_afmeldtext,
mld_stdmelding_kopieerbaar,
mld_stdmelding_slabewaken,
mld_stdmelding_doublecheck
mld_stdmelding_doublecheck,
ins_discipline_image,
mld_stdmelding_image
)
VALUES (
v_srtdiscipline_omschrijving,
@@ -6135,7 +6159,9 @@ BEGIN
v_stdmelding_afmeldtext,
v_stdmelding_kopieerbaar,
v_stdmelding_slabewaken,
v_stdmelding_doublecheck
v_stdmelding_doublecheck,
v_discipline_image,
v_stdmelding_image
);
v_count_import := v_count_import + 1;
EXCEPTION
@@ -6303,6 +6329,7 @@ IS
SELECT MAX (ins_srtdiscipline_omschrijving) ins_srtdiscipline_omschrijving,
MAX (ins_discipline_omschrijving) ins_discipline_omschrijving,
MAX (mld_discipline_directklaar) mld_discipline_directklaar,
MAX (ins_discipline_image) ins_discipline_image,
UPPER (ins_srtdiscipline_omschrijving) ins_srtdiscipline_upper,
UPPER (ins_discipline_omschrijving) ins_discipline_upper
FROM fac_imp_mld
@@ -6373,11 +6400,13 @@ IS
INSERT INTO ins_tab_discipline
(ins_discipline_module,
ins_discipline_omschrijving,
ins_discipline_min_level, ins_srtdiscipline_key
ins_discipline_min_level, ins_srtdiscipline_key,
ins_discipline_image
)
VALUES ('MLD',
SUBSTR (rec.ins_discipline_omschrijving, 1, 60),
1, srtdiscipline_key
1, srtdiscipline_key,
rec.ins_discipline_image
) RETURNING ins_discipline_key INTO v_discipline_key;
INSERT INTO mld_disc_params
@@ -6871,7 +6900,8 @@ IS
mld_stdmelding_kopieerbaar,
mld_stdmelding_afmeldtext,
mld_stdmelding_doublecheck,
mld_stdmelding_slabewaken
mld_stdmelding_slabewaken,
mld_stdmelding_image
)
VALUES (discipline_key,
rec.mld_stdmelding_omschrijving,
@@ -6926,7 +6956,8 @@ IS
rec.mld_stdmelding_kopieerbaar,
rec.mld_stdmelding_afmeldtext,
rec.mld_stdmelding_doublecheck,
rec.mld_stdmelding_slabewaken
rec.mld_stdmelding_slabewaken,
rec.mld_stdmelding_image
);
v_count_update := v_count_update + 1;
@@ -7300,7 +7331,6 @@ END fac_update_mldafmtxt;
/
--//////////////////////////////////////////////////INS IMPORT STUFF///////////////////////////////////////////
/* Formatted on 2008/08/29 13:45 (Formatter Plus v4.8.7) */
CREATE OR REPLACE PROCEDURE fac_import_ins (p_import_key IN NUMBER)
IS
c_delim VARCHAR2 (1) := ';';
@@ -9257,7 +9287,6 @@ END fac_update_ins;
/
-- UWVA#22765 - SLE: Verfijning sleutelbeheer
/* Formatted on 16-7-2012 16:30:00 (QP5 v5.115.810.9015) */
CREATE OR REPLACE PROCEDURE fac_import_sle (p_import_key IN NUMBER)
IS
c_delim VARCHAR2 (1) := ';';
@@ -9608,7 +9637,6 @@ EXCEPTION
END fac_import_sle;
/
/* Formatted on 26-7-2012 16:28:16 (QP5 v5.115.810.9015) */
CREATE OR REPLACE PROCEDURE fac_update_sle (p_import_key IN NUMBER)
AS
v_errormsg VARCHAR2 (1000);
@@ -10278,7 +10306,6 @@ END fac_update_sle;
bijbehorende procedure gedefinieerd, die geduldig op implementatie wachten.
Afgewogen niet voor fac_import_mld_adres gekozen.
*/
/* Formatted on 12/09/2008 13:30 (Formatter Plus v4.8.7) */
CREATE OR REPLACE PROCEDURE fac_import_adres (
p_import_key IN NUMBER,
p_discipline_key IN NUMBER
@@ -11028,7 +11055,6 @@ END fac_update_res_artikel_sync;
/
/* Formatted on 19/09/2008 17:52 (Formatter Plus v4.8.7) */
CREATE OR REPLACE PROCEDURE fac_import_fac_groep (
p_import_key IN NUMBER
)
@@ -11170,7 +11196,6 @@ END fac_import_fac_groep;
/
/*/* Formatted on 16/10/2008 17:08 (Formatter Plus v4.8.7) */
CREATE OR REPLACE PROCEDURE fac_update_fac_groep (p_import_key IN NUMBER)
AS
CURSOR c1
@@ -11590,7 +11615,6 @@ END fac_update_fac_vakgroep_del;
--------------------------------
/* Formatted on 19/09/2008 17:52 (Formatter Plus v4.8.7) */
CREATE OR REPLACE PROCEDURE fac_import_fac_gebruikersgroep (
p_import_key IN NUMBER
)
@@ -11714,7 +11738,6 @@ EXCEPTION
END fac_import_fac_gebruikersgroep;
/
/*/* Formatted on 16/10/2008 17:08 (Formatter Plus v4.8.7) */
CREATE OR REPLACE PROCEDURE fac_update_fac_gebruikersgroep (p_import_key IN NUMBER)
AS
CURSOR c1
@@ -18584,7 +18607,6 @@ END fac_update_faq;
/
-- FSN#25952 Contractenimport
/* Formatted on 10-9-2013 13:24:42 (QP5 v5.115.810.9015) */
CREATE OR REPLACE PROCEDURE fac_import_cnt (p_import_key IN NUMBER)
AS
c_delim VARCHAR2 (1) := ';';
@@ -19297,7 +19319,6 @@ EXCEPTION
END fac_import_cnt;
/
/* Formatted on 16-9-2013 13:25:35 (QP5 v5.115.810.9015) */
CREATE OR REPLACE PROCEDURE fac_update_cnt (p_import_key IN NUMBER)
AS
-- Cursor zoekt direct alle afgeleide gegevens.
@@ -20916,7 +20937,6 @@ BEGIN
END;
/
/* Formatted on 08-Jul-16 18:19:24 (QP5 v5.136.908.31019) */
CREATE OR REPLACE PROCEDURE fac_import_translation (p_import_key IN NUMBER)
AS
c_delim VARCHAR2 (1) := ';';
@@ -21067,7 +21087,6 @@ EXCEPTION
END;
/
/* Formatted on 09-Jul-16 17:40:50 (QP5 v5.136.908.31019) */
CREATE OR REPLACE PROCEDURE fac_update_translation (p_import_key IN NUMBER)
AS
CURSOR c1

2
FAC/FAC_TAB.SRC
View File

@@ -928,6 +928,7 @@ CREATE_TABLE(fac_imp_mld, 0)
, ins_srtdiscipline_ins VARCHAR2(16)
, ins_srtdiscipline_bes VARCHAR2(16)
, ins_discipline_omschrijving VARCHAR2(60)
, ins_discipline_image VARCHAR2(255)
, mld_stdmelding_omschrijving VARCHAR2(60)
, mld_stdmelding_groep VARCHAR2(30)
, mld_stdmelding_kostensoort VARCHAR2(60)
@@ -947,6 +948,7 @@ CREATE_TABLE(fac_imp_mld, 0)
, mld_stdmelding_doublecheck NUMBER(4)
, mld_stdmelding_slabewaken NUMBER(1)
, mld_stdmelding_externnr VARCHAR2(256)
, mld_stdmelding_image VARCHAR2(255)
);
CREATE_TABLE(fac_imp_mldafmtxt, 0)

3
_UP/DB41to42.src
View File

@@ -90,6 +90,9 @@ END;
DEF_MENUITEM(3, 'lcl_mobile_news' , '', 'FAC', 'appl/pda/portalnews.asp', 0, 0, 'WEB_MLDUSE', 'R', '0', 'fa-newspaper');
/////////////////////////////////////////////////////////////////////////////////////////// FCLT#68072
ALTER TABLE fac_imp_mld ADD (ins_discipline_image VARCHAR2(255), mld_stdmelding_image VARCHAR2(255));
/////////////////////////////////////////////////////////////////////////////////////////// FCLT#00000
///////////////////////////////////////////////////////////////////////////////////////////