Paso de parámetros a TDataset

[[Lepe]]

Creo te estas complicando la vida. Es normal cuando se empieza con Firebird, aquí la solución:

Uso del TIbDataset (todo en tiempo de diseño !!):
- Asignar la Base de datos y transaction
- Asignar el Select "select * from tabla where claveprimaria = :clave"
- Usar el evento beforeOpen del TibDataset y poner:
ibdataset1.parambyname('clave').Asxxxx := lo que sea;
- Boton derecho sobre el TIbdataset y "Dataset Editor"
Saldrá una ventana con todos los campos de la tabla, pulsa los 3 botones que tienes a la izquierda (no hace falta encomillar los nombres de los campos si no usas espacios en dichos nombres.
- por curiosidad, mira las sqls que propone el componente (insert sql, delete, update, etc)
-Acepta la ventana.

Ahora el código:

Código Delphi [-]
dmDatos.dsArticulos.Open;
dmDatos.dsArtículos.Edit;
dmDatos.dsArticulos.FieldByName('Referencia').AsString:= dmDatos.dsArticulosREFERENCIA.Value;
dmDatos.dsArticulos.Post;
---- hacer el commit o commitRetaining ---
dmDatos.Close;
dmDAtos.Open; // para ver los cambios

Las 3 últimas líneas quizás no te hagan falta, si tiene el objeto transaction configurado para que automáticamente haga el commitRetainig después del Post, suprime las 3 últimas líneas

Como ves he usado un select que solo trae un registro a la vez, se supone es lo más efiiciente y como debería hacerse. En caso de usar un "Select * from tabla order by nombre", no hace falta usar el evento BeforeOpen, ni tampoco pasar parámetros.

Saludos

[arturom]

Pues va a ser que no , sigo teniendo el mismo problema, me dice que no encuentra el campo REFERENCIA.

¿Alguien tiene código donde se realice una modificación de un tabla firebird con componentes IBX, que esté dispuesto a mostrármelo o enviármelo para ver como se hace?

de todas formas, respecto a esto:

- Boton derecho sobre el TIbdataset y "Dataset Editor"
Saldrá una ventana con todos los campos de la tabla, pulsa los 3 botones que tienes a la izquierda (no hace falta encomillar los nombres de los campos si no usas espacios en dichos nombres.
- por curiosidad, mira las sqls que propone el componente (insert sql, delete, update, etc)
-Acepta la ventana.


a mi no me aparece esa ventana, solo un StringList editor, y tampoco tengo el procedimiento ParamByName.

Lo digo por si a alguien le sirve de referencia.

Saludos

[[Lepe]]

Estoy usando Delphi 7 y los IBX que trae instalados, puedo asegurarte que está ahí esa ventana.... pero no está en el inspector de objetos !!.

En tu Form, tendrás puesto el IBDataset1, pues selecciona el IBDataset (como si fueras a moverlo de sitio en la ventana) y después botón derecho sobre él. Tendrás varias opciones en el popup que sale:
- Fields editor
- Dataset Editor <<<<<<<<< este es el que debes usar.

Esta es la forma de construir todas las sqls (UpdateSql, DeleteSql, InsertSql, RefreshSql) de golpe y en tiempo de diseño.

Como la opción está un poco escondida, no se suele ver.


Saludos

[arturom]

Gracias por tu interés, pero no te habrás dado cuenta que en mi primer mensaje decía que uso Delphi 5, quizás por eso no me aparece el Dataset Editor

La gran duda es el paso de parámetros.

Entiendo que debo establecer el procedimiento ModifySQL tal que así:

Código Delphi [-]
dmDatos.dsArticulos.ModifySQL.Add('update ARTICULOS set PRECIO = :Precio where REFERENCIA = :Referencia');

para después enviarle el parámetro al DataSet tal que así:

Código Delphi [-]
dmDatos.dsArticulos.Params.ByName('Referencia').AsString:= dmDatos.dsArticulosREFERENCIA.Value;
dmDatos.dsArticulos.Params.ByName('Precio').AsFloat := dPrecio;

pero no hay nada que hacer, al llegar al paso del parámetro Referencia se para y me dice que no existe ese campo.

Saludos a todos

[defcon1_es]

Creo recordar que el en un TIBDataSet, solo "entiende" como parámetros
los que tenga en su propiedad SelectSQL, por eso te propuse usar un TIBQuery.

Tambien puedes usar un TIBSQL, que es un componente mucho menos "pesado" que el TIBDataSet
e incluso te permite ejecutar código DDL.

[Delfino]

Pues va a ser que no , sigo teniendo el mismo problema, me dice que no encuentra el campo REFERENCIA.

Asegurate de tener mayusculas a los parametros, y tb en el codigo, eso es un problema de los IBX, con los MDO esto no pasa

[defcon1_es]

Originally Posted by Delfino

Asegurate de tener mayusculas a los parametros, y tb en el codigo, eso es un problema de los IBX, con los MDO esto no pasa

¿De qué problema hablas, delfino?
Hasta ahora no he tenido ninguno de este tipo...claro que la opción "DataSet Editor" me pone todos los nombres de campos en mayúsculas...
No tenia ni idea de que hubiese algún problema con IBX y el paso de parámetros...
¿Puedes ampliar la información?