RWSN#67186 NACHT_WERK-export/Verwijderen check (AAFM-communicatie niet uitgevoerd)
svn path=/Customer/trunk/; revision=54343
This commit is contained in:
@@ -16579,42 +16579,6 @@ BEGIN
|
||||
|
||||
COMMIT;
|
||||
|
||||
-- controle taak om te kijken of de AAFM-communicatie loopt.
|
||||
BEGIN
|
||||
-- bedrijf aafm heeft key 5;
|
||||
-- kenmerk voor laatste synchronisatie heeft key 1;
|
||||
-- kijk eerst of het kenmerk uberhaupt bestaat.
|
||||
SELECT COUNT ( * )
|
||||
INTO v_count
|
||||
FROM prs_kenmerklink kl
|
||||
WHERE kl.prs_link_key = 5 AND prs_kenmerk_key = 1;
|
||||
|
||||
IF v_count = 1
|
||||
THEN
|
||||
SELECT TO_DATE (prs_kenmerklink_waarde, 'yyyy-mm-dd hh24:mi:ss')
|
||||
laatste_sync
|
||||
INTO v_date
|
||||
FROM prs_kenmerklink kl
|
||||
WHERE kl.prs_link_key = 5 AND prs_kenmerk_key = 1;
|
||||
|
||||
IF SYSDATE - v_date > 1
|
||||
THEN
|
||||
fac.writelog (p_applname, 'E',
|
||||
'AAFM-communicatie is laatste 24 uur niet uitgevoerd!', '');
|
||||
END IF;
|
||||
END IF;
|
||||
EXCEPTION
|
||||
WHEN OTHERS
|
||||
THEN
|
||||
oracle_err_num := SQLCODE;
|
||||
oracle_err_mes := SUBSTR (SQLERRM, 1, 200);
|
||||
v_errormsg := 'ORACLE (error ' || oracle_err_num || '/' || oracle_err_mes || ')';
|
||||
fac.writelog (p_applname, 'E',
|
||||
'Controle AAFM-communicatie afgebroken!', v_errormsg);
|
||||
END;
|
||||
|
||||
COMMIT;
|
||||
|
||||
-- controle taak om te kijken of PutOrders loopt.
|
||||
BEGIN
|
||||
SELECT MAX (imp_log_datum)
|
||||
|
||||
Reference in New Issue
Block a user