Histórico da Página
...
Nome | Tipo | Descrição |
---|---|---|
cProduto | Caractere | Código do produto que está sendo conferido. |
cLoteCtl | Caractere | Lote que está sendo conferido. |
05. RETORNO
Este Ponto de Entrada não possui retornoNão se aplica.
06. VERSÕES
12.1.20 e 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.
08. EXEMPLO
...
language | cpp |
---|---|
title | Exemplo |
linenumbers | true |
collapse | true |
...
------
#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
------
Templatedocumentos |
---|
HTML |
---|
<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> |