scripts added

2026-08-28 12:28:39 +02:00
parent 45e62fda5f
commit c30efbc8d9
237 changed files with 7310 additions and 1 deletions
@@ -0,0 +1,32 @@
+//  last execution: Tue Jul 14 2020 13:08:34 GMT+0200 (Midden-Europese zomertijd)
+
+logAdd(log);
+
+$leden = Record\FetchManyHash('Contact', 'id, name, regiocode', 'name', 'asc');
+
+$i = 0;
+$n = array\length($leden);
+logAdd(log, 'info', '#leden om te processen: ', $n);
+
+while($i < $n,
+    $lid = array\at($leden, $i);
+    
+    $regiocode = hash\get($lid, 'regiocode');
+    $r_code = string\substring($regiocode, 0, 2) + 0;
+    
+    ifThenElse($r_code >= 30, 
+        logAdd(log, 'info', $i, ': lid: ', hash\get($lid, 'name'), ' - regiocode >= 30');
+        ,
+        logAdd(log, 'info', $i, ': lid: ', hash\get($lid, 'name'), ' - herberekenen nascholingstotalen');
+
+        $lid_id = hash\get($lid, 'id');
+        
+        // Trigger recalculate van één van de nascholingen
+        $na_id = record\findRelatedOne('Contact', $lid_id, 'nascholingstotalen', 'createdAt', 'desc');
+        ifThen($na_id, record\recalculate('Nascholingstotaal', 'id=', $na_id); );
+    );
+    
+    $i = $i + 1;
+);
+
+logAdd(log, 'info', 'Klaar.');