<?php
#require_once("./config/datenbankanbindung.php");     // f&uuml;gt die Datenbankanbindung ein: Sys:\php\includes\kurs\datenbankanbindung.php
#$db = dbconnect();
require_once("config.inc.php");
#$lid='4242';
#$user_admin = "schwaral";

$user_admin=$_COOKIE["user_admin"];
$lid = $_GET['lid'];
if ($user_admin == ""){ require("index.php"); exit;} //Wenn man nicht angemeldet ist, darf man nicht auf die Seite

$res = $db->query("SELECT textstelle, thema, unterthema, ueberschrift, textwort, botschaft, inhalt, zusammenfassung, kontext, DATE_Format(datum, '%d') tag, DATE_Format(datum, '%m') monat, DATE_Format(datum, '%Y') jahr, stapgd, kid, ukid, DATE_Format(datum, '%Y-%m-%d')AS datum_berechnung FROM quelle WHERE lid='$lid'");
$row = $res->fetch_array();
    
## Vergleichsdatum: Altes LG / Neue LG ab 01.12.2007. Dementsprechendes PDF generieren
$date_nlg  = mktime(0, 0, 0, 12, 1, 2007);  // Datum ab dem neue LGs gelten
$date_nlg_format = date("Y-m-d", $date_nlg);  // ISO-8601 Format wie in der Datenbank: Formatierung f&uuml;r Vergleiche erforderlich

$switch_date = strtotime ($date_nlg_format); //Umrechnung des Fristgrenztages in eine Zahl
$lg_datum = strtotime ($row['datum_berechnung']); // Umrechnung des Enddatums in eine Zahl

##### ÄNDERUNG NEUE LUTHERBIBEL ########
if(date("Y") < 2019){
  require("bibellookup_1984.php");
}else{
  require("bibellookup_2017.php");
}

function makeLink($a, $b, $c, $d, $e, $f, $g, $h, $lid)
{
  $a=trim($a);
  $b=trim($b);
  $c=trim($c);
  $d=trim($d);
  $e=trim($e);
  $f=trim($f);
  $g=trim($g);
  $h=trim($h);
  # $d muss immer ein Komma haben, wenn danach noch was kommt
  if($e != '' or $f != "" or $g != "" or $h != ""){
   if($d == ''){
     $d=',';
   }
  }
  /*
  echo "a: '$a'<br>
        b: '$b'<br>
        c: '$c'<br>
        d: '$d'<br>
        e: '$e'<br>
        f: '$f'<br>
        g: '$g'<br>
        h: '$h'<br>
        i: '$i'<br>
        ";
  */
  $b =str_replace  ("Ruth",  "Rut"  ,  $b);
  $b =str_replace  ("Esther",  "Ester"  ,  $b);
  $b =str_replace  ("Judith",  "Judit"  ,  $b);
  $b =str_replace  ("Ezechiel",  "Hesekiel"  ,  $b);
  $b =str_replace  ("Ijob",  "Hiob"  ,  $b);
  if($a!=''){
   $a=$a." ";
  }
  if($c!=''){
   $c=" ".$c;
  }
  if($e!=''){
   $e=" ".$e." ";
  }
  // Handling, wenn bei Bibelstelle Bindestrich oder Punkt enthalten sind
  if($g == '-'){
    #$wort="Römer 8,31-39";
    $wort="$a$b$c$d$f$g$h";
    $wort=trim($wort);
    return sprintf("<a class=\"biblelink\" href=\"http://www.bibleserver.com/go.php?lang={de}&bible={LUT84}&ref=%s\" target=\"_blank\">%s</a>",  $a.$b.$c.$d.$f.$g.$h, $a.$b.$c.$d.$e.$f.$g.$h);
  }elseif($g == '.'){
    // Wenn Punkt, dann muss unterschieden werden, ob die Textstelle forlaufend ist
    $next=$f+1;
    if($h==$next){
      // Beispiel Matthäus 1,1.2
      // aus dem Punkt wird ein Bindestrich für bibleserver
      $g1='-';
      $wort="$a$b$c$d$f$g1$h";
      $wort=trim($wort);
      return sprintf("<a class=\"biblelink\" href=\"http://www.bibleserver.com/go.php?lang={de}&bible={LUT84}&ref=%s\" target=\"_blank\">%s</a>",  $a.$b.$c.$d.$f.$g1.$h, $a.$b.$c.$d.$e.$f.$g.$h);
    }else{
      // Beispiel Matthäus 1,1.3
      // Da Vers 2 nicht aufgeführt ist, darf man nicht 1-3 machen
      // Parameter $g und $h (.3) wird daher nicht im Link übergeben
      $wort="$a$b$c$d$f";
      $wort=trim($wort);
      return sprintf("<a class=\"biblelink\" href=\"http://www.bibleserver.com/go.php?lang={de}&bible={LUT84}&ref=%s\" target=\"_blank\">%s</a>",  $a.$b.$c.$d.$f, $a.$b.$c.$d.$e.$f.$g.$h);
    }
  }else{
    // Alles Ohne Bindestrich und Punkt, daher auch kein $g und $h
    $wort="$a$b$c$d$f$g$h";
    $wort=trim($wort);
    return sprintf("<a class=\"biblelink\" href=\"http://www.bibleserver.com/go.php?lang={de}&bible={LUT84}&ref=%s\" target=\"_blank\">%s</a>",  $a.$b.$c.$d.$f.$g.$h,  $a.$b.$c.$d.$e.$f.$g.$h);
  }
}


