Histórico da Página
...
| Bloco de código | ||||||||||
|---|---|---|---|---|---|---|---|---|---|---|
| ||||||||||
#Include 'totvs.ch'
User Function MA330C3()
Local aCusto := PARAMIXB
Local aRet := aCusto
Local cMoeda := SuperGetMv('MV_MOEDACM',.F.,"2345")
// Validações do Usuário
If SD3->D3_COD = "000001"
If Alltrim(SD3->D3_CF) == "RE0" .Or. Alltrim(SD3->D3_CF) == "DE0"
aRet[1] := 100 // Custo Moeda 1 (B2_VFIM1)
If "2" $ cMoeda
aRet[2] := 0 // Custo Moeda 2 (B2_VFIM2)
EndIf
If "3" $ cMoeda
aRet[3] := 0 // Custo Moeda 3 (B2_VFIM3)
EndIf
If "4" $ cMoeda
aRet[4] := 0 // Custo Moeda 4 (B2_VFIM4)
EndIf
If "5" $ cMoeda
aRet[5] := 0 // Custo Moeda 5 (B2_VFIM5)
EndIf
EndIf
EndIf
Return aRet |
Utilizando Exemplo de uma requisição (RE com Moeda 1) com o uso do ponto de entrada na moeda 1.
Esse cenário vai ser gerado uma movimentação interna(MATA241) RE0, com o tipo de movimentação que controla estoque.
Passo 1: Gerar saldo inicial para o produto com quantidade inicial mês 100.000,00 e saldo inicial mês de 35.000,00.
Saldo Iniciais(MATA220).
| Produto | Armazém | Qtd.Inic.Mes | Sld.Ini.Mes |
|---|---|---|---|
| 000001 | 01 | 100.000,00 | 35.000,00 |
Passo 2: Gerar um movimento interno com tipo de movimentação (TM) que controla estoque com quantidade 1.
Movimentação Interna(MATA241).
| TM | Produto | Quantidade |
|---|---|---|
| 501 | 000001 | 1 |
Como vai ficar os campos da tabela de Saldos Físicos e Financeiro (SB2)
| Vlr.Final (B2_VFIM1) | Saldo Atual (B2_QATU) | Sld.Atu. (B2_VATU1) | C Unitario (B2_CM1) |
|---|---|---|---|
| 0 | 99999 | 34.999,65 | 0,35 |
Passo 3: Rodar a rotina Após o processamento do recálculo do custo médio (MATA330).
Será feito o seguinte cálculo
| Cálculo realizado SB2 | Resultado | Campos a ser gravados |
|---|---|---|
| Qtd.Inic.Mes(100.000) - Quantidade movimentação(1) | 999.99 | Qtd. Fim Mes (B2_ |
| QFIM) | ||
| Sld.Ini.Mes(35.000,00) - Valor incluído no ponto de entrada aRet(100) | 34.900,00 | Vlr.Final (B2_VFIM1) |
No final do recálculo do custo médio as tabelas Saldos Físico e Financeiro (SB2).
| Qtd. Fim Mes (B2_QFIM) | Vlr.Final (B2_VFIM1) | Saldo Atual (B2_QATU) | C Unitario (B2_CM1) |
|---|---|---|---|
| 99.999 | 34.999,65 | 99.999 | 0,35 |
04. ASSUNTOS RELACIONADOS
- Não se aplica
...
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas