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

YAXX#83974 Importsheet externe bedrijven - technische adressen replyadres toevoegen

Browse Source 
svn path=/Database/trunk/; revision=65199
This commit is contained in:
Erik Groener
2024-06-18 13:46:57 +00:00
parent 6aac64962c
commit 5560215936
3 changed files with 19 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

15
FAC/FAC_PACF.SRC
View File

@@ -14645,6 +14645,7 @@ IS
v_prs_bedrijfadres_username VARCHAR2 (255); -- VARCHAR2(32),
v_prs_bedrijfadres_password VARCHAR2 (1000); -- VARCHAR2(320)),
v_prs_bedrijfadres_sender VARCHAR2 (1000); -- VARCHAR2(512),
v_prs_bedrijfadres_replyaddress VARCHAR2 (1000); -- VARCHAR2(512),
v_prs_bedrijfadres_lockuser VARCHAR2 (255); -- NUMBER(10),
v_lockuser_key NUMBER (10);
v_prs_bedrijfadres_lockexpire VARCHAR2 (255);
@@ -14688,6 +14689,7 @@ BEGIN
fac.imp_getfield (v_newline, c_delim, v_prs_bedrijfadres_username);
fac.imp_getfield (v_newline, c_delim, v_prs_bedrijfadres_password);
fac.imp_getfield (v_newline, c_delim, v_prs_bedrijfadres_sender);
fac.imp_getfield (v_newline, c_delim, v_prs_bedrijfadres_replyaddress);
fac.imp_getfield (v_newline, c_delim, v_prs_bedrijfadres_lockuser);
fac.imp_getfield (v_newline, c_delim, v_prs_bedrijfadres_lockexpire);
@@ -14720,6 +14722,7 @@ BEGIN
AND fac_check_import_header(v_prs_bedrijfadres_username, 'LOGIN')
AND fac_check_import_header(v_prs_bedrijfadres_password, 'WACHTWOORD')
AND fac_check_import_header(v_prs_bedrijfadres_sender, 'AFZENDER')
AND fac_check_import_header(v_prs_bedrijfadres_replyaddress,'REPLY ADRES')
AND fac_check_import_header(v_prs_bedrijfadres_lockuser, 'VASTE GEBRUIKER')
AND fac_check_import_header(v_prs_bedrijfadres_lockexpire, 'EXPIRE DAYS')
THEN
@@ -14895,6 +14898,14 @@ BEGIN
'Afzender aangepast naar: ' || v_prs_bedrijfadres_sender);
END IF;
v_errormsg := 'Controleer lengte van reply adres';
IF LENGTH(v_prs_bedrijfadres_replyaddress) > 512
THEN
v_prs_bedrijfadres_replyaddress := SUBSTR(v_prs_bedrijfadres_replyaddress, 1, 512);
fac.imp_writelog (p_import_key, 'W', v_aanduiding || v_errormsg,
'Reply adres aangepast naar: ' || v_prs_bedrijfadres_replyaddress);
END IF;
-- Vindt de key van de vaste gebruiker.
v_prs_bedrijfadres_lockuser := TRIM (v_prs_bedrijfadres_lockuser);
@@ -14935,6 +14946,7 @@ BEGIN
prs_bedrijfadres_username,
prs_bedrijfadres_password,
prs_bedrijfadres_sender,
prs_bedrijfadres_replyaddress,
prs_bedrijfadres_lockuser_key,
prs_bedrijfadres_lockexpire)
VALUES (v_prs_bedrijf_key,
@@ -14949,6 +14961,7 @@ BEGIN
v_prs_bedrijfadres_username,
v_prs_bedrijfadres_password,
v_prs_bedrijfadres_sender,
v_prs_bedrijfadres_replyaddress,
v_lockuser_key,
fac.safe_to_number (v_prs_bedrijfadres_lockexpire));
@@ -15070,6 +15083,7 @@ BEGIN
prs_bedrijfadres_username,
prs_bedrijfadres_password,
prs_bedrijfadres_sender,
prs_bedrijfadres_replyaddress,
prs_bedrijfadres_lockuser_key,
prs_bedrijfadres_locksecret,
prs_bedrijfadres_lockexpire)
@@ -15085,6 +15099,7 @@ BEGIN
rec.prs_bedrijfadres_username,
rec.prs_bedrijfadres_password,
rec.prs_bedrijfadres_sender,
rec.prs_bedrijfadres_replyadres,
rec.prs_bedrijfadres_lockuser_key,
CASE
WHEN rec.prs_bedrijfadres_lockuser_key IS NOT NULL

1
FAC/FAC_VIEEXP.SRC
View File

@@ -23,6 +23,7 @@ SELECT b.prs_bedrijf_naam Bedrijfsnaam
, a.prs_bedrijfadres_username Login
, a.prs_bedrijfadres_password Wachtwoord
, a.prs_bedrijfadres_sender Afzender
, a.prs_bedrijfadres_replyaddress Replyadres
, a.prs_bedrijfadres_lockuser_key Vastegebruiker
, a.prs_bedrijfadres_lockexpire Expiredays
FROM prs_bedrijfadres a

3
_UP/DB48to49.src
View File

@@ -20,6 +20,9 @@ ALTER TABLE fac_api DROP COLUMN fac_import_app_key;
/////////////////////////////////////////////////////////////////////////////////////////// FCLT#82437
DEF_MENUITEM(1, 'lcl_menu_mld_concepts', '', 'MLD', 'appl/mld/mld_search.asp?concept=1&urole=fo', 0, 0, 'WEB_MLDMSU', 'R', '0', '');
/////////////////////////////////////////////////////////////////////////////////////////// YAXX#83974
ALTER TABLE fac_imp_bedrijfadres ADD prs_bedrijfadres_replyaddress VARCHAR2(512);
/////////////////////////////////////////////////////////////////////////////////////////// FCLT#00000