function refill($a,$b,$c,$d,$e,$f,$g,$h,$i)
{
 
// Funktion die aus Textstellenkurzeichen die vollständige Textstelle erstellt

/*
echo "a: '$a'<br>
      b: '$b'<br>
      c: '$c'<br>
      d: '$d'<br>
      e: '$e'<br>
      f: '$f'<br>
      g: '$g'<br>
      h: '$h'<br>
      i: '$i'<br>
      ";
*/

switch($c)
{
case'Sir':
     $c= 'Sirach';
     break;
case'Mo':
     $c= 'Mose';
     break;
case'Jos':
     $c= 'Josua';
     break;
case'Ri':
     $c= 'Richter';
     break;
case'Rut':
     $c= 'Rut';
     break;
case'Sam':
     $c= 'Samuel';
     break;
case'K&ouml;n':
     $c= 'K&ouml;nige';
     break;
case'Chr':
     $c= 'Chronik';
     break;
case'Esr':
     $c= 'Esra';
     break;
case'Neh':
     $c= 'Nehemia';
     break;
case'Est':
     $c= 'Esther';
     break;
case'Hiob':
     $c= 'Hiob';
     break;
case'Hi':
     $c= 'Hiob';
     break;
case'Ps':
     $c= 'Psalm';
     break;
case'Spr':
     $c= 'Spr&uuml;che';
     break;
case'Pred':
     $c= 'Prediger';
     break;
case'Hld':
     $c= 'Hoheslied';
     break;
case'Jes':
     $c= 'Jesaja';
     break;
case'Jer':
     $c= 'Jeremia';
     break;
case'Kla':
     $c= 'Klagelieder';
     break;
case'Klgl':
     $c= 'Klagelieder';
     break;
case'Hes':
     $c= 'Hesekiel';
     break;
case'Dan':
     $c= 'Daniel';
     break;
case'Hos':
     $c= 'Hosea';
     break;
case'Joel':
     $c= 'Joel';
     break;
case'Am':
     $c= 'Amos';
     break;
case'Obd':
     $c= 'Obadja';
     break;
case'Jona':
     $c= 'Jona';
     break;
case'Mi':
     $c= 'Micha';
     break;
case'Nah':
     $c= 'Nahum';
     break;
case'Hab':
     $c= 'Habakuk';
     break;
case'Zef':
     $c= 'Zefanja';
     break;
case'Hag':
     $c= 'Haggai';
     break;
case'Sach':
     $c= 'Sacharja';
     break;
case'Mal':
     $c= 'Maleachi';
     break;
case'Tob':
     $c= 'Tobias';
     break;
case'Mt':
     $c= 'Matth&auml;us';
     break;
case'Mk':
     $c= 'Markus';
     break;
case'Lk':
     $c= 'Lukas';
     break;
case'Luk':
     $c= 'Lukas';
     break;
case'Joh':
     $c= 'Johannes';
     break;
case'Jh':
     $c= 'Johannes';
     break;
case'Apg':
     $c= 'Apostelgeschichte';
     break;
case'R&ouml;m':
     $c= 'R&ouml;mer';
     break;
case'Rom':
     $c= 'R&ouml;mer';
     break;
case'Kor':
     $c= 'Korinther';
     break;
case'Gal':
     $c= 'Galater';
     break;
case'Eph':
     $c= 'Epheser';
     break;
case'Phil':
     $c= 'Philipper';
     break;
case'Kol':
     $c= 'Kolosser';
     break;
case'Thess':
     $c= 'Thessalonicher';
     break;
case'Tim':
     $c= 'Timotheus';
     break;
case'Tit':
     $c= 'Titus';
     break;
case'Phlm':
     $c= 'Philemon';
     break;
case'Ptr':
     $c= 'Petrus';
     break;
case'Petr':
     $c= 'Petrus';
     break;
case'Hbr':
     $c= 'Hebr&auml;er';
     break;
case'Hebr':
     $c= 'Hebr&auml;er';
     break;
case'Jak':
     $c= 'Jakobus';
     break;
case'Jk':
     $c= 'Jakobus';
     break;
case'Jud':
     $c= 'Judas';
     break;
case'Offb':
     $c= 'Offenbarung';
     break;
case'Off':
     $c= 'Offenbarung';
     break;
}

#  $a=trim($a);
  if($a !=""){$a=$a.".";} // nach der Zahl noch der Punkt hinzufügen
  if($a != ""){$a=$a." ";$b="";} // nach dem Punkt ein Leerzeichen, B kann dann entfallen
  if($d ==""){$d=" ";}
  #return sprintf('<a href="http://www.bibleserver.com/go.php?lang={de}&bible={LUT84}&ref=%s" target="_blank">%s</a>',  $a.$b.$c.$d.$e.$f.$g.$h, $a.$b.$c.$d.$e.$f.$g.$h);
  return $a.$b.$c.$d.$e.$f.$g.$h;
}
##################Function Ende####################################



###################################################################
$res1 = $db->query("SELECT bezeichnung FROM kategorie WHERE kid='$row[kid]'");
$row1 = $res1->fetch_array();

$res2 = $db->query("SELECT bezeichnung FROM unterkategorie WHERE ukid='$row[ukid]'");
$row2 = $res2->fetch_array();

$res3 = $db->query("SELECT bezeichnung FROM thema WHERE tid='$row[thema]'");
$row3 = $res3->fetch_array();

$res6 = $db->query("SELECT bezeichnung FROM unterthema WHERE tid='$row[thema]' AND utid='$row[unterthema]'");
$row6 = $res6->fetch_array();

$res7 = $db->query("SELECT notiz FROM notizen WHERE lid='$lid' AND user='$user_admin'");
$row7 = $res7->fetch_array();


$textwort = strip_tags($row['textwort'], '<br>,<strong>,<ul>,<li>,<ol>');
$textwort = str_replace('"', '\"', $textwort);
$textwort=preg_replace_callback("/([0-9]*)(\s*)(Sir|Mo|Jos|Ri|Rut|Sam|K&ouml;n|Chr|Esr|Neh|Est|Hiob|Ps|Spr|Pred|Hld|Jes|Jer|Kla|Klgl|Hes|Dan|Hos|Joel|Am|Obd|Jona|Mi|Nah|Hab|Zef|Hag|Sach|Mal|Tob|Mt|Mk|Lk|Luk|Joh|Jh|Apg|R&ouml;m|Rom|Kor|Gal|Eph|Phil|Kol|Thess|Tim|Tit|Phlm|Ptr|Petr|Joh|Hbr|Hebr|Jak|Jk|Jud|Offb|Off)(\s*)".
                    "([0-9]{1,3})(\,)?\s*(aus)?\s*([0-9]{0,3})/", function($m) use (&$lid) { return refill($m[1], $m[2], $m[3], $m[4], $m[5], $m[6], $m[7], $m[8], $m[9], $lid);}, $textwort);
