Produto: | |
---|---|
Linha de Produto: | |
Segmento: | |
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) : | - |
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.
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.
Nome | Tipo | Descrição |
---|---|---|
cProduto | Caractere | Código do produto que está sendo conferido. |
cLoteCtl | Caractere | Lote que está sendo conferido. |
Não se aplica.
Protheus 12.1.20 ou superiores, podendo ser aplicada sobre a 12.1.17 com solicitação de patch.
Todos os parâmetros são recebidos na User Function via PARAMIXB conforme consta em Execblock / Customização.
------
#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
------
<style> div.theme-default .ia-splitter #main { margin-left: 0px; } .ia-fixed-sidebar, .ia-splitter-left { display: none; } #main { padding-left: 10px; padding-right: 10px; overflow-x: hidden; } .aui-header-primary .aui-nav, .aui-page-panel { margin-left: 0px !important; } .aui-header-primary .aui-nav { margin-left: 0px !important; } .aui-tabs.horizontal-tabs>.tabs-menu>.menu-item.active-tab a::after { background: #FF9900; !important } .menu-item.active-tab { border-bottom: none !important; } </style> |