Me ha surgido un problema, y es que segun mi aplicacion va creciendo, a la vez crecen las bases de datos. La idea es hacer una pequeña aplicacion, donde se escoja la base de datos sobre la que realizar la actualizacion y el fichero sql que contiene dicha actualizacion.
Lo he intentado hacer mediante este codigo:
Código PHP:
With IBSQL1 do
Begin
SQL.Clear;
SQL.LoadFromFile(EdSQL.Text);
Prepare;
ExecQuery;
End;
y otros similares, con componentes TIBQuery y TIBSQL, pero me da un error en el SQL, el caso es que dicho codigo en SQL funciona si lo ejecuto desde el "EMS Interbase & Firebird Manager", el codigo SQl es el siguiente:
Código PHP:
ALTER PROCEDURE CONTACTO_DIRECCION
RETURNS (
...
AS
...
BEGIN
...
For select cod_contacto, nom_contacto, COD_DIRECCION, nombre_dir, fiscal, calle, numero, municipio, provincia from contactos left join direcciones
on cod_contacto=c_cont
order by nom_contacto, cod_contacto, nombre_dir
into :NUEVO_COD_CONTACTO, :NUEVO_NOM_CONTACTO, :NUEVO_COD_DIRECCION, :NUEVO_NOMBRE_DIR, :NUEVO_FISCAL, :NUEVO_CALLE, :NUEVO_NUMERO, :NUEVO_MUNICIPIO, :NUEVO_PROVINCIA
...
El error salta en esa expresion y es el siguiente:
"Dynamic SQL error, SQL error code = -104, Token unknown - line 30 char 13 ?." El error se corresponde con:
"into :NUEVO_COD_CONTACTO, ..." mas concretamente sobre los dos puntos.
A ver si me pueden ayudar con este error que me trae de cabeza, y como les digo, funciona perfectamente si lo ejecuto desde el EMS.
Un saludo y gracias por aguantar el toston
.