Produto: | |
---|---|
Linha de Produto: | |
Segmento: | |
Módulo: | SIGAWMS - Gestão de Armazenagem |
Função: | - |
País: | Todos Países |
Ticket: | - |
Requisito/Story/Issue (informe o requisito relacionado) : | DLOGWMSMSP-15461 |
Permite elaborar a tela de seleção do endereço de destino do endereçamento.
Localizado na solicitação do endereço destino. Funciona independente do parâmetro MV_WMSNEW.
Não se aplica
Nome | Tipo | Descrição | Obrigatório |
---|---|---|---|
lRet | Lógico | Validação da seleção do endereço de destino do endereçamento | Sim |
Protheus 12.1.17 ou superiores.
Não se aplica
------
#INCLUDE 'PROTHEUS.CH'
#INCLUDE 'APVT100.CH'
User Function DV080DST()
Local cEnd := SDB->DB_ENDDES
While .T.
DLVTCabec('Leve para o Endereco',.F.,.F.,.T.)
@ 02, 00 VTSay PadR("Endereco", VTMaxCol())
@ 03, 00 VTSay PadR(cEnd, VTMaxCol())
@ 05, 00 VTSay PadR("Confirme !", VTMaxCol())
@ 06, 00 VTGet cEnd Pict '@!' Valid VLDEND(cEnd)
VTRead()
If (VTLastKey()==27)
If DLVTAviso("MSG1","Deseja encerrar o Enderecamento?", {"Sim","Nao"})==1
DLVOpcESC(1) // Bloquear Todas Atividades
lRet := .F.
Else
Loop
EndIf
EndIf
Exit
EndDo
return .T.
Function VLDEND(cEnd)
Return .T.
------
<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> |