01. DADOS GERAIS
Produto: | TOTVS Logística WMS
|
---|---|
Linha de Produto: | Linha Protheus |
Segmento: | Logística |
Módulo: | SIGAWMS - Gestão de Armazenagem |
Função: | WMSA320 - Conferência de Recebimento |
País: | Todos Países |
Ticket: | - |
Requisito/Story/Issue (informe o requisito relacionado) : | - |
02. DESCRIÇÃO
Este Ponto de Entrada permite efetuar processos complementares após a informação do lote como, por exemplo, solicitar a informação de data de validade.
03. LOCALIZAÇÃO
Localizado na tela de Conferência, na qual são informados os produtos e os lotes recebidos, exatamente após a informação e a validação do lote, antes de solicitar a quantidade.
04. PARÂMETROS
Nome | Tipo | Descrição |
---|---|---|
cProduto | Caractere | Código do produto que está sendo conferido. |
cLoteCtl | Caractere | Lote que está sendo conferido. |
05. RETORNO
Não se aplica.
06. VERSÕES
Protheus 12.1.20 ou superiores, podendo ser aplicada sobre a 12.1.17 com solicitação de patch.
07. OBSERVAÇÃO
Todos os parâmetros são recebidos na User Function via PARAMIXB conforme consta em Execblock / Customização.
08. EXEMPLO
------
#INCLUDE "PROTHEUS.CH"
#INCLUDE "APVT100.CH"
Static __dDatVld := CtoD("")
User Function WV073AIL()
Local aTelaAnt := VTSave(00, 00, VTMaxRow(), VTMaxCol())
Local cProduto := PARAMIXB[1]
Local cLoteCtl := PARAMIXB[2]
__dDatVld := CtoD("")
VTClear()
DLVTCabec("Conferência",.F.,.F.,.T.)
@ 01,00 VtSay "Produto:"
@ 02,00 VTSay cProduto
@ 03,00 VtSay "Lote: "+cLoteCtl
@ 04,00 VTSay "Data Validade:"
@ 05,00 VtGet cDatValid Valid ValDatVld(cProduto,cLoteCtl,cDatValid) // Valida a data e atribui a static para recuperar depois
VtRead()
// Restaura tela anterior
VTRestore(00, 00, VTMaxRow(), VTMaxCol(), aTelaAnt)
Return
------