Pesquisa

Pesquisa personalizada

domingo, 7 de maio de 2017

Exemplo de Procedure no Firebird

firebird
Neste exemplo vai retornar um registro com o campo RESULTADO contendo o valor do cálculo realizado pela procedure.

SET TERM !!;

CREATE PROCEDURE PRO_TESTE(QTD INTEGER)

RETURNS (RESULTADO INTEGER )

AS

DECLARE VARIABLE CONT INTEGER;

BEGIN

  CONT = 0;

  WHILE (CONT <= QTD) DO

  BEGIN

     CONT = CONT + 1;

  END

  RESULTADO = QTD * CONT;

  SUSPEND;

END !!


Para executar pode fazer uma query com:


SELECT * FROM PRO_TESTE (6);




Nenhum comentário: