RAD Módulo MANUAL
Base   |   Ejemplo Informe   |   Ejemplo Mapa   |   Ejemplo Grafico

<?php
if (eregi(basename(__FILE__), $PHP_SELF)) die ("Security Error ...");
	
include_once ("header.php");

	echo "\n<h1 class=title>Informe Manual</h1>\n";

	if ($op=="") formulario(); // formulario para pedir datos de filtrado
	else listado(); // muestra datos acorde a datos de formulario

include_once ("footer.php");

return;

//----------------------------------------------------------------------------------------
// Formulario para solicitar datos de filtro de datos
//----------------------------------------------------------------------------------------
function formulario() {
global $V_dir, $V_mod, $V_idmod, $PHPSESSID, $RAD_dbi, $tipo, $headeroff, $footeroff, $blocksoff, $PHP_SELF;

	echo "\n<form action='".$PHP_SELF."' name=F method=get>\n";

	echo "<input type=hidden name=V_dir value=$V_dir><input type=hidden name=V_mod value=$V_mod>\n";
	echo "<input type=hidden name=V_idmod value=$V_idmod><input type=hidden name=PHPSESSID value=$PHPSESSID>\n";
	echo "<input type=hidden name=headeroff value='$headeroff'><input type=hidden name=footeroff value='$footeroff'>\n";
	echo "<input type=hidden name=blocksoff value='$blocksoff'>\n";
	// campos minimos a arrastrar en RAD para cualquier modulo

	//foreach($_REQUEST as $TMP_k=>$TMP_v) echo "<input type=hidden name='".$TMP_k."' value='".urlencode($TMP_v)."'>\n"; 
	// forma sencilla de poner todas las variables que se deben arrastrar en RAD

	echo "<input type=hidden name=op value='consulta'>\n"; // para indicar que se ejecute la consulta

	$TMP_selectperfil=RAD_editfield("perfil", "plistdb", 4, 4, "perfiles:perfil:literal", "", true, "", "", "");
	// funcion RAD que genera campo de edicion html. plistdb=deplegable que permite elegir valores de una tabla
	$TMP_selectfecha=RAD_editfield("fechadesde", "date", 10, 10, "", "", false, date("Y-m-d"), "", "");
	// campo edicion de tipo fecha

	echo "<table class=detail>";
	// tabla html con clases definidas en RAD
	echo "<tr><td class=detailtit>Perfil:</td><td class=detail>".$TMP_selectperfil."</td></tr>";
	echo "<tr><td class=detailtit>Fecha:</td><td  class=detail>".$TMP_selectfecha."  (Fecha ....)</td></tr>";
	echo "<tr><td class=detail colspan=2><center><input type=submit value='Crea Informe'></center></td></tr>";
	echo "</table>\n<form>\n";

	return;
}

//----------------------------------------------------------------------------------------
// Muestra listado de datos acorde a filtro de formulario
//----------------------------------------------------------------------------------------
function listado() {
global $V_dir, $V_mod, $V_idmod, $PHPSESSID, $perfil, $RAD_dbi, $fecha_year, $fecha_month, $fecha_day;

	$fecha=$fecha_year."-".$fecha_month."-".$fecha_day;


	echo "<table class=browse><tr><th class=browse>Usuario</th><th class=browse>Nombre</th></tr>\n";
	// tabla html con clases definidas en RAD

	//$TMP_cmdSQL="SELECT * from usuarios where perfil like '%".$perfil."%' and fecha='$fecha'";
	$TMP_cmdSQL="SELECT * from usuarios where perfil like '%".$perfil."%'";
	$TMP_cursor=sql_query($TMP_cmdSQL, $RAD_dbi);
	while($TMP_fila=sql_fetch_array($TMP_cursor,$RAD_dbi)) {
		if($TMP_class=="row1") $TMP_class="row2";
		else $TMP_class="row1";
		echo "<tr><td class=".$TMP_class.">".$TMP_fila["usuario"]."</td><td class=".$TMP_class.">".$TMP_fila["nombre"]."</td></tr>\n";
	}
	echo "</table>\n";

	return;
}

?>