Custo Médio

O Totall BackOffice possui em sua base funções para cálculo e apresentação de custo médio que são utilizadas pelos módulos do sistema para exibir o mesmo. Estas funções são utilizadas por exemplo nos forms de Inventário, Sintegra e Histórico de Produtos. Este documento descreve de forma resumida como estas informações estão guardadas no banco de dados, bem como as operações matemáticas para o cálculo do custo médio.

O cálculo do custo médio é baseado nas vendas (TT_VEN) e compras/importação (TT_COM + TT_VEN->TD_NAT.TIPNAT = 'I') de um determinado produto.

Não leva em conta lançamentos avulsos do produto (TT_LAN). A formula utilizada é a seguinte: É feito um select com todas as vendas e compras/importação, ordenadas por data, de um determinado produto. Para cada linha se calcula:

Qtd em Estoque = Qtd em Estoque Anterior + Qtd Movimentada ~> Se for uma compra/importação

Valor do Estoque = Valor do Estoque Anterior + Valor Movimentado;

Custo Médio = Valor Estoque / Qtd Estoque ~> Se for uma venda

Valor do Estoque = Valor do Estoque Anterior + (Qtd Movimentada pela venda * Custo Médio)

Observações:

a) A cada nova linha são utilizados para o cálculo a Quantidade e Valor de Estoque da linha anterior.

b) O Custo Médio nunca pode ficar negativo visto que não é possível se ter um estoque negativo, caso em qualquer momento isto aconteça, o calculo das linhas subseqüente ficará inconsistente.

c) Note pela fórmula que o valor de venda do produto em nada interfere no custo médio.

Exemplo de cálculo: Ver planilha Custo Médio.xls

• Compras

  cm_uni_calculado = Valor_item -- Valor do Item
 		    + custo_frete -- Valor Frete
 		    + valor_ipi + --Valor IPI
 		    + Valor_ICMS_calculado
 		    - valor_pis
 		    - valor_cofins

• Importação

  cm_uni_calculado = base_II -- Base II 
 		    + valor_II -- Valor II 
 		    + valor_pis -- Valor PIS
 		    + valor_cofins -- Valor COFINS 
 		    + valor_ant -- Anti Dumping
 		    + valor_adu -- Despesas Aduaneiras
 		    - valor_pis_cre -- Valor PIS Creditável 
 		    - valor_cof_cre -- Valor COFINS Creditável

• Compras

   cmg_uni_calculado =     Valor_item  -- Valor do Item
 			  + custo_frete  -- Valor Frete
 			  + valor_ipi -- Valor IPI
 			  + substituicao_item
 			  + Valor_retencao

• Importação

   cmg_uni_calculado =     base_II -- Base II 
 			  + valor_II -- Valor II 
 			  + valor_ant -- Anti Dumping
 			  + valor_adu -- Despesas Aduaneiras

• Compras

 Valor_item = ((valor_liquido_compra-valor_sub_compra)*(total_item+valor_ipi)/Nvlz(valor_bruto_compra, 1))-valor_ipi

 Se tipo_icms = 'Tributado' AND tributacao_na_venda = 'Substituído' AND retem_substituicao = 'T' 
    Valor_ICMS_calculado = Valor_retencao	
 Senão
 Valor_ICMS_calculado = substituicao_item 
 					   + Valor_retencao
 					   - Se tributacao_na_venda <> 'Substituído' então VLRICM senão 0				   

 Se substituido_federal='F' e isento_pis='F' então
     Se piscofins_no_ipi = 'T' 
 	   valor_pis = ((pis/100)*(Valor_item+valor_ipi))  -- Valor PIS
     Senão  
 	   valor_pis = ((pis/100)*(Valor_item))            -- Valor PIS
 Senão valor_pis = 0

 \\ttadm\Docs\publico\Base de Conhecimento\backoffice\produtos\custo médio\Detalhamento_Custo_Medio.sql

TT_ACM

ORD_CM serve somente para garantir que ao se verificar os itens em um mesmo dia sempre fiquem na mesma ordem.

VLRAJU são os valores que afetarão o custo médio daquele dia. É equivalente às colunas VLR_CM e VLRCMG da TT_ICO.

QTD_CM está fixo 0 na rotina de cálculo.

O ajuste de CM é considerado no início do dia, antes dos demais movimentos.

TT_ICO

ORD_CM serve somente para garantir que ao se verificar os itens em um mesmo dia sempre fiquem na mesma ordem.

QTD_CM é obtido pelo QTDMOV na trigger.

VLR_CM, VLRCMG e QTD_CM são os custos da compra que serão considerados nos cálculos.

TT_LAN

