Hola a todos...
Estoy creando este Procedure desde código:
Código Delphi
[-]
Query1.Close;
Query1.SQL.Clear;
Query1.SQL.Add('CREATE PROCEDURE ACTUAL_DEUDA_FAM (COD_FAM CHAR(6))');
Query1.SQL.Add('AS');
Query1.SQL.Add('declare variable nTotal numeric (15, 2);');
Query1.SQL.Add('BEGIN');
Query1.SQL.Add('END');
Query1.ExecQuery;
El problema es que cuando se crea el procedure en la BD la línea AS queda así:
ASdeclare variable nTotal numeric (15,2);
en lugar de:
AS
declare variable
y al ejecutar el procedure da error.
Cómo se puede solucionar?
Gracias por adelantado
Firebird 1.5 Delphi 2007