#$textwort = preg_replace('/([0-9][0-9]?\.\s*)?(Sirach|Mose|Josua|Richter|Rut|Samuel|K&ouml;nige|Chronik|Esra|Nehemia|Esther|Hiob|Psalm|Spr&uuml;che|Prediger|Hoheslied|Jesaja|Jeremia|Klagelieder|Hesekiel|Daniel|Hosea|Joel|Amos|Tobias|Obadja|Jona|Micha|Nahum|Habakuk|Zefanja|Haggai|Sacharja|Maleachi|Matth&auml;us|Markus|Lukas|Johannes|Apostelgeschichte|R&ouml;mer|Korinther|Galater|Epheser|Philipper|Kolosser|Thessalonicher|Timotheus|Titus|Philemon|Hebr&auml;er|Jakobus|Petrus|Judas|Offenbarung)(\s*[0-9]{1,3}\s*)(,)?(\s*aus|Vers)?(\s*[0-9]{0,2})?/', makeLink("$1", "$2", "$3", "$4", "$5", "$6"), $textwort);
$textwort =preg_replace_callback("/([0-9][0-9]?\.\s*)?(Makkab&auml;er|Johannes|Mose|K&ouml;nige|Chronik|Korinther|Samuel|Thessalonicher|Timotheus|Petrus|Gebet Manasses|St&uuml;cke zu Daniel|St&uuml;cke zu Ester|Baruch|Weisheit|Judit|Judith|Sirach|Josua|Richter|Rut|Ruth|Esra|Nehemia|Esther|Ester|Hiob|Ijob|Psalm|Spr&uuml;che|Prediger|Hoheslied|Jesaja|Jeremia|Klagelieder|Hesekiel|Ezechiel|Daniel|Hosea|Joel|Amos|Tobias|Obadja|Jona|Micha|Nahum|Habakuk|Zefanja|Haggai|Sacharja|Maleachi|Matth&auml;us|Markus|Lukas|Apostelgeschichte|R&ouml;mer|Galater|Epheser|Philipper|Kolosser|Titus|Hebr&auml;er|Jakobus|Offenbarung|Philemon|Judas)(\s*[0-9]{1,3})(,\s*)?(\s*aus\s*|\s*Verse\s*|\s*Vers\s*)?([0-9]{0,3})?(\s*\-\s*|\s*\.\s*)?([0-9]{0,3})?/", function($m) use (&$lid) { return makeLink($m[1], $m[2], $m[3], $m[4], $m[5], $m[6], $m[7], $m[8], $lid);}, $textwort);

$textwort = str_replace (array("<ul>", chr(10), "<ol>"), array("</div><div align='justify'><ul type='square'>","", "</div><div align='justify'><ol>"), $textwort);
$textwort = str_replace (array("<br style=\"\" />", "&middot;", "&nbsp;", "&lt;", "&gt;", "&quot;", "&bdquo;", "&ldquo;", "&sbquo;", "&lsquo;", "&laquo;", "&raquo;", "&bull;")
                       , array("", chr(183), " ",  chr(60),chr(62),chr(34),chr(132), chr(148), "'", "'", chr(174), chr(175), chr(149))
                       , $textwort
                        );
$textwort = trim($textwort);

$botschaft = strip_tags($row['botschaft'], '<br>,<strong>,<ul>,<li>,<ol>');
$botschaft = str_replace('"', '\"', $botschaft);
$botschaft = preg_replace_callback("/([0-9]*)(\s*)(Sir|Mo|Jos|Ri|Rut|Sam|K&ouml;n|Chr|Esr|Neh|Est|Hiob|Ps|Spr|Pred|Hld|Jes|Jer|Kla|Klgl|Hes|Dan|Hos|Joel|Am|Obd|Jona|Mi|Nah|Hab|Zef|Hag|Sach|Mal|Tob|Mt|Mk|Lk|Luk|Joh|Jh|Apg|R&ouml;m|Rom|Kor|Gal|Eph|Phil|Kol|Thess|Tim|Tit|Phlm|Ptr|Petr|Joh|Hbr|Hebr|Jak|Jk|Jud|Offb|Off)(\s*)".
                    "([0-9]{1,3})(\,)?\s*(aus)?\s*([0-9]{0,3})/", function($m) use (&$lid) { return refill($m[1], $m[2], $m[3], $m[4], $m[5], $m[6], $m[7], $m[8], $m[9], $lid);}, $botschaft);
                   
                         
#$botschaft = preg_replace('/([0-9][0-9]?\.\s*)?(Sirach|Mose|Josua|Richter|Rut|Samuel|K&ouml;nige|Chronik|Esra|Nehemia|Esther|Hiob|Psalm|Spr&uuml;che|Prediger|Hoheslied|Jesaja|Jeremia|Klagelieder|Hesekiel|Daniel|Hosea|Joel|Amos|Tobias|Obadja|Jona|Micha|Nahum|Habakuk|Zefanja|Haggai|Sacharja|Maleachi|Matth&auml;us|Markus|Lukas|Johannes|Apostelgeschichte|R&ouml;mer|Korinther|Galater|Epheser|Philipper|Kolosser|Thessalonicher|Timotheus|Titus|Philemon|Hebr&auml;er|Jakobus|Petrus|Judas|Offenbarung)(\s*[0-9]{1,3}\s*)(,)?(\s*aus|Vers)?(\s*[0-9]{0,2})?/', makeLink("$1", "$2", "$3", "$4", "$5", "$6"), $botschaft);

