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

TMGP#77597 -- Inrichten omgeving voor de Tomin groep

Browse Source 
svn path=/Customer/trunk/; revision=61347
This commit is contained in:
Norbert Wassink
2023-08-02 08:39:18 +00:00
parent 8f9f1bc9e3
commit 130babdfb3
1 changed files with 8 additions and 12 deletions
Download Patch File Download Diff File Expand all files Collapse all files

20
TMGP/TMGP.sql
View File

@@ -54,7 +54,7 @@ CREATE OR REPLACE PROCEDURE TMGP_IMPORT_TAKEN_OVERIG(p_import_key IN NUMBER)
AS
BEGIN
DELETE FROM fac_imp_csv;
COMMIT;
fac_import_genericcsv(p_import_key);
END;
@@ -188,9 +188,7 @@ BEGIN
VALUES (v_srtcontrole_key,
v_deel_key,
v_eenheid,
fac.safe_to_date(rec.taak_datum,'DD-MM-YYYY'))
RETURNING ins_srtcontroledl_xcp_key
INTO v_srtcontroledl_xcp_key;
fac.safe_to_date(rec.taak_datum,'DD-MM-YYYY'));
END;
ELSE
fac.imp_writelog (p_import_key,
@@ -221,7 +219,7 @@ CREATE OR REPLACE PROCEDURE TMGP_IMPORT_TAKEN_MJOB(p_import_key IN NUMBER)
AS
BEGIN
DELETE FROM fac_imp_csv;
COMMIT;
fac_import_genericcsv(p_import_key);
END;
@@ -305,7 +303,7 @@ BEGIN
SELECT ikd.ins_kenmerkdeel_waarde
INTO v_eenheid_hoev
FROM ins_kenmerkdeel ikd, ins_kenmerk ik
WHERE ikd.ins_deel_key= 413
WHERE ikd.ins_deel_key= v_deel_key
AND ikd.ins_kenmerkdeel_verwijder IS NULL
AND UPPER(ik.ins_kenmerk_omschrijving)='EENHEID'
AND ikd.ins_kenmerk_key = ik.ins_kenmerk_key;
@@ -377,9 +375,7 @@ BEGIN
v_kosten,
SUBSTR(rec.taak_opmerking,0,300),
rec.taak_financiering||'-'||rec.taak_grootboek,
v_eenheid_hoev)
RETURNING ins_srtcontroledl_xcp_key
INTO v_srtcontroledl_xcp_key;
v_eenheid_hoev);
ELSE
@@ -393,7 +389,7 @@ BEGIN
v_errorhint);
END IF;
END LOOP;
COMMIT;
EXCEPTION
WHEN NO_DATA_FOUND
THEN
@@ -495,7 +491,7 @@ AS
fud.fac_usrdata_code||'-'||fud.fac_usrdata_omschr,
fud.fac_usrdata_omschr2
FROM fac_usrdata fud, fac_usrtab fut
WHERE UPPER(fut.fac_usrtab_naam)='NLSFB'
WHERE fut.fac_usrtab_naam='NLSFB'
AND fud.fac_usrtab_key = fut.fac_usrtab_key
AND fud.fac_usrdata_verwijder IS NULL;
@@ -510,7 +506,7 @@ AS
fud.fac_usrdata_code||'-'||fud.fac_usrdata_omschr,
fud.fac_usrdata_omschr2
FROM fac_usrdata fud, fac_usrtab fut
WHERE UPPER(fut.fac_usrtab_naam)='GROOTBOEK'
WHERE fut.fac_usrtab_naam='GROOTBOEK'
AND fud.fac_usrtab_key = fut.fac_usrtab_key
AND fud.fac_usrdata_verwijder IS NULL;