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

LOGC#66278 -- aanpassing aanroep logc_monthly zonder parameters

Browse Source 
svn path=/Customer/trunk/; revision=52266
This commit is contained in:
Norbert Wassink
2021-07-08 12:59:26 +00:00
parent a565d8ec18
commit a0474a520f
1 changed files with 19 additions and 33 deletions
Download Patch File Download Diff File Expand all files Collapse all files

24
LOGC/logc.sql
View File

@@ -17,16 +17,14 @@ SET DEFINE OFF
------ payload begin ------
CREATE OR REPLACE PACKAGE LOGC
AS
PROCEDURE tsk_emailrapport (p_applname IN VARCHAR2,
p_applrun IN VARCHAR2);
PROCEDURE tsk_emailrapport (p_applname IN VARCHAR2);
END;
/
CREATE OR REPLACE PACKAGE BODY LOGC
AS
PROCEDURE tsk_emailrapport (p_applname IN VARCHAR2,
p_applrun IN VARCHAR2)
PROCEDURE tsk_emailrapport (p_applname IN VARCHAR2)
AS
v_errorhint VARCHAR2 (1000);
v_errormsg VARCHAR2 (1000);
@@ -85,26 +83,14 @@ AS
END;
/
CREATE OR REPLACE PROCEDURE logc_monthly (p_applname IN VARCHAR2,
p_applrun IN VARCHAR2)
CREATE OR REPLACE PROCEDURE logc_monthly
AS
v_errorhint VARCHAR2 (1000);
v_errormsg VARCHAR2 (1000);
oracle_err_num NUMBER;
oracle_err_mes VARCHAR2 (200);
BEGIN
logc.tsk_emailrapport(p_applname, p_applrun);
EXCEPTION
WHEN OTHERS
THEN
oracle_err_num := SQLCODE;
oracle_err_mes := SUBSTR (SQLERRM, 1, 200);
v_errormsg := v_errormsg || ' ORACLE (error ' || oracle_err_num || '/' || oracle_err_mes || ')';
fac.writelog (p_applname,
'E',
'Monthly task afgebroken!: ' || v_errormsg,
v_errorhint);
COMMIT;
logc.tsk_emailrapport('LOGC_MONTHLY');
END;
/
@@ -903,7 +889,7 @@ BEGIN
AND UPPER (v_Projectsoort) = 'PROJECTSOORT'
AND UPPER (v_Omschrijving) = 'OMSCHRIJVING'
AND UPPER (v_Status) = 'STATUS'
AND UPPER (v_Debiteur) = 'DEBITEUR'
AND UPPER (v_Debiteur) = 'KLANT'
AND UPPER (v_PlanWorktime) = 'PLAN WORKTIME'
AND UPPER (v_ActualWorktime) = 'ACTUAL WORKTIME'
AND UPPER (v_ActualWorkCosts) = 'ACTUAL WORK COSTS'