$botschaft =preg_replace_callback("/([0-9][0-9]?\.\s*)?(Makkab&auml;er|Johannes|Mose|K&ouml;nige|Chronik|Korinther|Samuel|Thessalonicher|Timotheus|Petrus|Gebet Manasses|St&uuml;cke zu Daniel|St&uuml;cke zu Ester|Baruch|Weisheit|Judit|Judith|Sirach|Josua|Richter|Rut|Ruth|Esra|Nehemia|Esther|Ester|Hiob|Ijob|Psalm|Spr&uuml;che|Prediger|Hoheslied|Jesaja|Jeremia|Klagelieder|Hesekiel|Ezechiel|Daniel|Hosea|Joel|Amos|Tobias|Obadja|Jona|Micha|Nahum|Habakuk|Zefanja|Haggai|Sacharja|Maleachi|Matth&auml;us|Markus|Lukas|Apostelgeschichte|R&ouml;mer|Galater|Epheser|Philipper|Kolosser|Titus|Hebr&auml;er|Jakobus|Offenbarung|Philemon|Judas)(\s*[0-9]{1,3})(,\s*)?(\s*aus\s*|\s*Verse\s*|\s*Vers\s*)?([0-9]{0,3})?(\s*\-\s*|\s*\.\s*)?([0-9]{0,3})?/", function($m) use (&$lid) { return makeLink($m[1], $m[2], $m[3], $m[4], $m[5], $m[6], $m[7], $m[8], $lid);}, $botschaft);

$botschaft = str_replace (array("<ul>", chr(10), "<ol>"), array("</div><div align='justify'><ul type='square'>","", "</div><div align='justify'><ol>"), $botschaft);

$inhalt = strip_tags($row['inhalt'], '<br>,<strong>,<ul>,<li>,<ol>,<a>,<table>,<tr>,<td>,<h1>,<h2>,<h3>,<img>');
#$inhalt = str_replace('"', '\"', $inhalt);
$inhalt = preg_replace_callback("/([0-9]*)(\s*)(Sir|Mo|Jos|Ri|Rut|Sam|K&ouml;n|Chr|Esr|Neh|Est|Hiob|Ps|Spr|Pred|Hld|Jes|Jer|Kla|Klgl|Hes|Dan|Hos|Joel|Am|Obd|Jona|Mi|Nah|Hab|Zef|Hag|Sach|Mal|Tob|Mt|Mk|Lk|Luk|Joh|Jh|Apg|R&ouml;m|Rom|Kor|Gal|Eph|Phil|Kol|Thess|Tim|Tit|Phlm|Ptr|Petr|Joh|Hbr|Hebr|Jak|Jk|Jud|Offb|Off)(\s*)".
                    "([0-9]{1,3})(\,)?\s*(aus)?\s*([0-9]{0,3})/", function($m) use (&$lid) { return refill($m[1], $m[2], $m[3], $m[4], $m[5], $m[6], $m[7], $m[8], $m[9], $lid);}, $inhalt);
  
                    
$inhalt =preg_replace_callback("/([0-9][0-9]?\.\s*)?(Makkab&auml;er|Johannes|Mose|K&ouml;nige|Chronik|Korinther|Samuel|Thessalonicher|Timotheus|Petrus|Gebet Manasses|St&uuml;cke zu Daniel|St&uuml;cke zu Ester|Baruch|Weisheit|Judit|Judith|Sirach|Josua|Richter|Rut|Ruth|Esra|Nehemia|Esther|Ester|Hiob|Ijob|Psalm|Spr&uuml;che|Prediger|Hoheslied|Jesaja|Jeremia|Klagelieder|Hesekiel|Ezechiel|Daniel|Hosea|Joel|Amos|Tobias|Obadja|Jona|Micha|Nahum|Habakuk|Zefanja|Haggai|Sacharja|Maleachi|Matth&auml;us|Markus|Lukas|Apostelgeschichte|R&ouml;mer|Galater|Epheser|Philipper|Kolosser|Titus|Hebr&auml;er|Jakobus|Offenbarung|Philemon|Judas)(\s*[0-9]{1,3})(,\s*)?(\s*aus\s*|\s*Verse\s*|\s*Vers\s*)?([0-9]{0,3})?(\s*\-\s*|\s*\.\s*)?([0-9]{0,3})?/", function($m) use (&$lid) { return makeLink($m[1], $m[2], $m[3], $m[4], $m[5], $m[6], $m[7], $m[8], $lid);}, $inhalt);
#$inhalt = str_replace (array("<ul>", chr(10)), array("</div><div align='justify'><ul type='square'>",""), $inhalt);
#$inhalt = str_replace (array("<ul>", chr(10), "<ol>"), array("</div><div align='justify'><ul type='square'>","", "</div><div align='justify'><ol>"), $inhalt);
$inhalt = str_replace (array("<br style=\"\" />", "&middot;", "&nbsp;", "&lt;", "&gt;", "&quot;", "&bdquo;", "&ldquo;", "&sbquo;", "&lsquo;", "&laquo;", "&raquo;", "&bull;")
                       , array("", chr(183), " ",  chr(60),chr(62),chr(34),chr(132), chr(148), "'", "'", chr(174), chr(175), chr(149))
                       , $inhalt
                        );

$zusammenfassung = strip_tags($row['zusammenfassung'], '<br>,<strong>,<ul>,<li>,<ol>');
$zusammenfassung = str_replace('"', '\"', $zusammenfassung);
$zusammenfassung =preg_replace_callback("/([0-9]*)(\s*)(Sir|Mo|Jos|Ri|Rut|Sam|K&ouml;n|Chr|Esr|Neh|Est|Hiob|Ps|Spr|Pred|Hld|Jes|Jer|Kla|Klgl|Hes|Dan|Hos|Joel|Am|Obd|Jona|Mi|Nah|Hab|Zef|Hag|Sach|Mal|Tob|Mt|Mk|Lk|Luk|Joh|Jh|Apg|R&ouml;m|Rom|Kor|Gal|Eph|Phil|Kol|Thess|Tim|Tit|Phlm|Ptr|Petr|Joh|Hbr|Hebr|Jak|Jk|Jud|Offb|Off)(\s*)".
                                "([0-9]{1,3})(\,)?\s*(aus)?\s*([0-9]{0,3})/", function($m) use (&$lid) { return refill($m[1], $m[2], $m[3], $m[4], $m[5], $m[6], $m[7], $m[8], $m[9], $lid);}, $zusammenfassung);
