scripts in de database
This commit is contained in:
@@ -0,0 +1,44 @@
|
||||
// last execution: Mon Jun 29 2020 15:53:33 GMT+0200 (Midden-Europese zomertijd)
|
||||
|
||||
$par_Nu_uitvoeren=1;
|
||||
|
||||
logAdd(log);
|
||||
|
||||
ifThenElse($par_Nu_uitvoeren == 0,
|
||||
logAdd(log, 'info', "Zet 'Nu uitvoeren' op 1 om deze taak uit te voeren.");
|
||||
,
|
||||
$nascholingen = entity\getMany('Nascholingstotaal', 10000, 'jaar', '');
|
||||
|
||||
$i = 0;
|
||||
$n = array\length($nascholingen);
|
||||
|
||||
logAdd(log, 'info', 'Aantal nascholingsrecords: ', $n);
|
||||
|
||||
while($i < $n,
|
||||
|
||||
$nascholing = array\at($nascholingen, $i);
|
||||
|
||||
$lidnr = attr($nascholing, 'lidnummer');
|
||||
$jaar = attr($nascholing, 'jaar');
|
||||
|
||||
$contacts = entity\getMany('Contact', 1, 'name', '', 'lidnummer=', $lidnr);
|
||||
|
||||
log('error', $i, ': nascholingsjaar: ', $jaar, 'lidnummer: ', $lidnr);
|
||||
|
||||
ifThenElse(array\length($contacts) > 0,
|
||||
$contact = array\at($contacts, 0);
|
||||
$name = attr($contact, 'name');
|
||||
|
||||
setAttr($nascholing, 'contactId', attr($contact, 'id'));
|
||||
|
||||
entity\save($nascholing);
|
||||
|
||||
logAdd(log, 'info', $i, ': nascholingsjaar: ', $jaar, ', lidnummer: ', $lidnr, ' naam: ', $name);
|
||||
,
|
||||
logAdd(log, 'warning', $i, ': lidnummer: ', $lidnr, ' niet aanwezig in het systeem');
|
||||
);
|
||||
|
||||
$i = $i + 1;
|
||||
);
|
||||
);
|
||||
|
||||
Reference in New Issue
Block a user