PDA

Ver la Versión Completa : radphp select params


didier
04-11-2011, 04:36:17
tengo el siguiente codigo:

function btnconsultarClick($sender, $params)
{
$this->dbbdtelenodo1->close();
$this->dbbdtelenodo1->Connected = false;
$this->dbbdtelenodo1->Connected = true;
$this->dbbdtelenodo1->Open();


if ($this->edtidtelenodo->text<>'')
{

No -me muestra nada en la grilla

$variable=$this->edtidtelenodo->Text;
$variable=(Int)$variable;

// hacemos la consulta
$sql="SELECT geslogpos_historico01.pr_serie,
geslogpos_historico01.gb_id,
geslogpos_historico01.lo_canaltx,
geslogpos_historico01.li_fechahoraregistro
FROM geslogpos_historico01
where geslogpos_historico01.pr_serie='$xxx'";


//*$cons="SELECT * FROM tb_guias,tb_destino,tb_dispositivos
// WHERE (id_destino=tb_destino_id_destino)AND(tb_dispositivos_id_dispositivo=id_dispositivo)AND(num_guia=".$guia.");";

// concateno valor
//$sql .= $this->edtidtelenodo->Text;

$param = array();
$params[] = $variable;
$this->qrygeslogpos01->SQL=$sql;
$this->qrygeslogpos01->Params=$params;

}
else
{

Si --me muestra datos en la grilla

// hacemos la consulta
$sql="SELECT geslogpos_historico01.pr_serie,
geslogpos_historico01.gb_id,
geslogpos_historico01.lo_canaltx,
geslogpos_historico01.li_fechahoraregistro
FROM geslogpos_historico01";

// meto sql al componente query
$this->qrygeslogpos01->SQL=$sql;
}


//Prepare the query
$this->qrygeslogpos01->Prepare();

//Reopen the dataset
$this->qrygeslogpos01->close();
$this->qrygeslogpos01->open();

}

}


El problema pasa al tratar de pasar parámetros al query

si alguien me puede ayudar.

Gracias.

Ñuño Martínez
04-11-2011, 14:05:54
Hola didier.

Primero, echarte la bronca por no usar las etiquetas ... para que el código resulte legible. Hay un botón justo encima del editor de mensajes: http://www.clubdelphi.com/foros/images/editor/php.gif

En segundo lugar, si el problema lo tienes aquí:
// hacemos la consulta
$sql="SELECT geslogpos_historico01.pr_serie,
geslogpos_historico01.gb_id,
geslogpos_historico01.lo_canaltx,
geslogpos_historico01.li_fechahoraregistro
FROM geslogpos_historico01
where geslogpos_historico01.pr_serie='$xxx'";
Es evidente que no funcionará, porque la variable $xxx no existe. ¿No será, más bien, $variable? :rolleyes:

didier
04-11-2011, 18:06:55
aun asi con el cambio que me dices no funciona.
te adjunto el codigo completo
gracias


<?php
require_once("rpcl/rpcl.inc.php");
//Includes
use_unit("forms.inc.php");
use_unit("extctrls.inc.php");
use_unit("stdctrls.inc.php");
use_unit("dbtables.inc.php");
use_unit("db.inc.php");
use_unit("dbgrids.inc.php");

