| 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) : | - |
Este Ponto de Entrada permite efetuar a customização na geração dos códigos de volume de forma automática.
Localizado antes da solicitação do código do volume a ser montado pelo Operador.
| Nome | Tipo | Descrição |
|---|---|---|
cCarga | Caractere | Carga para a qual se está montando os volumes |
cPedido | Caractere | Pedido para o qual se está montando os volumes |
| Nome | Tipo | Descrição |
|---|---|---|
cVolume | Caractere | Código do volume |
11.80.19 ou superiores
Todos os parâmetros são recebidos na User Function via PARAMIXB conforme consta em Execblock / Customização
#INCLUDE "PROTHEUS.CH"
User Function WV080CDV()
Local aAreaAnt := GetArea()
Local cCarga := PARAMIXB[1]
Local cPedido := PARAMIXB[2]
Local cVolume := ""
Local cQuery := ""
Local cAliasQry := GetNextAlias()
cQuery := "SELECT MAX(DCU_CODVOL) CODVOL"
cQuery += " FROM " + RetSqlName('DCU')
cQuery += " WHERE DCU_FILIAL = '"+xFilial('DCU')+"'"
cQuery += " AND DCU_CARGA = '"+cCarga+"'"
cQuery += " AND DCU_PEDIDO = '"+cPedido+"'"
cQuery += " AND D_E_L_E_T_ = ' '"
cQuery := ChangeQuery(cQuery)
DbUseArea(.T.,'TOPCONN',TcGenQry(,,cQuery),cAliasQry,.F.,.T.)
If !Empty((cAliasQry)->CODVOL)
// Remove os espaços em branco e incrementa o valor
cVolume := Soma1(AllTrim((cAliasQry)->CODVOL))
WmsMessage("Novo volume criado: " + cVolume)
Else
cVolume := "01"
EndIf
RestArea(aAreaAnt)
Return cVolume |
<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>
|