01. DADOS GERAIS

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


02. DESCRIÇÃO

Permite elaborar a tela de seleção do endereço de destino do endereçamento.

03. LOCALIZAÇÃO

Localizado na solicitação do endereço destino. Funciona independente do parâmetro MV_WMSNEW.

04. PARÂMETROS

Não se aplica

05. RETORNO

NomeTipoDescriçãoObrigatório
lRetLógicoValidação da seleção do endereço de destino do endereçamentoSim

06. VERSÕES

Protheus 12.1.17 ou superiores.

07. OBSERVAÇÃO

Não se aplica

08. EXEMPLO

------

#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.

------

09. ASSUNTOS RELACIONADOS



<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>