<?php
/**
 *
 *
 * @package openmairie_exemple
 * @version SVN : $Id: pdfetat.php 1114 2012-03-15 16:51:24Z atreal $
 * parametre etat dans la table om_etat
 */
// fpdf ne traite pas UTF8
// donc il faut utiliser decode
include ("../dyn/locales.inc.php");
require_once "../obj/utils.class.php";

$f = new utils("nohtml");

/**
 *
 */

// Nom de l'objet metier
(isset($_GET['obj']) ? $obj = $_GET['obj'] : $obj = "");

//
$collectivite = $f->collectivite;
$niveau='';
// requete SQL
    $sql= "select * from ".DB_PREFIXE."om_etat where id='".$obj."'"; // select obj
    $sql.= " and actif is true";
    $sql.= " and om_collectivite ='".$_SESSION['collectivite']."'";
    

    $res1 = $f->db->query($sql);
    $f->isDatabaseError($res1);

    if ($res1->numrows()==0){
        $sql="select om_collectivite from ".DB_PREFIXE."om_collectivite where niveau ='2'";

        $niveau=$f->db->getOne($sql);
        $res1->free();
        $sql= "select * from ".DB_PREFIXE."om_etat where id='".$obj."'"; // select obj
        $sql.= " and actif is true";
        $sql.= " and om_collectivite ='".$niveau."'";
        $res1 = $f->db->query($sql);
        $f->isDatabaseError($res1);
    }

    if ($res1->numrows()==0){
        $res1->free();
        $sql= "select * from ".DB_PREFIXE."om_etat where id='".$obj."'"; // select obj
        $sql.= " and om_collectivite ='".$niveau."'";
        
        $res1 = $f->db->query($sql);
        $f->isDatabaseError($res1);
    }
/**
 *
 */
//
set_time_limit(180);
//
require_once PATH_OPENMAIRIE."fpdf_etat.php";
//require_once "fpdf_etat.php"; // remttre le PATH ***
// INSTANCE PDF            =====================================
// orientation P= portrait L=paysage
// unite mm (milimetre)
// format A4 A3
// =============================================================

