Location: PHPKode > projects > GNU Scout > gnuscout-0.2.5/www/etiquetas-postales.php
<?
/*****************************************************************************
 **                                                                         **
 **   Fichero:     etiquetas-postales.php                                   **
 **   Descripcion: Agrupa los scouts por familias para enviar correspon-    **
 **                cia a los padres.                                        **
 **                                                                         **
 **   Autor:       Juan Manuel Garcia Molina <hide@address.com>  **
 **   Creado:      16 de noviembre de 2001                                  **
 **                                                                         **
 **   Modificador: Juan Manuel Garcia Molina <hide@address.com>  **
 **   Modificado:  16 de noviembre de 2001                                  **
 **                                                                         **
 *****************************************************************************/

  include ("valida_sesion.php");

  // Titulo que va a tener la pagina
  $titulo_pag = "Etiquetas postales";

  // Incluimos la cabecera
  include("cabecera.php");

?>

<?php
  @include("modulo_bd.inc");
  $link = BD_Conectar();

    $query = "select count(DISTINCT(SCO_CODIGO)) AS NUM, UPPER(SCO_APELLIDO1) AS APE1, UPPER(SCO_APELLIDO2) AS APE2, UPPER(SCO_DIRECCION) AS DIRECCION, UPPER(SCO_CODPOSTAL) AS CP, UPPER(SCO_POBLACION) AS POBLAC, UPPER(SCO_PROVINCIA) AS PROVIN from SCOUT GROUP BY DIRECCION, CP, POBLAC, PROVIN, APE1, APE2 ORDER BY APE1, APE2, DIRECCION";
    $result = BD_Consultar($query);

    $mi_arc = fopen("/tmp/.etiquetas","w+");

        while ($line = BD_ObtenerFila($result))
	{
	  fwrite($mi_arc, "FAMILIA ".$line["APE1"]." ".$line["APE2"].":".$line["DIRECCION"].":".$line["CP"]." ".$line["POBLAC"]." (".$line["PROVIN"].")\n");
	?>
<TABLE BORDER="1">
 <TR>
   <TD><?=$line["NUM"]?></TD>
   <TD>FAMILIA <?=$line["APE1"]?> <?=$line["APE2"]?><BR><?=$line["DIRECCION"]?><BR><?=$line["CP"]?> <?=$line["POBLAC"]?> (<?=$line["PROVIN"]?>)</TD>
 </TR>
</TABLE>
	<?
        }
  BD_Desconectar($link);

?>
<?
  // Incluimos el pie de pagina
  include("pie.php");
?>
Return current item: GNU Scout