01. DADOS GERAIS

Produto:

Linha de Produto:

Segmento:

Módulo:

Função:MATA390 - Manutenção de Lotes
País:Todos


02. DESCRIÇÃO

LOCALIZAÇÃO: Function MATA390 - Manutenção de Lotes.

EM QUE PONTO: O Ponto de entrada é executado após a alteração da data de validade, é utilizado para realizar validações na data de validade.


03. DEMAIS INFORMAÇÕES

PARÂMETROS

Nome

Tipo

Descrição

dDataValidDataData de validade


RETORNO

Não se aplica


EXEMPLO DE UTILIZAÇÃO ADVPL

User Function MT390DTV()

	Local dDataValid := PARAMIXB
	Local lSeek      := .F.
	Local aAreaSD5   :=  SD5->(GetArea())

	DbSelectArea("SD5")
	DbSetOrder(3)
	lSeek := DbSeek(xFilial('SD5')+SD5->D5_NUMSEQ+SD5->D5_PRODUTO, .F.)
	//Validação do usuario
	If !Empty(dDataValid ).And. lSeek
		RecLock('SD5', .F.)
		Replace D5_DTVALID With dDataValid
		MsUnlock()
	EndIf
	RestArea(aAreaSD5)

Return

04. ASSUNTOS RELACIONADOS