$#zusammenfassung = preg_replace('/([0-9][0-9]?\.\s*)?(Sirach|Mose|Josua|Richter|Rut|Samuel|K&ouml;nige|Chronik|Esra|Nehemia|Esther|Hiob|Psalm|Spr&uuml;che|Prediger|Hoheslied|Jesaja|Jeremia|Klagelieder|Hesekiel|Daniel|Hosea|Joel|Amos|Tobias|Obadja|Jona|Micha|Nahum|Habakuk|Zefanja|Haggai|Sacharja|Maleachi|Matth&auml;us|Markus|Lukas|Johannes|Apostelgeschichte|R&ouml;mer|Korinther|Galater|Epheser|Philipper|Kolosser|Thessalonicher|Timotheus|Titus|Philemon|Hebr&auml;er|Jakobus|Petrus|Judas|Offenbarung)(\s*[0-9]{1,3}\s*)(,)?(\s*aus|Vers)?(\s*[0-9]{0,2})?/', makeLink("$1", "$2", "$3", "$4", "$5", "$6"), $zusammenfassung);
$zusammenfassung=preg_replace_callback("/([0-9][0-9]?\.\s*)?(Makkab&auml;er|Johannes|Mose|K&ouml;nige|Chronik|Korinther|Samuel|Thessalonicher|Timotheus|Petrus|Gebet Manasses|St&uuml;cke zu Daniel|St&uuml;cke zu Ester|Baruch|Weisheit|Judit|Judith|Sirach|Josua|Richter|Rut|Ruth|Esra|Nehemia|Esther|Ester|Hiob|Ijob|Psalm|Spr&uuml;che|Prediger|Hoheslied|Jesaja|Jeremia|Klagelieder|Hesekiel|Ezechiel|Daniel|Hosea|Joel|Amos|Tobias|Obadja|Jona|Micha|Nahum|Habakuk|Zefanja|Haggai|Sacharja|Maleachi|Matth&auml;us|Markus|Lukas|Apostelgeschichte|R&ouml;mer|Galater|Epheser|Philipper|Kolosser|Titus|Hebr&auml;er|Jakobus|Offenbarung|Philemon|Judas)(\s*[0-9]{1,3})(,\s*)?(\s*aus\s*|\s*Verse\s*|\s*Vers\s*)?([0-9]{0,3})?(\s*\-\s*|\s*\.\s*)?([0-9]{0,3})?/", function($m) use (&$lid) { return makeLink($m[1], $m[2], $m[3], $m[4], $m[5], $m[6], $m[7], $m[8], $lid);}, $zusammenfassung);
#$zusammenfassung = str_replace (array("<ul>"), array("<ul type='disc'>"), $zusammenfassung);
$zusammenfassung = str_replace (array("<br style=\"\" />", "&middot;", "&nbsp;", "&lt;", "&gt;", "&quot;", "&bdquo;", "&ldquo;", "&sbquo;", "&lsquo;", "&laquo;", "&raquo;", "&bull;")
                       , array("", chr(183), " ",  chr(60),chr(62),chr(34),chr(132), chr(148), "'", "'", chr(174), chr(175), chr(149))
                       , $zusammenfassung
                        );

$kontext = strip_tags($row['kontext'], '<br>,<strong>,<ul>,<li>,<ol>');
$kontext = str_replace('"', '\"', $kontext);
$kontext=preg_replace_callback("/([0-9]*)(\s*)(Sir|Mo|Jos|Ri|Rut|Sam|K&ouml;n|Chr|Esr|Neh|Est|Hiob|Ps|Spr|Pred|Hld|Jes|Jer|Kla|Klgl|Hes|Dan|Hos|Joel|Am|Obd|Jona|Mi|Nah|Hab|Zef|Hag|Sach|Mal|Tob|Mt|Mk|Lk|Luk|Joh|Jh|Apg|R&ouml;m|Rom|Kor|Gal|Eph|Phil|Kol|Thess|Tim|Tit|Phlm|Ptr|Petr|Joh|Hbr|Hebr|Jak|Jk|Jud|Offb|Off)(\s*)".
                    "([0-9]{1,3})(\,)?\s*(aus)?\s*([0-9]{0,3})/", function($m) use (&$lid) { return refill($m[1], $m[2], $m[3], $m[4], $m[5], $m[6], $m[7], $m[8], $m[9], $lid);}, $kontext);
