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

YKPN#86408 -- Import functie FIN_FACTUUR_MARX factuur scanning uit vbxx toegevoegd en voorzien van fin_set_approver

Browse Source 
svn path=/Customer/trunk/; revision=67229
This commit is contained in:
Norbert Wassink
2024-11-28 12:41:27 +00:00
parent 4741bb8af9
commit 7b7c1c5629
1 changed files with 46 additions and 8 deletions
Download Patch File Download Diff File Expand all files Collapse all files

54
YKPN/ykpn.sql
View File

@@ -2843,14 +2843,21 @@ AS
AND o.mld_opdr_teverzenden=0
AND ono.mld_opdr_key = o.mld_opdr_key
AND ono.prs_perslid_key=m.prs_perslid_key
AND ono.mld_opdr_note_aanmaak > o.mld_opdr_externsyncdate;
AND ono.mld_opdr_note_aanmaak > o.mld_opdr_externsyncdate;
BEGIN
FOR rec IN sel_servicenow
LOOP
UPDATE mld_opdr o
SET o.mld_opdr_teverzenden=2, o.mld_opdr_verzonden=NULL
WHERE o.mld_opdr_key=rec.mld_opdr_key;
END LOOP;
NULL;
-- Weke opdrachten naar servicenow moeten we opneiwue versturen
--FOR rec IN sel_servicenow
--LOOP
-- UPDATE mld_opdr o
-- SET o.mld_opdr_teverzenden=2, o.mld_opdr_verzonden=NULL
-- WHERE o.mld_opdr_key=rec.mld_opdr_key;
--END LOOP;
END;
/
@@ -3838,14 +3845,17 @@ AS
FROM fac_imp_perslid i
GROUP BY prs_perslid_oslogin
HAVING COUNT (prs_perslid_oslogin) > 1;
v_seq_of_columns VARCHAR(255);
BEGIN
-- we plaaten de functie in kenmerkx
-- de functie wordt tijdelijk gevuld met de key van het record. Puur om een waarde
-- erin te hebben staan.
UPDATE fac_imp_file SET fac_imp_file_line = REPLACE(fac_imp_file_line, 'NULL') WHERE fac_import_key = p_import_key;
v_seq_of_columns := '14;14;0;0;0;0;8;6;5;24;4;17;16;20;0;11;0;9;0;2;1;3;0;0;0;0;1;0;23;24;25;26;0;0;0;0;0;0;0;0;0;0;0;0;0;0';
v_seq_of_columns := '14;14;0;0;0;0;8;6;5;24;4;17;16;20;0;11;0;9;0;2;1;3;0;0;0;0;1;0;23;24;25;26;21;0;0;0;0;0;0;0;0;0;0;0;0;0';
prs.import_perslid(p_import_key, v_seq_of_columns, 'emp_cbl_number;emp_number;emp_ruis_id;prs_name_initials;prs_name_prefix;prs_name_last;emp_sup_name;emp_dep_code;emp_email;emp_active;emp_phone;emp_mobile;emp_sms_authentication;emp_loc_code;emp_date_termination;prs_name_partner_prefix;prs_name_partner_last;prs_umra_name_prefix;prs_umra_name_last;prs_name_last_pref;emp_dep_name;emp_fnc_code;emp_fnc_name;prs_name_call%');
-- Maak standaard verdieping aan voor de werkplek
@@ -3986,6 +3996,7 @@ BEGIN
WHERE m.mld_adres_afleveradres = 1 AND m.alg_locatie_key IS NOT NULL;
END ykpn_import_perslid;
/
@@ -13183,6 +13194,33 @@ BEGIN
END;
/
CREATE OR REPLACE PROCEDURE YKPN_IMPORT_FIN_FACTUUR_MARX(p_import_key IN NUMBER)
AS
BEGIN
vbxx_import_fin_factuur_marx(p_import_key);
END;
/
CREATE OR REPLACE PROCEDURE YKPN_UPDATE_FIN_FACTUUR_MARX(p_import_key IN NUMBER)
AS
CURSOR set_appr(v_import_key NUMBER)
IS
SELECT f.fin_factuur_key fin_factuur_key
FROM fac_imp_factuur i, fin_factuur f
WHERE fac_import_key=v_import_key
AND f.fin_factuur_key=i.fin_factuur_key;
BEGIN
vbxx_update_fin_factuur_marx(p_import_key);
FOR rec IN set_appr(p_import_key)
LOOP
ykpn.fin_set_approver(rec.fin_factuur_key);
END LOOP;
END;
/
--
-- Koppeling met Exact
--