ORD_CM serve somente para garantir que ao se verificar os itens em um mesmo dia sempre fiquem na mesma ordem.

QTD_CM é obtido pelo QTDMOV na trigger.

TT_IVE

ORD_CM serve somente para garantir que ao se verificar os itens em um mesmo dia sempre fiquem na mesma ordem.

QTD_CM é obtido pelo QTDMOV na trigger.

VLR_CM, VLRCMG e QTD_CM são os custos da importação que serão considerados nos cálculos.

TR_MOV

Não é guardado o custo médio unitário, mas para obtê-lo basta dividir o valor pela quantidade.

TT_SAL

CAL_CM é utilizado para continuar o cálculo sem necessitar recalcular tudo novamente.Lembrando que o custo médio não é calculado logo após uma compra ou uma venda pois isto iria tornar este processo demorado.

Os campos QTD_CM, VLR_CM e VLRCMG são para registrar um custo médio inicial para clientes que não tem como resgatar o seu estoque desde o inicio de suas atividades.

Neste caso o sistema começará o cálculo a partir desta data e levando em conta estes valores iniciais.

CalculaCustoMedio(pCODFIL,pFILMAT,pCODMAT,pCODCOR,pCODTAM): Calcula o custo médio de um determinado produto. O custo médio é calculado a partir da maior date entre CAL_CM (Data até a qual já foi calculado) ou INI_CM (Data inicial para calcular o Custo Médio). Para cada lançamento grava a ordem que o mesmo foi processado(ORD_CM), para reordenação posterior. A cada dia é gravado na TR_MOV o VLR_CM e QTD_CM para futuras consultas do custo médio. No final do processo é gravado em CAL_CM a data da ultima movimentação calculada.

CalculaCustoMedioFilial(pCODFIL): Calcula o custo médio de toda uma filial. Utiliza os mesmos processos da CalculaCustoMedio

CustoMedio (p_CodFil, p_FilMat, p_CodMat , p_CodCor, p_CodTam, p_Tipo, p_DatRef): Retorna informaçoes de custo médio de um produto em determinada data e acordo com o tipo passado: Se Tipo=1 -> Retorna Quantidade em estoque Se Tipo=2 -> Valor Total do Estoque (Padrão) Se Tipo=3 -> Custo Médio do Produto Se não for passada uma data calcula até a data atual.

JOB_Recalcula_Custo_Medio

CREATE OR REPLACE PROCEDURE ProcCalculaCustoMedio IS
vCODFIL TD_FIL.CODFIL%TYPE;
cTemp VARCHAR(20);
CURSOR Filiais IS
SELECT vCODFIL
 from TD_FIL;
BEGIN
 OPEN Filiais;
 LOOP
   FETCH Filiais INTO vCODFIL;
   EXIT WHEN Filiais%NOTFOUND;
   cTemp:=CalculaCustoMedioFilial(vCODFIL);
 END LOOP;         
 CLOSE Filiais;
end ProcCalculaCustoMedio;
/

VARIABLE JOBNO NUMBER;
BEGIN
    DBMS_JOB.SUBMIT(:JOBNO
                   ,'ProcCalculaCustoMedio;'
                   ,SYSDATE
                   ,'trunc(SYSDATE) + 23/24'
                   );
END;
/

O custo médio só é materializado nas tabelas por causa do custo-banco de se calcular o custo progressivamente desde a data inicial até o momento de determinada operação ou resumo. Mas se modificarmos a função, teremos que recalcular os valores que estão materializados para que fiquem condizentes com a mudança da função. Abaixo estão alguns exemplos de como fazer isso.

Para recalcular o custo dos últimos dois meses podemos marcar na tabela de saldo que o custo médio está calculado até 2 meses atrás.

update tt_sal
   set cal_cm = add_day(Trunc(Agora()),-60),
       atu_cm = 'F'
 where codmul = 0
   and cal_cm >= add_day(Trunc(Agora()),-60)

Nos clientes, o JOB_CALCULACUSTOMEDIOFILIAL está agendado para rodar todas as noites. Ele fará o recalculo para nós.

Mas se quisermos o resultado na hora, podemos chamar a função CalculaCustoMedioFilial para cada filial.

DECLARE
vCODFIL TD_FIL.CODFIL%TYPE;
cTemp VARCHAR(20);
CURSOR Filiais IS
SELECT vCODFIL
 from TD_FIL;
BEGIN
 OPEN Filiais;
 LOOP
   FETCH Filiais INTO vCODFIL;
   EXIT WHEN Filiais%NOTFOUND;
   cTemp:=CalculaCustoMedioFilial(vCODFIL);
 END LOOP;        
 CLOSE Filiais;
end;
/