Erro na condiçao

[J Marcos]

Uso o IBEXPERT

E ESTOU TENTANDO CRIAR UM

PROCEDURE COM A SEGUINTE CONDIÇÃO

SE O CAMPO X DA TABELA RECEBER 0

VAI FAZER A SEGUITE CONTA

SE 1

VAI FAZER A SEGUINTE CONTA

A PARTE DO CODIGO E ESSE

if (estoque.promocao=1) then
          update ESTOQUE  SET
          ESTOQUE.prc_venda=ESTOQUE.prc_custo +
          ( (ESTOQUE.prc_custo * (ESTOQUE.icms_aliq  / 100))  ) + /* icms   % */
          ( (ESTOQUE.prc_custo * (ESTOQUE.aliq_ipi   / 100))  ) + /* ipi    % */
          ( (ESTOQUE.prc_custo * (ESTOQUE.perc_frete / 100))  ) + /* frete  % */
          ( (ESTOQUE.prc_custo * (ESTOQUE.markup     / 100))  ) + /* markup % */
          ( (ESTOQUE.prc_custo * (ESTOQUE.mg_lucro   / 100))  )  /* lucro  % */
       where
            ESTOQUE.codigo =(
            SELECT COMPRAS_ITENS.cod_produto FROM COMPRAS_ITENS
       WHERE
            FILIAL=:filial
       AND
            CODIGO=:CODIGO_COMPRA
       AND
            COD_PRODUTO=ESTOQUE.CODIGO
       )
       and
            estoque.filial=:filial
       and
            ESTOQUE.codigo=(SELECT COD_PRODUTO FROM COMPRAS_ITENS WHERE FILIAL=:filial AND CODIGO=:CODIGO_COMPRA   AND COD_PRODUTO=ESTOQUE.CODIGO);
       /* ------------------------------------------------------------- */
       /*********  ENTRADA NO ESTOQUE - AO EFETIVAR A COMPRA ************/
       update estoque SET QTD_TOTAL=QTD_TOTAL + (
       SELECT QUANTIDADE FROM COMPRAS_ITENS
       WHERE
             FILIAL=:filial
       AND
             CODIGO=:CODIGO_COMPRA
       AND
             COD_PRODUTO=ESTOQUE.CODIGO
       )
       where
             ESTOQUE.FILIAL=:FILIAL
       and
             estoque.codigo=(SELECT COD_PRODUTO FROM COMPRAS_ITENS WHERE FILIAL=:filial AND CODIGO=:CODIGO_COMPRA   AND COD_PRODUTO=ESTOQUE.CODIGO);

       /*********************** FECHAR COMPRA ******************************/

       update COMPRAS SET ATUALIZADO='S'
       WHERE
             FILIAL=:filial
       AND
             CODIGO=:CODIGO_COMPRA;
       end

Editado Maio 28, 2009 por kuroi
Adicionar tag CODE

[Ilma]

Oi, não entendi muito bem: se a condição for 1 irá fazer todo o código? Se sim, faltou um begin...end do if. tt

Att, Ilma.