MARX#86532 Opruimen oude logbestanden MARX-upload naar Facilitor

svn path=/Mareon/trunk/; revision=68180

sql/Onces/marx26.sql

@@ -381,6 +381,9 @@ SELECT 1, 'Premium uitbreiden', 11545, (SELECT fac_functie_key FROM fac_functie
 FROM DUAL;
 
 
+-- MARX#86532 Opruimen oude logbestanden MARX-upload naar Facilitor
+INSERT INTO fac_usrdata(fac_usrtab_key,fac_usrdata_code, fac_usrdata_omschr)
+VALUES (1, '$MAR_KILLPRS_PERIOD', '30');
 
 
 

sql/mareon.sql

@@ -21035,6 +21035,36 @@ AND t.fac_tracking_datum >= SYSDATE-30;
   END;
   /
   
+  -- MARX#86532 Opruimen oude logbestanden MARX-upload naar Facilitor
+  CREATE OR REPLACE PROCEDURE marx_delete_synclogs
+  IS
+      CURSOR c_delete_synclog_files
+      IS
+            SELECT b.fac_bijlagen_key
+              FROM fac_bijlagen b,
+                   prs_kenmerk k
+             WHERE k.prs_kenmerk_key = 22
+               AND k.prs_kenmerk_niveau = 'P'
+               AND k.prs_kenmerk_key = b.fac_bijlagen_kenmerk_key
+               AND k.prs_kenmerk_kenmerktype = 'M'
+               AND b.fac_bijlagen_module = 'PRS'
+               AND b.fac_bijlagen_aanmaak < SYSDATE - (SELECT COALESCE(MIN(fac.safe_to_number (ud.fac_usrdata_omschr)), 30) 
+                                                         FROM fac_usrdata ud
+                                                        WHERE ud.fac_usrtab_key = 1 AND ud.fac_usrdata_code = '$MAR_KILLPRS_PERIOD'
+                                                          AND ud.fac_usrdata_verwijder IS NULL);          
+  BEGIN
+      FOR rec IN c_delete_synclog_files
+      LOOP
+          BEGIN
+              flx.deleteflexbijlage(rec.fac_bijlagen_key);
+          END;
+      END LOOP;
+  
+      COMMIT;
+  END;
+  /
+  
+  
   -- MARX#73812 Retentieperiode m.b.t. mar_factuur_queue
   CREATE OR REPLACE PROCEDURE marx_delete_factuur_queue
   IS
@@ -21086,6 +21116,7 @@ AND t.fac_tracking_datum >= SYSDATE-30;
   BEGIN
       marx_mld_freeze ();
       marx_process_avg ();
+      marx_delete_synclogs()
   END;
   /