//Class definition
class Unit1 extends Page
{
public $Label1 = null;
public $Label2 = null;
public $edtidtelenodo = null;
public $dbbdtelenodo1 = null;
public $dsgeslogpos011 = null;
public $geslogpos011 = null;
public $btnconsultar = null;
public $qrygeslogpos01 = null;
public $Label3 = null;

function btnconsultarClick($sender, $params)
{
$this->dbbdtelenodo1->close();
$this->dbbdtelenodo1->Connected = false;
$this->dbbdtelenodo1->Connected = true;
$this->dbbdtelenodo1->Open();


if ($this->edtidtelenodo->text<>'')
{

$variable=$this->edtidtelenodo->Text;
$variable=(Int)$variable;

// hacemos la consulta
$sql="SELECT geslogpos_historico01.pr_serie,
geslogpos_historico01.gb_id,
geslogpos_historico01.lo_canaltx,
geslogpos_historico01.li_fechahoraregistro
FROM geslogpos_historico01
where geslogpos_historico01.pr_serie=$variable";

// meto sql al componente query
$this->qrygeslogpos01->SQL=$sql;

}
else
{
// hacemos la consulta
$sql="SELECT geslogpos_historico01.pr_serie,
geslogpos_historico01.gb_id,
geslogpos_historico01.lo_canaltx,
geslogpos_historico01.li_fechahoraregistro
FROM geslogpos_historico01";

// meto sql al componente query
$this->qrygeslogpos01->SQL=$sql;
}


//Prepare the query
$this->qrygeslogpos01->Prepare();

//Reopen the dataset
$this->qrygeslogpos01->close();
$this->qrygeslogpos01->open();

}

}

global $application;

global $Unit1;

//Creates the form
$Unit1 = new Unit1($application);

//Read from resource file
$Unit1->loadResource(__FILE__);

//Shows the form
$Unit1->show();

?>

Ñuño Martínez
07-11-2011, 10:49:36
Por favor, define "no funciona" (no puedo probarlo porque no tengo tu base de datos ni tu configuración ... :rolleyes:).

Y vuelvo a comentarte que uses las etiquetas ...

didier
07-11-2011, 18:13:12
estimado gracias por responder.
cuando digo no fucniona, me refiero a que no muestra la consulta SQL insertada en el componente qry.
las etiquetas php que mensionan, ya estan si te das cuenta estan en el codigo.
estimado no te compliques, si puedes ayudar bien y de verdad gracias.
sin ser experto en RADPHP te puedo decir que no necesitas tener mi base de datos para probar, es solo cambiar el query por algo asi como " select * from tu_tabla where tu_campo ........" apuntando a tu mysql de tu base de datos.
pero gracias por la ayuda.
si te das cuenta estoy haciendo select sin where (el que muestra datos) y un select con where (que no muestra datos).
lamentablemente el ejemplo de radphp ocupa un parametros filter que no me funcioona y para mi me resulta mas comodo el que estoy ocupando en el ejemplo
que es super simple pero por algun motivo no fucniona como deberia. no soy experto en este lenguaje pero claramente algo estoy haciendo mal.

lamentablemnete la gente de embarcadero no responde y tienen un pesimo soporte. Habra que seguir buscando alguien que nos pueda ayudar.

se agracede tu ayuda.

saludos.

Ñuño Martínez
14-11-2011, 20:51:45
Con las etiquetas no me refiero a las marcas de código PHP ("<?php ... ?>") sino a las etiquetas bbcode ("..."). Por ejemplo, si escribes:

<?php
function Ejemplo ($Objeto)
{
echo "El valor contenido es {$Objeto->Valor}";
}
?>

el foro muestra:
<?php
function Ejemplo ($Objeto)
{
echo "El valor contenido es {$Objeto->Valor}";
}
?>
Que como puedes comprobar es mucho más fácil de leer.

Respecto a tu problema, estoy más perdido ahora que antes. A ver si alguna otra persona sí te ha entendido.

Casimiro Notevi
14-11-2011, 21:16:37
Ejemplo para poner etiquetas:

http://neftali.clubdelphi.com/images/UtilizarTAGs.png

Y no te olvides de leer nuestra guía de estilo (http://www.clubdelphi.com/foros/guiaestilo.php), que si no se ayuda es porque no se entiende lo que preguntas.

Supongo que embarcadero no te contesta porque no se entiende lo que preguntas, yo no lo entiendo.

didier
15-11-2011, 00:18:50
estimado ñuño martinez ya esta solucionado el problema
esta pasaba por una mala definicion en el objeto query.
gracias
saludos