#$kontext = preg_replace('/([0-9][0-9]?\.\s*)?(Sirach|Mose|Josua|Richter|Rut|Samuel|K&ouml;nige|Chronik|Esra|Nehemia|Esther|Hiob|Psalm|Spr&uuml;che|Prediger|Hoheslied|Jesaja|Jeremia|Klagelieder|Hesekiel|Daniel|Hosea|Joel|Amos|Tobias|Obadja|Jona|Micha|Nahum|Habakuk|Zefanja|Haggai|Sacharja|Maleachi|Matth&auml;us|Markus|Lukas|Johannes|Apostelgeschichte|R&ouml;mer|Korinther|Galater|Epheser|Philipper|Kolosser|Thessalonicher|Timotheus|Titus|Philemon|Hebr&auml;er|Jakobus|Petrus|Judas|Offenbarung)(\s*[0-9]{1,3}\s*)(,)?(\s*aus|Vers)?(\s*[0-9]{0,2})?/', makeLink("$1", "$2", "$3", "$4", "$5", "$6"), $kontext);
$kontext=preg_replace_callback("/([0-9][0-9]?\.\s*)?(Makkab&auml;er|Johannes|Mose|K&ouml;nige|Chronik|Korinther|Samuel|Thessalonicher|Timotheus|Petrus|Gebet Manasses|St&uuml;cke zu Daniel|St&uuml;cke zu Ester|Baruch|Weisheit|Judit|Judith|Sirach|Josua|Richter|Rut|Ruth|Esra|Nehemia|Esther|Ester|Hiob|Ijob|Psalm|Spr&uuml;che|Prediger|Hoheslied|Jesaja|Jeremia|Klagelieder|Hesekiel|Ezechiel|Daniel|Hosea|Joel|Amos|Tobias|Obadja|Jona|Micha|Nahum|Habakuk|Zefanja|Haggai|Sacharja|Maleachi|Matth&auml;us|Markus|Lukas|Apostelgeschichte|R&ouml;mer|Galater|Epheser|Philipper|Kolosser|Titus|Hebr&auml;er|Jakobus|Offenbarung|Philemon|Judas)(\s*[0-9]{1,3})(,\s*)?(\s*aus\s*|\s*Verse\s*|\s*Vers\s*)?([0-9]{0,3})?(\s*\-\s*|\s*\.\s*)?([0-9]{0,3})?/", function($m) use (&$lid) { return makeLink($m[1], $m[2], $m[3], $m[4], $m[5], $m[6], $m[7], $m[8], $lid);}, $kontext);
$kontext = str_replace (array("<ul>", chr(10), "<ol>"), array("</div><div align='justify'><ul type='square'>","", "</div><div align='justify'><ol>"), $kontext);
$kontext = str_replace (array("<br style=\"\" />", "&middot;", "&nbsp;", "&lt;", "&gt;", "&quot;", "&bdquo;", "&ldquo;", "&sbquo;", "&lsquo;", "&laquo;", "&raquo;", "&bull;")
                       , array("", chr(183), " ",  chr(60),chr(62),chr(34),chr(132), chr(148), "'", "'", chr(174), chr(175), chr(149))
                       , $kontext
                        );
                        
$notiz = strip_tags($row7['notiz'], '<p>,<br>,<strong>,<ul>,<li>,<ol>');
$notiz = str_replace('"', '\"', $notiz);
$notiz=preg_replace_callback("/([0-9]*)(\s*)(Sir|Mo|Jos|Ri|Rut|Sam|K&ouml;n|Chr|Esr|Neh|Est|Hiob|Ps|Spr|Pred|Hld|Jes|Jer|Kla|Klgl|Hes|Dan|Hos|Joel|Am|Obd|Jona|Mi|Nah|Hab|Zef|Hag|Sach|Mal|Tob|Mt|Mk|Lk|Luk|Joh|Jh|Apg|R&ouml;m|Rom|Kor|Gal|Eph|Phil|Kol|Thess|Tim|Tit|Phlm|Ptr|Petr|Joh|Hbr|Hebr|Jak|Jk|Jud|Offb|Off)(\s*)".
                    "([0-9]{1,3})(\,)?\s*(aus)?\s*([0-9]{0,3})/", function($m) use (&$lid) { return refill($m[1], $m[2], $m[3], $m[4], $m[5], $m[6], $m[7], $m[8], $m[9], $lid);}, $notiz);
#$notiz = preg_replace('/([0-9][0-9]?\.\s*)?(Sirach|Mose|Josua|Richter|Rut|Samuel|K&ouml;nige|Chronik|Esra|Nehemia|Esther|Hiob|Psalm|Spr&uuml;che|Prediger|Hoheslied|Jesaja|Jeremia|Klagelieder|Hesekiel|Daniel|Hosea|Joel|Amos|Tobias|Obadja|Jona|Micha|Nahum|Habakuk|Zefanja|Haggai|Sacharja|Maleachi|Matth&auml;us|Markus|Lukas|Johannes|Apostelgeschichte|R&ouml;mer|Korinther|Galater|Epheser|Philipper|Kolosser|Thessalonicher|Timotheus|Titus|Philemon|Hebr&auml;er|Jakobus|Petrus|Judas|Offenbarung)(\s*[0-9]{1,3}\s*)(,)?(\s*aus|Vers)?(\s*[0-9]{0,2})?/', makeLink("$1", "$2", "$3", "$4", "$5", "$6"), $notiz);
$notiz=preg_replace_callback("/([0-9][0-9]?\.\s*)?(Makkab&auml;er|Johannes|Mose|K&ouml;nige|Chronik|Korinther|Samuel|Thessalonicher|Timotheus|Petrus|Gebet Manasses|St&uuml;cke zu Daniel|St&uuml;cke zu Ester|Baruch|Weisheit|Judit|Judith|Sirach|Josua|Richter|Rut|Ruth|Esra|Nehemia|Esther|Ester|Hiob|Ijob|Psalm|Spr&uuml;che|Prediger|Hoheslied|Jesaja|Jeremia|Klagelieder|Hesekiel|Ezechiel|Daniel|Hosea|Joel|Amos|Tobias|Obadja|Jona|Micha|Nahum|Habakuk|Zefanja|Haggai|Sacharja|Maleachi|Matth&auml;us|Markus|Lukas|Apostelgeschichte|R&ouml;mer|Galater|Epheser|Philipper|Kolosser|Titus|Hebr&auml;er|Jakobus|Offenbarung|Philemon|Judas)(\s*[0-9]{1,3})(,\s*)?(\s*aus\s*|\s*Verse\s*|\s*Vers\s*)?([0-9]{0,3})?(\s*\-\s*|\s*\.\s*)?([0-9]{0,3})?/", function($m) use (&$lid) { return makeLink($m[1], $m[2], $m[3], $m[4], $m[5], $m[6], $m[7], $m[8], $lid);}, $notiz);
$notiz = str_replace (array("<ul>", chr(10), "<ol>"), array("</div><div align='justify'><ul type='square'>","", "</div><div align='justify'><ol>"), $notiz);
$notiz = str_replace (array("<br style=\"\" />", "&middot;", "&nbsp;", "&lt;", "&gt;", "&quot;", "&bdquo;", "&ldquo;", "&sbquo;", "&lsquo;", "&laquo;", "&raquo;", "&bull;")
                       , array("", chr(183), " ",  chr(60),chr(62),chr(34),chr(132), chr(148), "'", "'", chr(174), chr(175), chr(149))
                       , $notiz
                        );


