| 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 informar os campos Serviço WMS e Endereço Origem WMS na Liberação de CQ, quando efetuada via coletor de dados (ACD).
Localizado antes de efetuar a gravação dos dados informados pelo usuário para a gravação da liberação/rejeição.
| Nome | Tipo | Descrição |
|---|---|---|
nTipo | Numérico | Tipo da |
movimentação: 1 = Liberar |
|
cProduto | Caractere | Produto que está sendo liberado/rejeitado pelo CQ |
| cArmazem | Caractere | Armazém no qual o produto está sendo liberado/rejeitado pelo CQ |
| nQtde | Numérico | Quantidade a ser liberada/rejeitada pelo CQ |
| Nome | Tipo | Descrição |
|---|---|---|
cServWMS | Caractere | Serviço WMS para ser utilizado na integração da movimentação de CQ |
| cEndeWMS | Caractere | Endereço origem WMS no qual está sendo feito a movimentação de CQ |
| lProcessa | Lógico | Indicador se deve ou não processar o registro de movimentação de CQ |
Protheus 12.1.17 (Janeiro/Janeiro 2018) ou superiores.
Ficará a cargo do Ponto de Entrada efetuar as corretas validações do serviço WMS, que deve ser um serviço do tipo entrada com a função de endereçamento e deve
também deve também validar se o endereço origem WMS possui saldo disponível para efetuar a movimentação de CQ.
...
Todos os parâmetros são recebidos na User Function via PARAMIXB, conforme consta em Execblock / Customização.
...
| language | cpp |
|---|---|
| title | Exemplo |
| linenumbers | true |
...
------
#INCLUDE "PROTHEUS.CH"
...
User
...
Function
...
A010WMSO()
...
Local
...
nTipo
...
:=
...
PARAMIXB[1]
...
Local
...
cProduto
...
:=
...
PARAMIXB[2]
...
Local
...
cArmazem
...
:=
...
PARAMIXB[3]
...
Local
...
nQtde
...
:=
...
PARAMIXB[4]
...
Local
...
cServWMS
...
:=
...
""
...
Local
...
cEndeWMS
...
:=
...
""
...
Local
...
lProcessa
...
:=
...
.T.
...
If
...
IntWms(cProduto)
...
cServWMS :=
...
"001"
...
cEndeWMS :=
...
GetEndWMS(cArmazem)
...
//
...
Static
...
Function
...
que
...
busca
...
o
...
endereço
...
WMS
lProcessa :=
...
ValEndWMS(cArmazem,cEndeWMS,cProduto,nQtde)
...
//
...
Static
...
Function
...
que
...
valida
...
endereço
...
WMS
...
EndIf
...
Return
...
{cServWMS,cEndeWMS,lProcessa}
...
------
| 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>
|
