summaryrefslogtreecommitdiffstats
path: root/admin/ogAdmSources/ogAdmWebCon/varios/consulta_programaciones.php
blob: 27b6f69f0fcf895f7fcf72f02aca74a84270f1ea (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
<? 
// *************************************************************************************************************************************************
// Aplicación WEB: ogAdmWebCon
// Copyright 200-2005 José Manuel Alonso. Todos los derechos reservados.
// Fecha Creación: Año 2003-2004
// Fecha Última modificación: Noviembre-2005
// Nombre del fichero: consulta_programacion.php
// Descripción :
//		Muestra un calendario para elegir una fecha
// *************************************************************************************************************************************************
include_once("../includes/ctrlacc.php");
include_once("../clases/AdoPhp.php");
include_once("../includes/comunes.php");
include_once("../includes/CreaComando.php");
//_________________________________________________________________________________________________________
?>
<HTML>
<HEAD>
<BODY>
<?
 // Toma parametros
 $idprogramacion=0;
 if (isset($_GET["idprogramacion"]))	$idprogramacion=$_GET["idprogramacion"];

// Abre conexiones
$cmd=CreaComando($cadenaconexion); // Crea objeto comando
$rs=new Recordset; // Recupero acciones anidadas
$cmd->texto="SELECT * FROM programaciones WHERE idprogramacion=".$idprogramacion;
$rs->Comando=&$cmd; 
if (!$rs->Abrir()){ // Error al abrir recordset
	$reporerr=$cmd->UltimoError();
	$repordes=$cmd->DescripUltimoError();
	echo '<SCRIPT language="javascript">';
	echo '		window.parent.error_programacion('.$reporerr.',"'.$repordes.'")';
	echo '</SCRIPT>';
}
else{ 
	$cadena_campos=$rs->campos[0];
	for($i=1;$i<$rs->numerodecampos;$i++)
		$cadena_campos.=";".$rs->campos[$i]; // Usa el caracter ; para delimitar

	echo '<SCRIPT language="javascript">';
	echo '		window.parent.muestra_programacion("'.$cadena_campos.'")';
	echo '</SCRIPT>';
}
$rs->Cerrar();
?>
</BODY>
</HTML>