Fórum Problema Divisão retorna Zero #523852

CREATE OR ALTER PROCEDURE SP_RESULT_METAS_VENDAS (
    dt_ini date,
    dt_fim date)
returns (
    met_id integer,
    data_ini date,
    data_fim date,
    dias_uteis integer,
    dias_decorridos integer,
    fun_id integer,
    fun_apelido varchar(30),
    meta_valor numeric(18,2),
    meta_qtde numeric(9,2),
    meta_qtde_diaria numeric(9,2),
    meta_valor_diaria numeric(18,2),
    qtde_pedidos numeric(9,2),
    valor_pedidos numeric(18,2),
    resultado_qtde numeric(9,2),
    resultado_valor numeric(18,2),
    perc_result_qtde numeric(5,2),
    perc_result_valor numeric(5,2),
    tendencia numeric(18,2),
    perc_tendencia numeric(5,2),
    equ_id integer,
    equipe varchar(44),
    responsavel integer,
    responsavel_nome varchar(30),
    obs varchar(200),
    status integer,
    data_cad timestamp,
    data_alt timestamp,
    loj_id integer,
    loj_nome varchar(30),
    usu_id integer,
    usu_login varchar(20))
as
declare variable v1 numeric(18,2);
declare variable v2 numeric(18,2);
BEGIN
  FOR
    select 
        metas_vendas.met_id,
        metas_vendas.data_ini,
        metas_vendas.data_fim,
        (SELECT uteis FROM NUM_DIAS_UTEIS(metas_vendas.data_ini, metas_vendas.data_fim, 'FORTALEZA', 'CE')),
        current_date - metas_vendas.data_ini,
        metas_vendas.fun_id,
        funcionarios.fun_apelido,
        metas_vendas.meta_valor,
        metas_vendas.meta_qtde,
        metas_vendas.equ_id,
        equipes.equipe,
        equipes.fun_id AS RESPONSAVEL,
        (SELECT FUNCIONARIOS.FUN_APELIDO FROM FUNCIONARIOS WHERE FUNCIONARIOS.FUN_ID = EQUIPES.FUN_ID) AS RESPONSAVEL_NOME,
        metas_vendas.obs,
        metas_vendas.status,
        metas_vendas.data_cad,
        metas_vendas.data_alt,
        metas_vendas.loj_id,
        lojas.loj_nome,
        metas_vendas.usu_id,
        usuarios.usu_login
    from metas_vendas
       inner join funcionarios on (metas_vendas.fun_id = funcionarios.fun_id)
       left join equipes on (metas_vendas.equ_id = equipes.equ_id)
       inner join lojas on (metas_vendas.loj_id = lojas.loj_id)
       inner join usuarios on (metas_vendas.usu_id = usuarios.usu_id)
    where
        cast(metas_vendas.data_ini as date) between :dt_ini and :dt_fim and
        cast(metas_vendas.data_fim as date) between :dt_ini and :dt_fim
    INTO :MET_ID,
         :DATA_INI,
         :DATA_FIM,
         :dias_uteis,
         :dias_decorridos,
         :FUN_ID,
         :FUN_APELIDO,
         :META_VALOR,
         :META_QTDE,
         :EQU_ID,
         :EQUIPE,
         :RESPONSAVEL,
         :RESPONSAVEL_NOME,
         :OBS,
         :STATUS,
         :DATA_CAD,
         :DATA_ALT,
         :LOJ_ID,
         :LOJ_NOME,
         :USU_ID,
         :USU_LOGIN
  DO


  FOR
    select
         sum(pedidos_itens.pi_qtde) ,
         sum(pedidos_itens.pi_total)
    from pedidos
    inner join pedidos_itens on (pedidos.ped_id = pedidos_itens.ped_id)
    inner join produtos on (pedidos_itens.prod_id = produtos.prod_id)
    left join fornecedor on (produtos.for_id = fornecedor.for_id)
    where
        pedidos.status = 1 and
        pedidos.tipo_id < 5 and
        cast(pedidos.data_emissao as date) between :dt_ini and :dt_fim  and
        pedidos.fun_id = :fun_id

    INTO  :QTDE_PEDIDOS,
          :VALOR_PEDIDOS
  DO



  BEGIN
    if (QTDE_PEDIDOS > 0) then
    begin
      RESULTADO_QTDE  =  QTDE_PEDIDOS - META_QTDE;
      perc_result_qtde = (QTDE_PEDIDOS / META_QTDE)*100;
    end
    else RESULTADO_QTDE  = 0;
    if (VALOR_PEDIDOS > 0) then
    begin
       RESULTADO_VALOR =  VALOR_PEDIDOS - META_VALOR;
       perc_result_valor = (VALOR_PEDIDOS / META_VALOR)*100;
    end
    else RESULTADO_VALOR =0;

    meta_qtde_diaria  = META_QTDE / dias_uteis;
    meta_valor_diaria = META_VALOR / dias_uteis ;

    v1 = (META_VALOR * iif(VALOR_PEDIDOS < 0,VALOR_PEDIDOS*-1,VALOR_PEDIDOS));

    perc_tendencia = CAST((dias_decorridos  / v1) as numeric(5,2));

    SUSPEND;
  END
END