$wochentag = date("l", mktime(0,0,0,$row['monat'],$row['tag'],$row['jahr']));

if($wochentag == 'Wednesday' AND $row_gd['wgd'] != '0' AND ($row['ukid'] == '1')){  // Hintergrund kommt aus der wort_wahl.php. Es gibt einige Gottesdienste, die auf einen Mittwoch fallen (1. vom Monat) aber kein Tag addiert werden darf, daher: Wann muss ein Tag (faktor) addiert werden, generell, wenn Wochengottesdienst, wenn Faktor im Profil != 0 und wenn unterkategorie 1 (GD normal) ist. Bei allen anderen Gottesdiensten bleibt der Mittwoch erhalten. (Buß und Bettag ist Mittwoch, Erntedank bleibt auch am 1. des Monats)
  $datum = date("d.m.Y", mktime(0,0,0,$row['monat'],$row['tag']+$row_gd['wgd'],$row['jahr']));
  $wochentag = date("l", mktime(0,0,0,$row['monat'],$row['tag']+$row_gd['wgd'],$row['jahr']));
}else{
  $wochentag = date("l", mktime(0,0,0,$row['monat'],$row['tag'],$row['jahr']));
  $datum = date("d.m.Y", mktime(0,0,0,$row['monat'],$row['tag'],$row['jahr']));
}

switch($wochentag)
{
  case 'Sunday':
      $wochentag = "So.";
      break;
  case 'Monday':
      $wochentag = "Mo.";
      break;
  case 'Tuesday':
      $wochentag = "Di.";
      break;
  case 'Wednesday':
      $wochentag = "Mi.";
      break;
  case 'Thursday':
      $wochentag = "Do.";
      break;
  case 'Friday':
      $wochentag = "Fr.";
      break;
  case 'Saturday':
      $wochentag = "Sa.";
      break;
}

###################################################################





