Foros Club Delphi - problema novatol stored procedure

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)

- Firebird e Interbase (https://www.clubdelphi.com/foros/forumdisplay.php?f=19)

- - problema novatol stored procedure (https://www.clubdelphi.com/foros/showthread.php?t=62108)

Galahad

04-12-2008 12:00:06

problema novatol stored procedure

hola, estoy empezando con firebird y en el primer stored procedure que intento desarrollar tengo un problema super raro, este es el código del
procedimiento

Código:

 

ALTER PROCEDURE RELLENA_FAM_CUENTA (

    EMPRESA Varchar(3) )

AS

DECLARE VARIABLE ncontador smallint; 

declare variable ccadena   varchar(6);

BEGIN

    ncontador = 1;

    if (ncontador < 10) then  

         ccadena = '0' || cast( ncontador as varchar(6) ) 

    else 

         ccadena =   cast( ncontador as varchar(6) );   

   

END^

SET TERM ; ^

el problema me lo dá en la línea del 'else', me dice 'token desconocido'
no veo nada raro, en fin seguro que es una tonteria... :)
como administrador de la base de datos utilizo el Flamerobin.
saludos...

enecumene

04-12-2008 14:29:16

Hola, intentalo así:

Código SQL [-]ALTER PROCEDURE RELLENA_FAM_CUENTA (
    EMPRESA Varchar(3) )
AS
DECLARE VARIABLE ncontador smallint; 
declare variable ccadena   varchar(6);
BEGIN
    ncontador = 1;
    if (ncontador < 10) then  
         ccadena = '0' || cast( ncontador as varchar(6) ); 
    else ccadena =   cast( ncontador as varchar(6) );   
   
END^
SET TERM ; ^

Saludos.

Galahad

04-12-2008 15:42:49

Gracias

Cita:

Empezado por enecumene (Mensaje 329590)

Hola, intentalo así:

Código SQL [-]ALTER PROCEDURE RELLENA_FAM_CUENTA ( EMPRESA Varchar(3) ) AS DECLARE VARIABLE ncontador smallint; declare variable ccadena varchar(6); BEGIN ncontador = 1; if (ncontador < 10) then ccadena = '0' || cast( ncontador as varchar(6) ); else ccadena = cast( ncontador as varchar(6) ); END^ SET TERM ; ^

Saludos.

gracias, y eso que lo tenia delante,,,

La franja horaria es GMT +2. Ahora son las 14:02:24.