Re: [firebase-br] Aos que ainda não atualizaram sua versões para FB 1.5.2
Ander
anderson em easybit.com.br
Sex Fev 18 16:40:49 -03 2005
Valeu Joelson, ótima dica.
Abraço,
Anderson
At 15:20 18/2/2005, Joelson wrote:
>Essa trigger funcionava no computador de desenvolvimento com o FB 1.5.2
>e não funcionava de forma correta no FB 1.5.0 que estava no cliente, quando
>atualizei atualizei a versão no cliente, ela passou a funcionar a contento...
>
>então fica a dica pro pessoal que ainda usa o FB 1.5.0, atualizar pra FB
>1.5.2.
>
>CREATE TRIGGER ATUALIZA_ESTOQUE FOR SAIDA
>ACTIVE BEFORE UPDATE POSITION 20
>AS
>DECLARE VARIABLE PROD INTEGER;
>DECLARE VARIABLE QTDE NUMERIC(18,3);
>BEGIN
> IF ((OLD.FINALIZADO='N') AND (NEW.FINALIZADO='S')) THEN
> FOR SELECT PRODUTO, QUANTIDADE FROM DET_SAIDA
> WHERE SAIDA=NEW.CODIGO INTO :PROD, :QTDE DO
> BEGIN
> UPDATE PRODUTOS SET
> ESTOQUE=ESTOQUE - :QTDE
> WHERE CODIGO = :PROD
> AND BAIXA_ESTOQUE='S';
>
> UPDATE PRODUTOS SET
> ESTOQUE=ESTOQUE - :QTDE
> WHERE CODIGO = (SELECT BAIXA_ESTOQUE_2 FROM
> PRODUTOS WHERE CODIGO = :PROD)
> AND BAIXA_ESTOQUE='S';
> END
>END
>
>sem mais
>
>Joelson______________________________________________
>FireBase-BR (www.firebase.com.br) - Hospedado em www.bavs.com.br
>Para editar sua configuração na lista, use o endereço
>http://mail.firebase.com.br/mailman/listinfo/lista_firebase.com.br
>
>No virus found in this incoming message.
>Checked by AVG Anti-Virus.
>Version: 7.0.300 / Virus Database: 265.8.8 - Release Date: 14/2/2005
--
No virus found in this outgoing message.
Checked by AVG Anti-Virus.
Version: 7.0.300 / Virus Database: 265.8.8 - Release Date: 14/2/2005
Mais detalhes sobre a lista de discussão lista