//  last execution: Mon Jun 07 2021 11:33:11 GMT+0200 (Midden-Europese zomertijd)

$par_uitvoeren=true;
$par_test_run_geen_mail_versturen=false;

//$date_par_visitatie_datum='2021-12-02';
//$par_visitatienummer='';
//$par_praktijk_type=list('P1', 'P2', 'P3');
//$par_lid_id='';
//$par_visiteur_id='';

//////////////////////////////////////////////////////////////////////////////////////
// init
//////////////////////////////////////////////////////////////////////////////////////

$visitatienummer = $par_visitatie_nummer;
$visitatie_datum = $par_visitatie_datum;
$visiteur_id = $par_visiteur_id;
$nvkh_afzender = configGet('nvkh-afzender');

$visiteur = entity\get('Contact', $visiteur_id);

$visitatie_formulier_id = configGet('visitatie-formulier');

$lid_id=$par_lid_id;
$lid = entity\get('Contact', $lid_id);
$emailadres = attr($lid, 'emailAddress');

$secretariaat_email = configGet('secretariaat-email-address');
$retouradres = $secretariaat_email;

$visitatie_wacht_dagen = configGet('visitatie-dagen-voor-invullen-formulier');
$two_weeks_before_visitatiedatum = datetime\addDays($visitatie_datum, -1 * $visitatie_wacht_dagen);
$two_weeks_before_visitatiedatum = datetime\format(
                                        $two_weeks_before_visitatiedatum, 
                                        'Europe/Amsterdam', 'DD/MM/YYYY');

$praktijk_type = $par_praktijk_type;
$testrun = $par_test_run_geen_mail_versturen;

html = '';

$visiteur = entity\get('Contact', $visiteur_id);
$visiteur_name = attr($visiteur, 'name');

log('warning', 'visiteur:', $visiteur_name);
log('warning', 'visitatie datum:', $visitatie_datum);
log('warning', 'two weeks notice:', $two_weeks_before_visitatiedatum);
log('warning', 'visitatienummer: ', $visitatienummer);
log('warning', 'retouradres:', $retouradres);
log('warning', 'emailadres:', $emailadres);
log('warning', 'nvkh afzender:', $nvkh_afzender);
log('warning', 'visitatie-formulier-id:', $visitatie_formulier_id);
log('warning', 'praktijk soort:', $praktijk_type);

html = '';

//////////////////////////////////////////////////////////////////////////////////////
// Visitatie formulier invullen en opsturen
//////////////////////////////////////////////////////////////////////////////////////

