Subversion Repositories Applications.papyrus

Rev

Blame | Last modification | View Log | RSS feed

<?
//pre-requis à l'utilisation de ce moteur...
//
//->le requetes $res de type $res = mysql_query("select lien_branche, lien_feuille, couleur, nb_adh, nb_mes, taille_b, alias, date_creation,
//     lien_puce from $nom_table_index where ((VISIBLE=1) and (NOM_TABLE <> \"$nom_table_tela\") ) order by \"date_creation\" desc");
//->les variable $lientela_botanica  $nb_ab_tela $nb_total_mess=0 $nb_total_abon=0 $nbtables_dessin $xres(qui DOIT etre pair) $nhi_xsommet
//->connexion à la base effectuée
//



//javascript pour la gestion des popup
//------------------------------------------------------------------------------
global $G_javascript; 
$G_javascript = $G_javascript." function MagicPopup (mURL) {"."\n";
$G_javascript = $G_javascript." var sArgs = 'toolbar=0'+"."\n";
$G_javascript = $G_javascript." ',hotkeys=0'+"."\n";
$G_javascript = $G_javascript." ',location=0'+"."\n";
$G_javascript = $G_javascript." ',directories=0'+"."\n";
$G_javascript = $G_javascript." ',menubar=0'+"."\n";
$G_javascript = $G_javascript." ',personalbar=0'+"."\n";
$G_javascript = $G_javascript." ',status=0'+"."\n";
$G_javascript = $G_javascript." ',scrollbars=1'+"."\n";
$G_javascript = $G_javascript." ',resizable=1'+"."\n";
$G_javascript = $G_javascript." ',width=780'+"."\n";
$G_javascript = $G_javascript." ',height=450';"."\n";
$G_javascript = $G_javascript."\n";
$G_javascript = $G_javascript." var wWindow = open (mURL, 'more', sArgs);"."\n";
$G_javascript = $G_javascript." wWindow.window.focus ();"."\n";
$G_javascript = $G_javascript." }"."\n";
$G_javascript = $G_javascript."\n";
//------------------------------------------------------------------------------

 $temptotoblabla=round(($xres-$nhi_xsommet)/2);// oui, je suis en manque d'inspiration pour les noms de variables ;)
  //sérieusement, c'est le blanc devant la cime de l'arbre et la racine...

