Histórico da Página
...
Atenção: O ponto de entrada é executado após atualização movimentos internos (SD3) e antes da atualização Saldos Físico e Financeiro (SB2) . Ao executar a rotina recálculo do custo médio (MATA330) com o ponto de entrada, o retorno do array será adicionado no campo B2_VFIM1, se o movimento for uma DE e subtraído do B2_VFIM1 se o movimento for uma RE. Os campos variam no array de acordo com a moeda, sendo a moeda 1 padrão e os demais campos de acordo com as moedas configuradas no sistema. O tratamento de moedas deve ser considerados na lógica de preenchimento do array. O valor B2_VFIM1,B2_VFIM2,B2_VFIM3,B2_VFIM4 e B2_VFIM5 será utilizado para o processo de fechamento do estoque, este valor será transferido para o valor no início do próximo período, portanto o preenchimento da moeda no array deve ser compatível com o que é utilizado no sistema. Caso não utilize outras moedas e informar o valor no array estes serão atualizados nos campos correspondentes na tabela SB2. |
|---|
Exemplo: Utilizando RE com Moeda 1
Saldo Iniciais(MATA220).
...
Movimentação Interna(MATA241).
...
Após o processamento do recálculo do custo médio (MATA330).
...
03. DEMAIS INFORMAÇÕES
PARÂMETRO
...
| 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 RE com Moeda 1
Saldo Iniciais(MATA220).
| Produto | Armazém | Qtd.Inic.Mes | Sld.Ini.Mes |
|---|---|---|---|
| 000001 | 01 | 100.000,00 | 35.000,00 |
Movimentação Interna(MATA241).
| TM | Produto | Quantidade |
|---|---|---|
| 501 | 000001 | 1 |
Após o processamento do recálculo do custo médio (MATA330).
| Cálculo realizado SB2 | Resultado | Campos |
|---|---|---|
| 100.000 - 1 | 999.99 | Qtd. Fim Mes (B2_QATU) |
| 35.000,00 - 100 | 34.900,00 | Vlr.Final (B2_VFIM1) |
04. ASSUNTOS RELACIONADOS
- Não se aplica
...
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas