M331DATA – Alteração da data de início da contabilização do custo médio do estoque

Utilizamos o ponto de entrada M331DATA para alterar a data de início da contabilização do custo médio.

O padrão é a data do parâmetro MV_ULMES+1.

1 - A contabilização de períodos já encerrados pode acarretar problemas na contabilização dos movimentos de estoque. É recomendável efetuar backup da base de dados antes de executar este procedimento.
2 - Ao criar o ponto de entrada, é possível criar uma validação a critério do usuário (leitura de algum parâmetro específico, por exemplo).

User Function M331DATA()
Local dDatai :=PARAMIXB[1]

DEFINE MSDIALOG oDlg TITLE OemToAnsi('Data Inicial') From 100,70 To 250,300 OF oMainWnd PIXEL

@ 20,10 SAY 'Data Inicial:' Of oDlg PIXEL SIZE 27 ,9

@ 20,40 MSGET dDatai PIXEL SIZE 65,9

@ 50,25 BUTTON 'Confirma' SIZE 35,9 FONT oDlg:oFont ACTION {|| oDlg:End() }OF oDlg PIXEL
@ 50,70 BUTTON 'Cancelar' SIZE 35,9 FONT oDlg:oFont ACTION {|| dDatai := CTOD(" / / "),oDlg:End() } OF oDlg PIXEL

ACTIVATE MSDIALOG oDlg CENTERED
Return dDatai

Português(Brasil)

Microsiga Protheus®11

Todos

Todas

PARAMIXB[1] : A posição 1 deste array recebe a data inicial, após o último fechamento de estoque (MV_ULMES+1).

ExpL1(Data)
Retorno da data que deve ser menor que a do último encerramento do estoque (MV_ULMES).

MATA331.PRX