estamos com um problema a algum tempo na empresa, precisamos fazer uma 
procedure que zere os generators na base de dados, o exemplo está abaixo, o 
problema é que a procedure nao aceita que eu passe para o comando a variavel 
com o nome do generator, alguém jah fez algo assim, ou sabe o q devo fazer para 
poder funcionar esta procedure?


procedure___________________________________


CREATE PROCEDURE PP_ZERAR_ALL_GENERATORS 
AS
DECLARE VARIABLE VAR_GENERATOR VARCHAR(31);
DECLARE VARIABLE VAR_OLD_VALUE INTEGER;
BEGIN
  FOR
    SELECT RDB$GENERATORS.RDB$GENERATOR_NAME
    FROM RDB$GENERATORS
    WHERE RDB$GENERATORS.RDB$SYSTEM_FLAG IS NULL
    ORDER BY RDB$GENERATORS.RDB$GENERATOR_ID

    INTO :VAR_GENERATOR

  DO BEGIN
    VAR_OLD_VALUE = GEN_ID(VAR_GENERATOR,0);
    GEN_ID(VAR_GENERATOR, (VAR_OLD_VALUE * -1));
    SUSPEND;
  END
END

-- 
____________________________
att.: Oseas 'mentux' Tormen


Celular: +55 (49) 8403-0836
Cidade.: Chapecó - SC - BR
+++++++++++++++++++++++++++++++++++++++++

NM Informática
Desenvolvimento de Softwares Hospitalares
Fone Com.: +55 (49) 3322-4772
Fone Cel.: +55 (49) 8403-1993 
Rua......: Nereu Ramos, Ed. CPC
Bairro...: Centro
Cidade...: Chapecó - SC - BR
+++++++++++++++++++++++++++++++++++++++++

msn.......: [EMAIL PROTECTED]
ICQ.......: 169395237
Ymessenger: [EMAIL PROTECTED]
skype.....: mentux_
+++++++++++++++++++++++++++++++++++++++++




-- 
____________________________
att.: Oseas 'mentux' Tormen


Celular: +55 (49) 8403-0836
Cidade.: Chapecó - SC - BR
+++++++++++++++++++++++++++++++++++++++++

NM Informática
Desenvolvimento de Softwares Hospitalares
Fone Com.: +55 (49) 3322-4772
Fone Cel.: +55 (49) 8403-1993 
Rua......: Nereu Ramos, Ed. CPC
Bairro...: Centro
Cidade...: Chapecó - SC - BR
+++++++++++++++++++++++++++++++++++++++++

msn.......: [EMAIL PROTECTED]
ICQ.......: 169395237
Ymessenger: [EMAIL PROTECTED]
skype.....: mentux_
+++++++++++++++++++++++++++++++++++++++++




[As partes desta mensagem que não continham texto foram removidas]



-- 
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>

<*> Para ver as mensagens antigas, acesse:
    http://br.groups.yahoo.com/group/delphi-br/messages

<*> Para falar com o moderador, envie um e-mail para:
    [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

<*> Para visitar o site do seu grupo na web, acesse:
    http://br.groups.yahoo.com/group/delphi-br/

<*> Para sair deste grupo, envie um e-mail para:
    [EMAIL PROTECTED]

<*> O uso que você faz do Yahoo! Grupos está sujeito aos:
    http://br.yahoo.com/info/utos.html

 


Responder a