IQM: fhiiqm/report/vertrag_kuend_email.php@9c668cd391fa


#!/usr/bin/php
<?php

/**
 * @author Bettina Schwarzer, Fritz-Haber-Institut
 * @copyright 02/2012
 * 
 * sendet email an Bearbeiter 'kuendigugsfrist'Monate + 1 Monat vor Vertragsende
 * auch als cron-Job einsetzbar
 * 
 */

	include_once("/var/www/fhiiqm/inc/dbconnect.inc.php");
	if (!isset($dbc) || !$dbc) $dbc = new dbconnection();

    $heute = new DateTime();
    
    $infoh = "  
        <html>
        <head>
          <title>Vertragsinfo (IQM-DB)</title>
        </head>
        <body>
          <p>Liebe(r) Frau/Herr ";
    $infoh2 = ",</p>
          <p>der folgende Vertrag l&auml;uft demn&auml;chst aus:</p>
          <table border='1' cellspacing='0' cellpadding='5'>\n
          <tr><td>Vertragsbezeichnung</td><td>VTyp</td><td>VBeginn</td><td>VEnde</td>
                    <td>Verl&auml;ngerung</td><td>K&uuml;nd.-frist(mon)</td><td>Bemerkung</td></tr>\n";

    
    $sql = "CALL vertrag_ablauf()";
    
    $result = $dbc -> queryObjectArray($sql);
    if ($result)
    {
        $sql = "SELECT nachname,email 
                FROM fhiiqm.Vertrag v LEFT OUTER JOIN Vertrag_Bearbeiter b
                ON v.contract_ID=b.contract_ID LEFT OUTER JOIN Mitarbeiter m
                ON b.persknr=m.persknr WHERE v.contract_ID=";
        foreach ($result as $row)
        {
//            if (!is_null($row -> ckdate) && $row->ckdate <= $heute->format("Y-m-d") && $row->email) // nur fuer Test
            if (!is_null($row -> ckdate) && $heute->format("Y-m-d") == $row->ckdate && $row->email) // 28.02.2012
            {
                $av = $row->cauto? "automatisch" : "&nbsp;";
                if ($begin = new DateTime($row->cbegin)) $begin=$begin->format("d.m.Y"); else $begin="&nbsp;";
                if ($end = new DateTime($row->cend)) $end=$end->format("d.m.Y"); else $end="&nbsp;";
                if ($ckd = new DateTime($row->ckdate)) $ckd=$ckd->format("d.m.Y"); else $ckd="&nbsp;";
                $info = "<tr><td><b>$row->cname</b></td><td>$row->vtypk</td><td>$begin</td><td><b>$end</b></td>
                    <td>&nbsp;$av</td><td>&nbsp;&nbsp;&nbsp;$row->cmon</td><td>$row->bem</td></tr>\n";

                // Adressat(en)) ermitteln
                $strsql = $sql .$row->cid;
                $addr = "";
                if ($res = $dbc -> queryObjectArray($strsql))
                {
                    foreach ($res as $ro)
                        $addr .= $ro->email.",";
                    $addr = substr($addr,0,strlen($addr)-1);
                }

            	// email senden
//                $eaddr = "wieczorek@fhi-berlin.mpg.de";
//                $eaddr = "kaendler@fhi-berlin.mpg.de";
//                $eaddr = "schwarzer@fhi-berlin.mpg.de";
                $eaddr = $addr;
        		$eheader = 'MIME-Version: 1.0' . "\r\n" .
                            'Content-type: text/html; charset=iso-8859-1' . "\r\n" . 
                            'From: achilleus@fhi-berlin.mpg.de' . "\r\n" .
                            'Bcc: schwarzer@fhi-berlin.mpg.de' . "\r\n" .
        					'Reply-To: ' . "\r\n" .
        				    'X-Mailer: PHP';
        				    
        		$esubj = "Vertragsinformation (IQM-DB)";
//        		$emess = $infoh.$ro->nachname.$infoh2.$addr."\n".$info ."\n";
        		$emess = $infoh.$ro->nachname.$infoh2."\n".$info ."\n";
        		$emess .= "</table>\n";
                $emess .= "<p>Bitte pr&uuml;fen Sie, ob er verl&auml;ngert oder gek&uuml;ndigt werden soll.</p><br />\n";  
                $emess .= "<p>Dies ist eine automatisch generierte E-Mail, bitte nicht darauf antworten.</p>\n";  
        		$emess .= "<p>Beste Grü&szlig;e, Ihre IQM-Datenbank</p>\n</body></html>";
                mail($eaddr,$esubj,$emess,$eheader);
            }
        }
    }

?>
author	Bettina Schwarzer
	Fri, 20 Dec 2013 15:19:32 +0100
changeset 41	9c668cd391fa
parent 24	15f33315f045
permissions	-rw-r--r--