12- Lançamento de Correção Monetária

Utilitário desenvolvido exclusivamente para as empresas SA Chilenas.

Através dele, realize a correção monetária de existência, no dia 31/12 de cada ano. Esse processo consiste em verificar a data da última compra de cada item e multiplicar o custo médio por um fator correspondente ao mês desta data.

Se a data da última compra está no ano anterior ao processado, o novo custo médio será o custo médio vigente em 31/12 do ano anterior, multiplicado pelo fator de correção cadastrado para a moeda IPC, no mês de dezembro do ano anterior ao processado.

Se a data da última compra está no primeiro semestre do ano processado, o novo custo médio será o valor da maior compra realizada neste período (1º semestre), multiplicado pelo fator de correção cadastrado para a moeda IPC válido para o primeiro semestre do ano processado.

Se a data da última compra está no segundo semestre do ano processado, o novo custo médio será o valor da maior compra realizada neste período (2º semestre), sem nenhuma correção (ou corrigido pelo fator vigente para a moeda IPC no segundo semestre, que deve ser 1,000).

A moeda IPC (Índice de Preços ao Consumidor, que mede a inflação) deve estar previamente cadastrada, informando em dezembro do ano anterior ao processado o fator de correção anual, de janeiro a junho o fator de correção do 1º semestre, e de julho a dezembro do ano processado, o fator = 1 (pois não há correção).

Exemplo - Ano 2008

Produto com saldo em 31/12/2008, mas sem movimento de compra em 2008:

• FI 1002 – Aviso de troca de turno.

• Custo médio em 31/12/2008, antes da correção = custo médio vigente em 31/12/2007 = 1.202,49.

• Fator de correção do ano 2008: 8,9%.

• Moeda IPC cadastrada de 01 a 31/12/2007 com valor 1,089.

• Custo médio em 31/12/2008, depois da correção = 1.202,49 * 1,089 = 1.309,51.

Produto com saldo em 31/12/2008, com última compra no 1º semestre de 2008:

• FI 1059 – Resumo de moedas.

• Custo médio em 31/12/2008, antes da correção = 1.782,20.

• Maior valor unitário de compra no 1º semestre: 1.900,00.

• Fator de correção do 1º semestre de 2008: 5.5%.

• Moeda IPC cadastrada de 01/01/2008 a 30/06/2008 com valor  1,055.

• Custo médio em 31/12/2008, depois da correção = 1.900 * 1,055 = 2.004,50.

Produto com saldo em 31/12/2008, com ultima compra no 2º semestre de 2008:

• FI 2001 – Boleta de serviços.

• Custo médio em 31/12/2008, antes da correção = 6.386,36.

• Maior valor unitário de compra no 2º semestre: 7.000,00.

• Fator de correção do 2º semestre de 2008: 0%.

• Moeda IPC cadastrada de 01/07/2008 a 31/12/2008 com valor  1,000.

• Custo médio em 31/12/2008, depois da correção = 7.000,00 * 1 = 7.000,00.