ifThenElse($par_uitvoeren,

$versie = $par_visitatie_formulier_versie;

$dt = datetime\now();
$dt = datetime\format($dt, 'Europe/Amsterdam', 'YYYY-MM-DD');

$formulier = 'visitatie-formulier';
$formulier_id = $visitatie_formulier_id;

log('warning', 'visitatie vragenformulier input document  : ', $formulier, ' - id : ', $formulier_id);

$leden = list($lid);

$i = 0;
$n = array\length($leden);
log('warning', 'gerelateerde leden: ', $n);

while($i < $n,
      $lid = array\at($leden, $i);
      $lid_nr = attr($lid, 'lidnummer');
      $lid_id = attr($lid, 'id');
      $achternaam = attr($lid, 'lastName');
      $voorzetsel = string\trim(attr($lid, 'middleName'));
      ifThen($voorzetsel != "",
         $achternaam = string\concatenate($voorzetsel, '-', $achternaam);
      );
      
      $achternaam = string\trim($achternaam);
      $achternaam = string\replace($achternaam, ' ', '-');
      
      $form_out = string\concatenate('visitatie-vragenlijst-', $achternaam, '.pdf');
      log('warning', 'visitatie vragenformulier avar document   : ', $form_out);

      log('warning', 'lid id: ', $lid_id, ' naam: ', attr($lid, 'name'), ', lidnummer:', $lid_nr);
      
      $email = attr($lid, 'emailAddress');
      
      $primary_account_id = record\findRelatedOne('Contact', $lid_id, 'accounts', 'name', 'asc', 'type=', $praktijk_type);
      log('warning', 'praktijk[', $praktijk_type, ']: ', $primary_account_id);

      ifThenElse(!$primary_account_id,
             $msg = string\concatenate(attr($lid, 'name'), ' (', $lid_nr, ') voert geen praktijk van soort ', $praktijk_type);
             log('warning', $msg);
             strAdd(html, '<p style="color:red">', $msg, '</p>');
             ,
             $pr = entity\get('Account', $primary_account_id);

             log('warning', 'praktijk: ', attr($pr, 'naam'));
             
             $mbkdatum = attr($lid, 'mBKDatum');
             ifThen($mbkdatum,
                    $mbkdatum = datetime\format($mbkdatum, 'Europe/Amsterdam', 'DD-MM-YYYY');       
             );
             
             $vogdatum = attr($lid, 'datumVOG');
             ifThen($vogdatum,
                    $vogdatum = datetime\format($vogdatum, 'Europe/Amsterdam', 'DD-MM-YYYY');       
             );
             
             $diplomadatum = attr($lid, 'vakopleidingDatumDiploma');
             ifThen($diplomadatum,
                    $diplomadatum = datetime\format($diplomadatum, 'Europe/Amsterdam', 'DD-MM-YYYY');       
             );
             
             $visitatiedatum = '';
             ifThen($visitatie_datum,
                    $visitatiedatum = datetime\format($visitatie_datum, 'Europe/Amsterdam', 'DD-MM-YYYY');
             );
             
             $visitatietijdstip = '';
             ifThen($visitatie_datum,
                    $visitatietijdstip = datetime\format($visitatie_datum, 'Europe/Amsterdam', 'HH:mm');
             );
             
             $attach_id = ext\pdf\fillin('Contact', $lid_id, $formulier_id, $form_out, 
                                         'naam_homeopaat', attr($lid, 'name'), 
                                         'naam_gevisiteerde', attr($lid, 'name'),
                                         'AVAR_Visitatienummer', $visitatie_nummer, 
                                         'ondertekening_naam_gevisiteerde', attr($lid, 'name'), 
                                         'email_homeopaat', $email, 
                                         'naam_praktijk', attr($pr, 'naam'), 
                                         'agb_praktijk', attr($pr, 'agbcode'),
                                         'rbcz_nummer', attr($lid, 'rbcznummer'), 
                                         'nvkh_nummer', attr($lid, 'lidnummer'),
                                         'adres_praktijk_straat', attr($pr, 'shippingAddressStreet'),
                                         'adres_praktijk_postcode', attr($pr, 'shippingAddressPostalCode'), 
                                         'adres_praktijk_plaats', attr($pr, 'shippingAddressCity'),
                                         'agb_persoonlijk', attr($lid, 'agbcode'),
                                         'datum_mbk_of_big', $mbkdatum,
                                         'datum_vog', $vogdatum,
                                         'email_retouradres', $retouradres,
                                         'tel_prive', attr($lid, 'phoneNumber'),
                                         'tel_praktijk', attr($pr, 'phoneNumber'),
                                         'websites', attr($pr, 'website'),
                                         'datum_diploma_vakopleiding', $diplomadatum,
                                         'bijscholingsdagen_laatste_jaren', $bijscholing,
                                         'datum_nascholing_big', 'Nvt',
                                         'datum_visitatie', $visitatiedatum,
                                         'tijdstip_visitatie', $visitatietijdstip, 
                                         'AVAR_Visitatienummer', $visitatienummer
                                        );
              log('warning', 'attachment id :', $attach_id);

              $body = configGet('visitatie-informatie-email');
              
              $scr_fnln = configGet('script-to-firstname-lastname');
              
              $param_name = attr($lid, 'name');
              exec($scr_fnln);
              $lid_name = $val_fn_ln;
              
              $param_name = $visiteur_name;
              exec($scr_fnln);
              $visiteur_name = $val_fn_ln;

              $visitatie_dt = datetime\format($visitatie_datum, 'Europe/Amsterdam', 'DD/MM/YYYY');
              $body = string\replace($body, '{{visitatie-datum}}', $visitatie_dt);
              $body = string\replace($body, '{{visitatie-tijdstip}}', $visitatietijdstip);
              $body = string\replace($body, '{{visitatie-nummer}}', $visitatienummer);
              $body = string\replace($body, '{{nvkh-afzender}}', $nvkh_afzender);
              $body = string\replace($body, '{{visiteur}}', $visiteur_name);
              $body = string\replace($body, '{{wacht-dagen}}', string\concatenate('', $visitatie_wacht_dagen));
              $body = string\replace($body, '{{retourdatum}}', $two_weeks_before_visitatiedatum);
              $body = string\replace($body, '{{secretariaat-adres}}', $secretariaat_email);
              $body = string\replace($body, '{{lid-naam}}', $lid_name);
              $body = ext\htmlize($body, 'Contact', attr($lid, 'id'));

              $userId = env\userAttribute('id');
              
              $subject = 'Visitatieformulier voor visitatie d.d. {{datum}}';
              $subject = string\replace($subject, '{{datum}}', $visitatie_dt);

              
              ifThenElse($testrun,
                        log('warning', 'Dit is een testrun, er wordt geen email verstuurd');
                        ,
                        $emailId = record\create('Email', 
                                                 'subject', $subject,
                                                 'body', $body,
                                                 'to', $emailadres,
                                                 'attachmentsIds', list($attach_id),
                                                 'assignedUser', $userId,
                                                 'isUser', true,
                                                 'parentType', 'Contact',
                                                 'parentId', $lid_id
                                                );
                        ext\email\send($emailId);
              );
             
      );
  
      $i = $i + 1;
     );

,
log('warning', 'Vink uitvoeren aan om dit script uit te voeren');
);