FCLT#85233 daily/weekly/monthly wel loggen in IMP_LOG

svn path=/Database/trunk/; revision=66062

FAC/FAC_PAC.SRC

@@ -3317,6 +3317,8 @@ CREATE OR REPLACE PACKAGE BODY fac AS
       has_cust_daily  NUMBER(1);
    BEGIN
 
+      fac.writelog ('FAC_DAILY', 'S', 'Start', '');
+
       -- Comprimeert of verwijdert de sensorwaarden ouder dan ins_state_history dagen
       ins.compress_states(1);
 
@@ -3336,6 +3338,8 @@ CREATE OR REPLACE PACKAGE BODY fac AS
       fac_custprocedure('DAILY');
 
       fac.fac_cleanup(0); -- 0 = onvoorwaardelijk
+
+      fac.writelog ('FAC_DAILY', 'S', 'End', '');
    END;
 
    PROCEDURE fac_weekly
@@ -3343,6 +3347,7 @@ CREATE OR REPLACE PACKAGE BODY fac AS
       cust_weekly      VARCHAR2(20);
       has_cust_weekly  NUMBER(1);
    BEGIN
+      fac.writelog ('FAC_WEEKLY', 'S', 'Start', '');
 
       -- Check wekelijks of er nog meer van vroeger kan worden weggegooid
       -- en doe dat dan. Logging in imp_log onder naam $PURGE$.
@@ -3352,6 +3357,8 @@ CREATE OR REPLACE PACKAGE BODY fac AS
       del.fac_purge(1);
 
       fac_custprocedure('WEEKLY');
+
+      fac.writelog ('FAC_WEEKLY', 'S', 'End', '');
    END;
 
    PROCEDURE fac_monthly
@@ -3359,8 +3366,12 @@ CREATE OR REPLACE PACKAGE BODY fac AS
       cust_monthly      VARCHAR2(20);
       has_cust_monthly  NUMBER(1);
    BEGIN
+      fac.writelog ('FAC_MONTHLY', 'S', 'Start', '');
+
       -- Er is geen default maandelijkse actie
       fac_custprocedure('MONTHLY');
+
+      fac.writelog ('FAC_MONTHLY', 'S', 'End', '');
    END;
 
    -- Vlak voor Putorders run aangeroepen.