echo("
 <TR>
  <TD align=\"center\"><font size=2 face=\"Arial, Helvetica, sans-serif\"><a href=\"$lientela_botanica\"><B><i>Tela Botanica</B></a> <a target=\"_blank\" href=\"$lientela_numero\"><B>($nb_ab_tela)</i></B></a></font></TD>
 </TR>
 <TR>
  <TD align=\"center\"><TABLE width=\"$xres\" border=\"0\" cellspacing=\"0\" cellpadding=\"0\" summary=\"\">
<!-- Haut de l'arbre  -->
          <TR>
                 <TD><TABLE border=\"0\" cellspacing=\"0\" cellpadding=\"0\" summary=\"\">
                         <TR>
                                <TD><IMG alt=\"\" width=\"$temptotoblabla\" height=\"1\" src=\"Local/arbre/vide.gif\"></TD>
                                <TD width=\"$nhi_xsommet\" height=\"$nhi_ysommet\"><a href=\"$lientela_feuille\" target=\"_blank\"><IMG alt=\"\" width=\"$nhi_xsommet\" height=\"$nhi_ysommet\" border=\"0\" src=\"Local/arbre/haut.gif\"></a></TD>
                                <TD>&nbsp;</TD>
                         </TR>
                        </TABLE>
                 </TD>
                </TR>
");

//echo("<!-- xres=$xres -->");
//echo("<!-- xfeuille=$xfeuille -->");
//echo("<!-- xtronc=$xtronc -->");

$xref_branche=calc_xref_branche($xres,$xfeuille,$xtronc);

echo("<!-- xref_branche=$xref_branche -->");

$yinv=$ybranche-$yfeuille; //Hauteur de la case vide sous la feuille

//le tableau des branches
                //

                //ici, la boucle
                //ajustement de la boucle: le nombre de tables doit être pair dans la boucle
                $la_limite_de_la_boucle = $nbtables_dessin;

                if(true != est_pair($la_limite_de_la_boucle)): //ajustement de la boucle
                {
                $la_limite_de_la_boucle-=1;
                }endif;


                for($i=0;$i<$la_limite_de_la_boucle;$i+=2)
  {
  //infos pour la branche droite
   $lien_branche=mysql_result($res,$i+1,"LIEN_BRANCHE");
   $lien_feuille=mysql_result($res,$i+1,"LIEN_FEUILLE");
   $couleur=mysql_result($res,$i+1,"COULEUR");
   $coul_=couleur_f($couleur);
   $nb_ab=mysql_result($res,$i+1,"NB_ADH");
   $tb=mysql_result($res,$i+1,"TAILLE_B");
   $nm_table=mysql_result($res,$i+1,"ALIAS");
   $lien_puce=mysql_result($res,$i+1,"LIEN_FEUILLE"); // LIEN_PUCE remplace par LIEN_FEUILLE, 
   if ( $lien_puce != ""):{$le_lien_puce=" <a target=\"_blank\" href=\"$lien_puce\"><img src=\"Local/arbre/puce.gif\" width=\"$xpuce\" height=\"$ypuce\" border=\"0\"></a>";}
   endif;
   $xrel=$tb/100;
   $tbr=round($xrel*$xref_branche);
   if($tbr<$taille_mini):$tbr=$taille_mini+$tbr;endif; //taille mini de la branche

//pour des parametress de javascript, le addslash provient de appli_dessin_date
if($les_slashes==1):{
$lien_branche=stripslashes($lien_branche);
$lien_feuille= stripslashes($lien_feuille);
$lien_puce=stripslashes($lien_puce);
}endif;
//

   //infos pour le cartouche
   $nb_total_mess += mysql_result($res,$i+1,"NB_MES");
   $nb_total_abon += $nb_ab;

   //infos pour la branche gauche
   $lien_branche2=mysql_result($res,$i,"LIEN_BRANCHE");
   $lien_feuille2=mysql_result($res,$i,"LIEN_FEUILLE");
   $couleur2=mysql_result($res,$i,"COULEUR");
   $coul_2=couleur_f($couleur2);
   $nb_ab2=mysql_result($res,$i,"NB_ADH");
   $tb2=mysql_result($res,$i,"TAILLE_B");
   $nm_table2=mysql_result($res,$i,"ALIAS");
   $lien_puce2=mysql_result($res,$i,"LIEN_FEUILLE"); // LIEN_PUCE remplace par LIEN_FEUILLE, le 2 decembre
   if ( $lien_puce2 != ""):{$le_lien_puce2=" <a target=\"_blank\" href=\"$lien_puce2\"><img src=\"Local/arbre/puce.gif\" width=\"$xpuce\" height=\"$ypuce\" border=\"0\"></a>";}
   endif;
   $xrel2=$tb2/(100);
   $tbr2=round($xrel2*$xref_branche);
   if($tbr2<$taille_mini):$tbr2=$taille_mini+$tbr2;endif; //taille mini de la branche

//pour des parametress de javascript, le addslash provient de appli_dessin_date
if($les_slashes==1):{
$lien_branche2=stripslashes($lien_branche2);
$lien_feuille2=stripslashes($lien_feuille2);
$lien_puce2=stripslashes($lien_puce2);
}endif;
//

   //infos pour le cartouche
   $nb_total_mess += mysql_result($res,$i,"NB_MES");
   $nb_total_abon += $nb_ab2;

          //espace à gauche
          $espace_a_gauche=round((($xres-$xtronc)/2)-$tbr2-$xfeuille);

          //espace à droite
          $espace_a_droite=round($xres-$xtronc-$tbr-$tbr2-2*$xfeuille-$espace_a_gauche);

echo("
<!-- Les noms des listes -->
    <TR>
                 <TD>
                  <TABLE border=\"0\" cellspacing=\"0\" cellpadding=\"0\" summary=\"\">
                         <TR>
                          <TD colspan=\"3\" align=\"right\"><b><i><font size=2 face=\"Arial, Helvetica, sans-serif\"><a href=\"$lien_branche2\">$nm_table2</a>");
                                                                                if($nb_ab2!=0):{echo" <a target=\"_blank\" href=\"$lien_feuille2\"><B>($nb_ab2)</B></a>";}endif;echo("</font></i></b>&nbsp;&nbsp;&nbsp;&nbsp;</TD>                                                                                                                              
<!-- Le tronc -->
        <TD bgcolor=\"#663333\"><IMG alt=\"\" width=\"$xtronc\" height=\"20\" src=\"Local/arbre/vide.gif\"></TD>
                          <TD colspan=\"3\" align=\"left\">&nbsp;&nbsp;&nbsp;&nbsp;<b><i><font size=2 face=\"Arial, Helvetica, sans-serif\"><a href=\"$lien_branche\">$nm_table</a>");
                                                                                if($nb_ab!=0):{echo" <a target=\"_blank\" href=\"$lien_feuille\"><B>($nb_ab)</B></a>";}endif;echo("</font></i></b></TD>
                         </TR>
 
<!-- Bloc de 2 branches -->
                         <TR>
<!-- Espace gauche -->
        <TD rowspan=\"2\"><IMG alt=\"\" width=\"$espace_a_gauche\" height=\"1\" src=\"Local/arbre/vide.gif\"></TD>
<!-- Feuille gauche -->
                                <TD class=\"chiffre\" align=\"center\" bgcolor=\"$coul_2\" width=\"$xfeuille\" height=\"$yfeuille\">");
                                                                                if($lien_puce2!=""):{echo"<a target=\"_blank\" href=\"$lien_puce2\">";}endif;echo("<IMG alt=\"\" width=\"$xfeuille\" height=\"$yfeuille\" border=\"0\" src=\"Local/arbre/feuille_gauche.gif\">");
                                                                                if($lien_puce2!=""):{echo"</a>";}endif;echo("</TD>
<!-- Branche gauche: taille $tb2 % = $tbr2 pixels -->
                                <TD rowspan=\"2\"><IMG alt=\"\" width=\"$tbr2\" height=\"$ybranche\" src=\"Local/arbre/branche_gauche.gif\"></TD>

<!-- Le tronc -->
                                <TD rowspan=\"2\" bgcolor=\"#663333\"><IMG alt=\"\" width=\"$xtronc\" src=\"Local/arbre/vide.gif\"></TD>
                                                                                                                    
<!-- Branche droite: taille $tb % = $tbr pixels -->
                                <TD rowspan=\"2\"><IMG alt=\"\" width=\"$tbr\" height=\"$ybranche\" src=\"Local/arbre/branche_droite.gif\"></TD>
<!-- Feuille droite -->
                                <TD class=\"chiffre\" align=\"center\" bgcolor=\"$coul_\" width=\"$xfeuille\" height=\"$yfeuille\">");
                                                                                if($lien_puce!=""):{echo"<a target=\"_blank\" href=\"$lien_puce\">";}endif;echo("<IMG alt=\"\" width=\"$xfeuille\" height=\"$yfeuille\" border=\"0\" src=\"Local/arbre/feuille_droite.gif\">");
                                                                                if($lien_puce!=""):{echo"</a>";}endif;echo("</TD>
<!-- Espace droit -->
                                <!-- TD rowspan=\"2\"><IMG alt=\"\" width=\"100\" height=\"1\" src=\"Local/vide.gif\"></TD -->
                           <TD rowspan=\"2\"><IMG alt=\"\" width=\"$espace_a_droite\" height=\"1\" src=\"Local/vide.gif\"></TD>
                         </TR>
<!-- Les cases vides sous les feuilles -->
                         <TR>
                          <TD height=\"$yinv\"><IMG alt=\"\" width=\"1\" height=\"$yinv\" src=\"Local/vide.gif\"></TD>
                          <TD height=\"$yinv\"><IMG alt=\"\" width=\"1\" height=\"$yinv\" src=\"Local/vide.gif\"></TD>
                         </TR>
                        </TABLE>
                 </TD>
                </TR>
<!-- Fin du bloc de 2 branches -->
");
}   


   if(!est_pair($nbtables_dessin)):
   {
   //infos pour la branche gauche
   $lien_branche2=mysql_result($res,$i,"LIEN_BRANCHE");
   $lien_feuille2=mysql_result($res,$i,"LIEN_FEUILLE");
   $couleur2=mysql_result($res,$i,"COULEUR");
   $coul_2=couleur_f($couleur2);
   $nb_ab2=mysql_result($res,$i,"NB_ADH");
   $tb2=mysql_result($res,$i,"TAILLE_B");
   $nm_table2=mysql_result($res,$i,"ALIAS");
   $lien_puce2=mysql_result($res,$i,"LIEN_FEUILLE"); // LIEN_PUCE remplace par LIEN_FEUILLE, 
   if ( $lien_puce2 != ""):{$le_lien_puce2=" <a target=\"_blank\" href=\"$lien_puce2\"><img src=\"Local/arbre/puce.gif\" width=\"$xpuce\" height=\"$ypuce\" border=\"0\"></a>";}
   endif;
   $xrel2=$tb2/100.0;
   $tbr2=round($xrel2*$xref_branche);
   if($tbr2<$taille_mini):$tbr2=$taille_mini+$tbr2;endif; //taille mini de la branche

//pour des parametress de javascript, le addslash provient de appli_dessin_date
if($les_slashes==1):{
$lien_branche2=stripslashes($lien_branche2);
$lien_feuille2=stripslashes($lien_feuille2);
$lien_puce2=stripslashes($lien_puce2);
}endif;
//

   //infos pour le cartouche
   $nb_total_mess += mysql_result($res,$i,"NB_MES");
   $nb_total_abon += $nb_ab2;

          //espace à gauche
          $espace_a_gauche=round((($xres-$xtronc)/2)-$tbr2-$xfeuille);

   echo("
<!-- Le nom de la liste -->
    <TR>
                 <TD>
                  <TABLE border=\"0\" cellspacing=\"0\" cellpadding=\"0\" summary=\"\">
                         <TR>
                          <TD colspan=\"3\" align=\"right\"><b><i><font size=2 face=\"Arial, Helvetica, sans-serif\"><a href=\"$lien_branche2\">$nm_table2</a>");
                                                                                if($nb_ab2!=0):{echo" <a target=\"_blank\" href=\"$lien_feuille2\"><B>($nb_ab2)</B></a>";}endif;echo("</font></i></b>&nbsp;&nbsp;&nbsp;&nbsp;</TD>                                                                                                                              
<!-- Le tronc -->
        <TD bgcolor=\"#663333\"><IMG alt=\"\" width=\"$xtronc\" height=\"20\" src=\"Local/arbre/vide.gif\"></TD>
                          <TD colspan=\"3\" rowspan=\"3\" align=\"left\">&nbsp;</TD>
                         </TR>
 
<!-- Bloc de 1 branche -->
                         <TR>
<!-- Espace gauche -->
        <TD rowspan=\"2\"><IMG alt=\"\" width=\"$espace_a_gauche\" height=\"1\" src=\"Local/arbre/vide.gif\"></TD>
<!-- Feuille gauche -->
                                <TD class=\"chiffre\" align=\"center\" bgcolor=\"#33CC33\" width=\"$xfeuille\" height=\"$yfeuille\" >");
                                                                                if($lien_puce2!=""):{echo"<a target=\"_blank\" href=\"$lien_puce2\">";}endif;echo("<IMG alt=\"\" width=\"$xfeuille\" height=\"$yfeuille\" border=\"0\" src=\"Local/arbre/feuille_gauche.gif\">");
                                                                                if($lien_puce2!=""):{echo"</a>";}endif;echo("</TD>
<!-- Branche gauche: taille $tb2 % = $tbr2 pixels -->
                                <TD rowspan=\"2\"><IMG alt=\"\" width=\"$tbr2\" height=\"$ybranche\" src=\"Local/arbre/branche_gauche.gif\"></TD>

<!-- Le tronc -->
                                <TD rowspan=\"2\" bgcolor=\"#663333\"><IMG alt=\"\" width=\"$xtronc\" src=\"Local/arbre/vide.gif\"></TD>
                           </TR>
<!-- La case vide sous la feuille -->
                      <TR>
                          <TD height=\"$yinv\"><IMG alt=\"\" width=\"1\" height=\"$yinv\" src=\"Local/vide.gif\"></TD>
                      </TR>
                      </TABLE>
                      </TD>
                     </TR>
");
}
endif;


  echo("<!-- la racine -->
          <tr>
           <td><IMG alt=\"\" width=\"$temptotoblabla\" height=\"1\" border=\"0\" src=\"Local/arbre/vide.gif\"><img src=\"Local/arbre/racine.gif\" width=\"$xracine\" height=\"$yracine\" border=\"0\">
           </td>
          </tr>
         </table>
        </td>
       </tr>
        ");

?>