[firebase-br] AJUDA COM PROCEDURE

[Diego Maccari]

Pessoal

Nas procedure todos os campos do SELECT devem
ser tambem declarados como variáveis ? ou não necessariamente.

Att

Diego M.


-----Mensagem Original----- 
From: Hélio Oliveira
Sent: Tuesday, May 24, 2011 8:55 AM
To: lista em firebase.com.br
Subject: Re: [firebase-br] AJUDA COM PROCEDURE

Bom dia Diego !

Testa aí ... verifique que as variaveis devem ser precedidas com (:).

> SET TERM ^ ;
>
> CREATE OR ALTER PROCEDURE PROPORCIONA_PIS (
>      percent_ex decimal(18,4),
>      percent_mi decimal(18,4),
>      percent_nt decimal(18,4))
> as
> declare variable pis decimal(18,2);
> declare variable pis_ex decimal(18,2);
> declare variable pis_mi decimal(18,2);
> declare variable pis_nt decimal(18,2);
   declare variable base_calculo_pis numeric(12,2);
   declare variable aliquota_pis numeric(6,2);
> BEGIN
      select base_calculo_pis, aliquota_pis
      from tb_in_981_4140
      into :base_calculo_pis, :aliquota_pis;
>    PIS = ((:BASE_CALCULO_PIS / 100) * TB_IN_981_4104.ALIQUOTA_PIS);
>    PIS_EX = (((:BASE_CALCULO_PIS  / 100) * :ALIQUOTA_PIS) * :PERCENT_EX / 
> 100);
>    PIS_MI = (((:BASE_CALCULO_PIS  / 100) * :ALIQUOTA_PIS) * :PERCENT_MI / 
> 100);
>    PIS_NT = (((:BASE_CALCULO_PIS  / 100) * :ALIQUOTA_PIS) * :PERCENT_NT / 
> 100);
>
>    IF (:PIS_EX>  0.0000) THEN
>      IF (:PIS_EX<  0.0100) THEN
>        PIS_EX = 0.0100;
>
>    IF (:PIS_MI>  0.0000) THEN
>      IF (:PIS_MI<  0.0100) THEN
>        PIS_MI = 0.0100;
>
>    IF (:PIS_NT>  0.0000) THEN
>      IF (:PIS_NT<  0.0100) THEN
>        PIS_NT = 0.0100;
>
>    UPDATE tb_in_981_4104
>    SET
>      VALOR_PIS = :PIS,
>      VALOR_PIS_EXPORTACAO = :PIS_EX,
>      VALOR_PIS_MERC_INTERNO = :PIS_MI,
>      VALOR_PIS_N_TRIB_INTERNO = :PIS_NT
>    WHERE
>      CNPJ = '00.000.000/0001-91' AND MES = 'Janeiro' AND ANO = 2010 AND
>      CODIGO_SIT_TRIBUTARIA_PIS = '70' AND CODIGO_SIT_TRIBUTARIA_COFINS = 
> '70';
>
>    SUSPEND;
> END^
>
> SET TERM ; ^
>
> GRANT SELECT,UPDATE ON TB_IN_981_4104 TO PROCEDURE NEW_PROCEDURE;
>
>
>
>
> ______________________________________________
> FireBase-BR (www.firebase.com.br) - Hospedado em www.locador.com.br
> Para saber como gerenciar/excluir seu cadastro na lista, use: 
> http://www.firebase.com.br/fb/artigo.php?id=1107
> Para consultar mensagens antigas: http://firebase.com.br/pesquisa


-- 
[]'s,

Hélio Oliveira
Bel. Ciência da Computação
Técnico em Contabilidade
e-mail : hpensador em gmail.com
Skype : hpensador
http://hpensador.blogspot.com/
www.hpensador.net
(71) 9975-9176


______________________________________________
FireBase-BR (www.firebase.com.br) - Hospedado em www.locador.com.br
Para saber como gerenciar/excluir seu cadastro na lista, use: 
http://www.firebase.com.br/fb/artigo.php?id=1107
Para consultar mensagens antigas: http://firebase.com.br/pesquisa