##################Header#########################################
$inhalt_fin .= "<style type='text/css'>
                 td { border:0.3px solid black; }
                 body { font-size: 11px;  }
                 table { font-size: 11px;  }
                 p { font-size: 11px;  }
                 ul {list-style-image: url(./html2pdf_v4.03/ul.png);}
                 li {list-style-image: url(./html2pdf_v4.03/ul.png);}
                 ol {list-style-image: url(./html2pdf_v4.03/ul.png);}
                 table.page_footer {width: 100%; border: none; padding: 20mm}
                 .fcol{color: #0C25BF;}
                </style>";
                
$inhalt_fin .="<page_footer><table border=0 class='page_footer'><tr><td style='width: 680; text-align: center;' border=0 ><i>[[page_cu]]/[[page_nb]]</i></td></tr></table></page_footer>";

$inhalt_fin .="	<table border=0.3  cellspacing=0>
                  <tr>
                    <td width='80'>Datum:</td>
                    <td width='600'>$wochentag $datum</td>
                  </tr>
                  <tr>
                    <td width='80'>Überschrift:</td>
                    <td width='600'>$row[ueberschrift]</td>
                  </tr>
                  <tr>
                    <td width='80'>Textstelle:</td>
                    <td width='600'>$row[textstelle]</td>
                  </tr>
                  <tr>
                    <td width='80'>Textwort:</td>
                    <td width='600'>$textwort</td>
                  </tr>";

$res4 = $db->query("SELECT count(*) Anz
                      FROM lieder_quelle
                     WHERE lid=$lid");
$row4 = $res4->fetch_array();

if($row4['Anz'] > 0){
              $inhalt_fin .= "
                  <tr>
                    <td width='80'>Lieder:</td>
                    <td width='600'>";
              $inhalt_fin .= "<table border=0>";

              $query = "SELECT gbid, vorname, nachname 
                          FROM lieder_quelle, admin 
                         WHERE art='el' 
                           AND lid=$lid 
                           AND lieder_quelle.user = admin.user 
                         ORDER BY gbid";
              $result4 = $db->query( $query)
                         or die ("Cannot execute query");
              $zaehler1=0;

              while ($row4 = $result4->fetch_array()){
                $result2 = $db->query("SELECT nr, titel FROM lieder WHERE gbid=$row4[gbid] LIMIT 1");
                $row5 = $result2->fetch_array();

                
		$EL = "$row5[nr] - $row5[titel] ";
                $inhalt_fin .= "<tr>";

                if($zaehler1==0){
                 $inhalt_fin .= "<td border=0>Eingangslied:</td>";
                 $zaehler1=1;
                }else{
                 $inhalt_fin .= "<td border=0>&nbsp;</td>";
                }

                $inhalt_fin .= "<td border=0>$EL</td>";
                $inhalt_fin .= "</tr>";
              }
              
              $query = "SELECT gbid, vorname, nachname 
                          FROM lieder_quelle, admin 
                         WHERE art='bl' 
                           AND lid=$lid 
                           AND lieder_quelle.user = admin.user 
                         ORDER BY gbid";
              $result4 = $db->query( $query)
                         or die ("Cannot execute query");
              $zaehler1=0;

              while ($row4 = $result4->fetch_array()){
                $result2 = $db->query("SELECT nr, titel FROM lieder WHERE gbid=$row4[gbid] LIMIT 1");
                $row5 = $result2->fetch_array();

		$BL = "$row5[nr] - $row5[titel] ";
                $inhalt_fin .= "<tr>";

                if($zaehler1==0){
                 $inhalt_fin .= "<td border=0>Bußlied:</td>";
                 $zaehler1=1;
                }else{
                 $inhalt_fin .= "<td border=0>&nbsp;</td>";
                }

                $inhalt_fin .= "<td border=0>$BL</td>";
                $inhalt_fin .= "</tr>";
              }
              
              $query = "SELECT gbid, vorname, nachname 
                          FROM lieder_quelle, admin 
                         WHERE art='al' 
                           AND lid=$lid 
                           AND lieder_quelle.user = admin.user 
                         ORDER BY gbid";
              $result4 = $db->query( $query)
                         or die ("Cannot execute query");
              $zaehler1=0;

              while ($row4 = $result4->fetch_array()){
                $result2 = $db->query("SELECT nr, titel FROM lieder WHERE gbid=$row4[gbid] LIMIT 1");
                $row5 = $result2->fetch_array();

		$AL = "$row5[nr] - $row5[titel] ";
                $inhalt_fin .= "<tr>";

                if($zaehler1==0){
                 $inhalt_fin .= "<td border=0>Abendmahlslied:</td>";
                 $zaehler1=1;
                }else{
                 $inhalt_fin .= "<td border=0>&nbsp;</td>";
                }

                $inhalt_fin .= "<td border=0>$AL</td>";
                $inhalt_fin .= "</tr>";
              }
              
              $query = "SELECT gbid, vorname, nachname 
                          FROM lieder_quelle, admin 
                         WHERE art='wl' 
                           AND lid=$lid 
                           AND lieder_quelle.user = admin.user 
                         ORDER BY gbid";
              $result4 = $db->query( $query)
                         or die ("Cannot execute query");
              $zaehler1=0;

              while ($row4 = $result4->fetch_array()){
                $result2 = $db->query("SELECT nr, titel FROM lieder WHERE gbid=$row4[gbid] LIMIT 1");
                $row5 = $result2->fetch_array();
		$WL = "$row5[nr] - $row5[titel] ";
                $inhalt_fin .= "<tr>";

                if($zaehler1==0){
                 $inhalt_fin .= "<td border=0>Weitere Lieder:</td>";
                 $zaehler1=1;
                }else{
                 $inhalt_fin .= "<td border=0>&nbsp;</td>";
                }

                $inhalt_fin .= "<td border=0>$WL</td>";
                $inhalt_fin .= "</tr>";
              }
              

              $inhalt_fin .= "</table>";
              $inhalt_fin .= "</td>
                  </tr>";
   } // ende wenn keine Lieder vorhanden sind               
                  if($row2['bezeichnung']!=""){ # Wenn keine Unterkategorie, dann auch kei Schrägstrich nach Kategorie
                   $trennzeichen  = "/";
                  } else{
                   $trennzeichen  = "";
                  }

$inhalt_fin .= "
                  <tr>
                    <td width='80'>Kategorie:</td>
                    <td width='600'>$row1[bezeichnung] $trennzeichen $row2[bezeichnung]</td>
                  </tr>";
if($row3['bezeichnung'] != ''){
                  if($row6['bezeichnung']!=""){ # Wenn keine Unterkategorie, dann auch kei Schrägstrich nach Kategorie
                   $trennzeichen2  = "/";
                  } else{
                   $trennzeichen2  = "";
                  }
  $inhalt_fin .= "
                  <tr>
                    <td width='80'>
                      Thema:
                    </td>
                    <td width='600'>
                      $row3[bezeichnung] $trennzeichen2 $row6[bezeichnung]
                    </td>
                  </tr>";
}
  $inhalt_fin .= "
                </table>
               ";

##################Header Ende####################################

##################Botschaft #####################################
if ($lg_datum >= $switch_date){ # neue LG?
 if($row['botschaft'] != ''){
  $inhalt_fin .= "<span class='fcol'><b>Botschaft:</b></span><br>".$botschaft;
 }
}
##################Botschaft Ende ################################

##################Inhalt ###########################################
$inhalt_fin .= "<br><br><span class='fcol'><b>Ausführungen:</b></span><br>".$inhalt;
##################Inhalt Ende ######################################

##################Zusammenfassung ##################################
if ($lg_datum >= $switch_date){ # neue LG?
 if($row['zusammenfassung'] != ''){
  $inhalt_fin .= "<br><br><span class='fcol'><b>Zusammenfassung:</b></span><br>".$zusammenfassung;
 }
}
##################Zusammenfassung Ende #############################


##################Kontext ##########################################
if ($lg_datum >= $switch_date){ # neue LG?
 if($row['kontext'] != ''){
  $inhalt_fin .= "<br><br><span class='fcol'><b>Kontext:</b></span><br>".$kontext;
 }
}
##################Kontext Ende ######################################


##################Notiz #############################################
if($row7['notiz'] != ''){
  $inhalt_fin .= "<br><br><span class='fcol'><b>Notizen:</b></span><br>".$notiz;
}
##################Notiz Ende ########################################
#$inhalt_fin .= "</page>";

    require_once(dirname(__FILE__).'/html2pdf_v4.03/html2pdf.class.php');
    $inhalt_fin = '<page backtop="0mm" backbottom="10mm" style="font-size: 11pt" style="font-family: freeserif">'.nl2br($inhalt_fin).'</page>';
#echo $inhalt_fin;
#exit;
    try
    {
  
#/*
        // seitenränder (in mm)
	$oben=15;    //mT
	$unten=15;   //mB
	$links=15;   //mL
	$rechts=15;  //mR
#        $html2pdf = new HTML2PDF('P', 'A4', 'de');
        $html2pdf = new HTML2PDF('P', 'A4', 'de', true, 'UTF-8', array($links, $oben, $rechts, $unten));
        $html2pdf->pdf->SetDisplayMode('real');
#        $html2pdf->setDefaultFont('arialunicid0'); //add this line
#       $html2pdf->setModeDebug();
#        $html2pdf->setDefaultFont('Arial');
        $html2pdf->writeHTML($inhalt_fin, isset($_GET['vuehtml']));
        $html2pdf->Output("LG_$lid.pdf",'D');
#*/
    }
    catch(HTML2PDF_exception $e) {
        echo $e;
        exit;
    }

?>