$unite="mm";
while ($etat =& $res1->fetchRow(DB_FETCHMODE_ASSOC)) {

    // transformation en tableau
    if(trim($etat['sousetat']) !=''){
        //chr(13)=retour charriot, chr(10) retour a la ligne
        //en sauvegarde pgsql, il n y a que le chr(10)
        //$sousetatliste=explode(chr(13).chr(10),$etat['sousetat']);
        $sousetatliste=explode(chr(10),$etat['sousetat']);
    }else
        $sousetatliste='';
    $etat['se_couleurtexte']=explode("-", $etat['se_couleurtexte']);
    $pdf=new PDF($etat["orientation"],$unite,$etat["format"]);
    //
    $pdf->footerfont=$etat["footerfont"];
    $pdf->footertaille=$etat["footertaille"];
    $pdf->footerattribut=$etat["footerattribut"];
    $pdf->SetMargins($etat['se_margeleft'],$etat['se_margetop'],$etat['se_margeright']); //marge gauche,haut,droite par defaut 10mm
    $pdf->SetDisplayMode('real','single');
    // methode fpdf calcul nombre de page
    $pdf->AliasNbPages();
    // sql publipostage
    
    // ===========================================================
    require "../sql/".$f->phptype."/".$obj.".publipostage.inc.php";
    // ===========================================================
    $res3 = $f->db->query($sql);
    $f->isDatabaseError($res3);
    //Pour chaque ligne

    while ($row3 =& $res3->fetchRow(DB_FETCHMODE_ASSOC)) {
        //
        $idx = $row3[$obj];
        $pdf->AddPage();
        // police ======================================================
        // setFont 0 = times, arial
        //         1 = I B ou ''
        //         2 = 8 ....
        // affichage image =============================================
        // image     0 = nom
        //           1 = left
        //           2 = top
        //           3 = width 0=calcul auto
        //           4 = hauteur 0=calcul auto
        //           5 = type image  rien=exetension du fichier
        //           6 = lien
        // setXY (left,top) =============================================
        // affichage multicell ==========================================
        // multicell 0 = width   =0 left->droite
        //           1 = hauteur de la cellule
        //           2 = texte
        //           3 = bordure (0 ou 1)
        //           4 = align (L C R J)
        //           5 =     0 fd transparent
        //                   1 couleur (parametre a rajouter)
        // ==============================================================
    
        $temp = $f->getPathFolderTrs().$etat['logo'];

        $pdf->Image($temp,
                    $etat["logoleft"],
                    $etat["logotop"],
                    0,
                    0,
                    '',
                    '');
    
        // variables statiques
        $sql=$etat['om_sql'];

        if(DBCHARSET=='UTF8')
        {
            $titre= utf8_decode($etat["titre"]);
            $corps= utf8_decode($etat["corps"]);
        }
        else
        {
            $titre= $etat["titre"];
            $corps= $etat["corps"];
        }
        
        
        // =========================================================================
        // Module de parametrage des etats
        // $Id: varetatpdf.inc 1084 2012-02-27 12:32:56Z atreal $
        // =========================================================================
        // compatibilite
        $sql=str_replace("£idx",$idx,$sql);
        $titre=str_replace("£idx",$idx,$titre);
        // idx
        $sql=str_replace("&idx",$idx,$sql);
        $sql=str_replace("&DB_PREFIXE",DB_PREFIXE,$sql);
        $titre=str_replace("&idx",$idx,$titre);
        $corps=str_replace("&idx",$idx,$corps);
        // aujourdhui
        $titre=str_replace("&aujourdhui",date('d/m/Y'),$titre);
        $corps=str_replace("&aujourdhui",date('d/m/Y'),$corps);
        // parametre
        if($collectivite!=array()){
            foreach (array_keys($collectivite) as $elem) {
                $temp="&".$elem;
                if(DBCHARSET=='UTF8')
                    $collectivite[$elem]=utf8_decode($collectivite[$elem]);
                $titre=str_replace($temp,$collectivite[$elem],$titre);
                $corps=str_replace($temp,$collectivite[$elem],$corps);
                $sql=str_replace($temp,$collectivite[$elem],$sql);
            }
        }

        $res = $f->db->query($sql);
        
        $f->isDatabaseError($res);

        while ($row=& $res->fetchRow(DB_FETCHMODE_ASSOC)){
    
            //___________________________________________________________________________
            // titre                                                                   //
            //___________________________________________________________________________
            //
            $temp = explode("[",$titre);
            for($i=1;$i<sizeof($temp);$i++){
                $temp1 = explode("]",$temp[$i]);
                if(DBCHARSET=='UTF8')
                    $titre=str_replace("[".$temp1[0]."]",utf8_decode($row[$temp1[0]]),$titre);
                else
                    $titre=str_replace("[".$temp1[0]."]",$row[$temp1[0]],$titre);
                $temp1[0]="";
            }
            //echo $titre;
            //************************************************
            // traitement attribut affichage <b> dans titre  *
            //              aout 2008                        *
            //************************************************
    
            $pos_t="";
            $pos_t = strpos($titre, "<b>");
    
            if ($pos_t === false) {
            // compatibilite :aucun attribut affichage <b> dans corps
            //***************************************************************************
    
                if(trim($titre)!="") {
                    $pdf->SetFont($etat["titrefont"],
                                 $etat["titreattribut"],
                                 $etat["titretaille"]);
                    $pdf->SetXY($etat["titreleft"],
                               $etat["titretop"]);
                    $pdf->MultiCell($etat["titrelargeur"],
                                   $etat["titrehauteur"],
                                   $titre,
                                   $etat["titrebordure"],
                                   $etat["titrealign"],
                               0);
                }
            //****************************************************************************
            // attribut affichage <b> present  dans titre
    
            }else{
              $pdf->SetY($etat["titretop"]);
              $tmptitre="";
              $tmptitre=explode('<b>', $titre);
              //
                for($y=0;$y<sizeof($tmptitre);$y++){
                    $pos1="";
                    $pos1 = strpos($tmptitre[$y], "</b>");
                    //
                    if ($pos1 === false) {
                        if(trim($tmptitre[$y])!="") {
                            $pdf->SetFont($etat["titrefont"],$etat["titreattribut"],$etat["titretaille"]);
                            $pdf->SetX($etat["titreleft"]);
                            $pdf->MultiCell($etat["titrelargeur"],$etat["titrehauteur"],$tmptitre[$y],$etat["titrebordure"],$etat["titrealign"],0);
                        }
                    }else{
                        $ctrl_fin_b=0;
                        $ctrl_fin_b=substr_count($tmptitre[$y],"</b>");
                        $etat["titreattribut"] = str_replace("B","",$etat["titreattribut"]);
                        $etat["titreattribut"] = str_replace("b","",$etat["titreattribut"]);
                        if ($ctrl_fin_b>1){
                            // nbr </b> superieur a 1
                            if(trim($tmptitre[$y])!="") {
                               $pdf->SetFont($etat["titrefont"],"B".$etat["titreattribut"],$etat["titretaille"]);
                               $pdf->SetX($etat["titreleft"]);
                               $pdf->MultiCell($etat["titrelargeur"],$etat["titrehauteur"],$tmptitre[$y],$etat["titrebordure"],$etat["titrealign"],0);
                            }
                        }else{
                            $tmptitre1 = explode("</b>",$tmptitre[$y]);
                            //
                            if(trim($tmptitre1[0])!="") {
                                 $pdf->SetFont($etat["titrefont"],"B".$etat["titreattribut"],$etat["titretaille"]);
                                 $pdf->SetX($etat["titreleft"]);
                                $pdf->MultiCell($etat["titrelargeur"],$etat["titrehauteur"],$tmptitre1[0],$etat["titrebordure"],$etat["titrealign"],0);
                            }
                            if(trim($tmptitre1[1])!=""){
                                $pdf->SetFont($etat["titrefont"],$etat["titreattribut"],$etat["titretaille"]);
                                $pdf->SetX($etat["titreleft"]);
                                $pdf->MultiCell($etat["titrelargeur"],$etat["titrehauteur"],$tmptitre1[1],$etat["titrebordure"],$etat["titrealign"],0);
                            }
                        }
                    }
                }
            }
            //
            //____________________________________________________________________________
            // corps                                                                    //
            //____________________________________________________________________________
            $temp = explode("[",$etat["corps"]);
            for($i=1;$i<sizeof($temp);$i++){
                $temp1 = explode("]",$temp[$i]);
                if(DBCHARSET=='UTF8')
                    $corps=str_replace("[".$temp1[0]."]",utf8_decode($row[$temp1[0]]),$corps);
                else
                    $corps=str_replace("[".$temp1[0]."]",$row[$temp1[0]],$corps);
    
                $temp1[0]="";
            }
            if (strstr($corps,'\p')){
                   $temp="";
                   $temp = explode("\p",$corps);
                //************************************************
                // traitement attribut affichage <b> dans corps  *
                //              aout 2008                        *
                //************************************************
                $pos="";
                $pos = strpos($temp[0], "<b>");
                if ($pos === false) {
               // compatibilite :aucun attribut affichage dans corps
               //***************************************************************************
                    if(trim($temp[0])!="") {
                        $pdf->SetFont($etat["corpsfont"],
                                      $etat["corpsattribut"],
                                      $etat["corpstaille"]);
                        $pdf->SetXY($etat["corpsleft"],
                                    $etat["corpstop"]);
                        $pdf->MultiCell($etat["corpslargeur"],
                                        $etat["corpshauteur"] ,
                                        $temp[0],
                                        $etat["corpsbordure"],
                                        $etat["corpsalign"],
                                        0);
                    }
              //****************************************************************************
              // attribut affichage <b> present  dans corps
              // echo $corps;
              }else{
                    $pdf->SetXY($etat["corpsleft"],$etat["corpstop"]);
                    $tmp="";
                    $tmp=explode('<b>', $temp[0]);
                    //
                    for($x=0;$x<sizeof($tmp);$x++){
                        $pos1="";
                        $pos1 = strpos($tmp[$x], "</b>");
                        if ($pos1 === false) {
                          if(trim($tmp[$x])!=""){
                           $pdf->SetFont($etat["corpsfont"],$etat["corpsattribut"],$etat["corpstaille"]);
                           $pdf->write($etat["corpshauteur"],$tmp[$x]);
                          }
                        }else{
                            $ctrl_fin_b=0;
                            $ctrl_fin_b=substr_count($tmp[$x],"</b>");
                            $etat["corpsattribut"] = str_replace("B","",$etat["corpsattribut"]);
                            $etat["corpsattribut"] = str_replace("b","",$etat["corpsattribut"]);
                            if ($ctrl_fin_b>1){
                                // nbr </b> superieur a 1
                                if(trim($tmp[$x])!=""){
                                    $pdf->SetFont($etat["corpsfont"],"B".$etat["corpsattribut"],$etat["corpstaille"]);
                                    $pdf->write($etat["corpshauteur"],$tmp[$x]);
                                }
                            }else{
                                $tmp1 = explode("</b>",$tmp[$x]);
                                //
                                if(trim($tmp1[0])!=""){
                                    $nbcar=0;
                                    $nbcar=$tmp1[0];
                                    if( strlen($nbcar)==1) {
                                        // ??????bug fpdf write si affichage 1 seul caractere -> ajout 2 blancs
                                        $pdf->SetFont($etat["corpsfont"],"B".$etat["corpsattribut"],$etat["corpstaille"]);
                                        $pdf->write($etat["corpshauteur"],"  ".$tmp1[0]."  ");
                                    }else{
                                        $pdf->SetFont($etat["corpsfont"],"B".$etat["corpsattribut"],$etat["corpstaille"]);
                                        $pdf->write($etat["corpshauteur"],$tmp1[0]);
                                    }
                                }
                                if(trim($tmp1[1])!=""){
                                    $pdf->SetFont($etat["corpsfont"],$etat["corpsattribut"],$etat["corpstaille"]);
                                    $pdf->write($etat["corpshauteur"],$tmp1[1]);
                                }
                            }
                        }
                    }
                }
                for($i=1;$i<sizeof($temp);$i++){
                      $pdf->AddPage();
    
                    //************************************************
                    // traitement attribut affichage <b> dans corps  *
                    //              aout 2008                        *
                    //************************************************
                    $pos="";
                    $pos = strpos($temp[$i], "<b>");
                    if ($pos === false) {
                   // compatibilite :aucun attribut affichage dans corps
                   //***************************************************************************
                        if(trim($temp[$i])!="") {
                            $pdf->SetFont($etat["corpsfont"],
                                          $etat["corpsattribut"],
                                          $etat["corpstaille"]);
                            $pdf->SetXY($etat["corpsleft"],
                                        $etat["se_margetop"]);
                            $pdf->MultiCell($etat["corpslargeur"],
                                            $etat["corpshauteur"] ,
                                            $temp[$i],
                                            $etat["corpsbordure"],
                                            $etat["corpsalign"],
                                            0);
                        }
                  //****************************************************************************
                  // attribut affichage <b> present  dans corps
                  // echo $corps;
                  }else{
                        $pdf->SetXY($etat["corpsleft"],$etat["se_margetop"]);
                        $tmp="";
                        $tmp=explode('<b>', $temp[$i]);
                        //
                        for($x=0;$x<sizeof($tmp);$x++){
                            $pos1="";
                            $pos1 = strpos($tmp[$x], "</b>");
                            if ($pos1 === false) {
                              if(trim($tmp[$x])!=""){
                               $pdf->SetFont($etat["corpsfont"],$etat["corpsattribut"],$etat["corpstaille"]);
                               $pdf->write($etat["corpshauteur"],$tmp[$x]);
                              }
                            }else{
                                $ctrl_fin_b=0;
                                $ctrl_fin_b=substr_count($tmp[$x],"</b>");
                                $etat["corpsattribut"] = str_replace("B","",$etat["corpsattribut"]);
                                $etat["corpsattribut"] = str_replace("b","",$etat["corpsattribut"]);
                                if ($ctrl_fin_b>1){
                                    // nbr </b> superieur a 1
                                    if(trim($tmp[$x])!=""){
                                        $pdf->SetFont($etat["corpsfont"],"B".$etat["corpsattribut"],$etat["corpstaille"]);
                                        $pdf->write($etat["corpshauteur"],$tmp[$x]);
                                    }
                                }else{
                                    $tmp1 = explode("</b>",$tmp[$x]);
                                    //
                                    if(trim($tmp1[0])!=""){
                                        $nbcar=0;
                                        $nbcar=$tmp1[0];
                                        if( strlen($nbcar)==1) {
                                            // ??????bug fpdf write si affichage 1 seul caractere -> ajout 2 blancs
                                            $pdf->SetFont($etat["corpsfont"],"B".$etat["corpsattribut"],$etat["corpstaille"]);
                                            $pdf->write($etat["corpshauteur"],"  ".$tmp1[0]."  ");
                                        }else{
                                            $pdf->SetFont($etat["corpsfont"],"B".$etat["corpsattribut"],$etat["corpstaille"]);
                                            $pdf->write($etat["corpshauteur"],$tmp1[0]);
                                        }
                                    }
                                    if(trim($tmp1[1])!=""){
                                        $pdf->SetFont($etat["corpsfont"],$etat["corpsattribut"],$etat["corpstaille"]);
                                        $pdf->write($etat["corpshauteur"],$tmp1[1]);
                                    }
                                }
                            }
                        }
                    }
                }
            }
            else
            {
                $pos="";
                $pos = strpos($corps, "<b>");
                if ($pos === false) {
               // compatibilite :aucun attribut affichage dans corps
               //***************************************************************************
                    if(trim($corps)!="") {
                        $pdf->SetFont($etat["corpsfont"],
                                      $etat["corpsattribut"],
                                      $etat["corpstaille"]);
                        $pdf->SetXY($etat["corpsleft"],
                                    $etat["corpstop"]);
                        $pdf->MultiCell($etat["corpslargeur"],
                                        $etat["corpshauteur"] ,
                                        $corps,
                                        $etat["corpsbordure"],
                                        $etat["corpsalign"],
                                        0);
                    }
              //****************************************************************************
              // attribut affichage <b> present  dans corps
              // echo $corps;
              }else{
                    $pdf->SetXY($etat["corpsleft"],$etat["corpstop"]);
                    $tmp="";
                    $tmp=explode('<b>', $corps);
                    //
                    for($x=0;$x<sizeof($tmp);$x++){
                        $pos1="";
                        $pos1 = strpos($tmp[$x], "</b>");
                        if ($pos1 === false) {
                          if(trim($tmp[$x])!=""){
                           $pdf->SetFont($etat["corpsfont"],$etat["corpsattribut"],$etat["corpstaille"]);
                           $pdf->write($etat["corpshauteur"],$tmp[$x]);
                          }
                        }else{
                            $ctrl_fin_b=0;
                            $ctrl_fin_b=substr_count($tmp[$x],"</b>");
                            $etat["corpsattribut"] = str_replace("B","",$etat["corpsattribut"]);
                            $etat["corpsattribut"] = str_replace("b","",$etat["corpsattribut"]);
                            if ($ctrl_fin_b>1){
                                // nbr </b> superieur a 1
                                if(trim($tmp[$x])!=""){
                                    $pdf->SetFont($etat["corpsfont"],"B".$etat["corpsattribut"],$etat["corpstaille"]);
                                    $pdf->write($etat["corpshauteur"],$tmp[$x]);
                                }
                            }else{
                                $tmp1 = explode("</b>",$tmp[$x]);
                                //
                                if(trim($tmp1[0])!=""){
                                    $nbcar=0;
                                    $nbcar=$tmp1[0];
                                    if( strlen($nbcar)==1) {
                                        // ??????bug fpdf write si affichage 1 seul caractere -> ajout 2 blancs
                                        $pdf->SetFont($etat["corpsfont"],"B".$etat["corpsattribut"],$etat["corpstaille"]);
                                        $pdf->write($etat["corpshauteur"],"  ".$tmp1[0]."  ");
                                    }else{
                                        $pdf->SetFont($etat["corpsfont"],"B".$etat["corpsattribut"],$etat["corpstaille"]);
                                        $pdf->write($etat["corpshauteur"],$tmp1[0]);
                                    }
                                }
                                if(trim($tmp1[1])!=""){
                                    $pdf->SetFont($etat["corpsfont"],$etat["corpsattribut"],$etat["corpstaille"]);
                                    $pdf->write($etat["corpshauteur"],$tmp1[1]);
                                }
                            }
                        }
                    }
                }
            }
    
    
    
            // fin attribut affichage
          //****************************************************************************
    
        }
    
        // affichage des sous etats
        if($sousetatliste!="") {
            foreach($sousetatliste as $elem){
                $sql= "select * from ".DB_PREFIXE."om_sousetat where id='".trim($elem)."'";
                $sql.= " and actif ='Oui'";
                $sql.= " and om_collectivite ='".$_SESSION['collectivite']."'";
                $res2 = $f->db->query($sql);
                $f->isDatabaseError($res2);
    
                if ($res2->numrows()==0){
                    if($niveau==''){
                        $sql="select om_collectivite from ".DB_PREFIXE."om_collectivite where niveau =2";
                        $niveau=$f->db->getOne($sql);
                    }
                    $res2->free();
                    $sql= "select * from ".DB_PREFIXE."om_sousetat where id='".trim($elem)."'";
                    $sql.= " and actif ='Oui'";
                    $sql.= " and om_collectivite ='".$niveau."'";
                    $res2 = $f->db->query($sql);
                    $f->isDatabaseError($res2);
                }
    
                if ($res2->numrows()==0){
                    $res2->free();
                    $sql= "select * from ".DB_PREFIXE."om_sousetat where id='".trim($elem)."'"; // select obj
                    $sql.= " and om_collectivite ='".$niveau."'";
                    $res2 = $f->db->query($sql);
                    $f->isDatabaseError($res1);
                }
    
                // =========================================================================
                // traitementde variables : &
    
                while ($sousetat =& $res2->fetchRow(DB_FETCHMODE_ASSOC)) {
                    $sql='';$titre='';
                    $sql=$sousetat['om_sql'];
                    $titre=$sousetat['titre'];
                    
                    // =========================================================================
                    // Module de parametrage des etats
                    // $Id: varetatpdf.inc 1084 2012-02-27 12:32:56Z atreal $
                    // =========================================================================
                    // compatibilite
                    $sql=str_replace("£idx",$idx,$sql);
                    $titre=str_replace("£idx",$idx,$titre);
                    // idx
                    $sql=str_replace("&idx",$idx,$sql);
                    $sql=str_replace("&DB_PREFIXE",DB_PREFIXE,$sql);
                    $titre=str_replace("&idx",$idx,$titre);
                    $corps=str_replace("&idx",$idx,$corps);
                    // aujourdhui
                    $titre=str_replace("&aujourdhui",date('d/m/Y'),$titre);
                    $corps=str_replace("&aujourdhui",date('d/m/Y'),$corps);
                    // parametre
                    if($collectivite!=array()){
                        foreach (array_keys($collectivite) as $elem) {
                            $temp="&".$elem;
                            if(DBCHARSET=='UTF8')
                                $collectivite[$elem]=utf8_decode($collectivite[$elem]);
                            $titre=str_replace($temp,$collectivite[$elem],$titre);
                            $corps=str_replace($temp,$collectivite[$elem],$corps);
                            $sql=str_replace($temp,$collectivite[$elem],$sql);
                        }
                    }
        
                    $sousetat['om_sql']=$sql;
                    $sousetat['titre']=$titre;
                    //imprime  les colonnes de la requete
                    $pdf->sousetatdb($f->db,$etat,$sousetat);
                }
            }
            //
        }

    }
    $pdf->Output("publipostage_".date('Y').".pdf","D");
} // fin while
?>