Produto: | |
---|---|
Linha de Produto: | |
Segmento: | |
Módulo: | SIGAWMS |
Função: | WMSV095 - Transferência de Produtos Entre Endereços |
País: | Todos Países |
Ticket: | - |
Requisito/Story/Issue (informe o requisito relacionado) : | - |
Este Ponto de Entrada permite inserir as validações complementares no processo de transferência WMS Protheus via coletor.
Localizado na rotina WMSV095, na validação do endereço destino.
Nome | Tipo | Descrição |
---|---|---|
cArmOri | Caractere | Armazém Origem |
cEnderOri | Caractere | Endereço Origem |
cArmDes | Caractere | Armazém Destino |
cEnderDes | Caractere | Endereço Destino |
cProduto | Caractere | Produto |
cLote | Caractere | Lote |
cSubLote | Caractere | Sublote |
nQuantid | Numérico | Quantidade digitada |
Nome | Tipo | Descrição |
---|---|---|
lRet | Lógico | Indica se a transferência deve ser permitida. |
Todos os parâmetros são recebidos na User Function via PARAMIXB, conforme consta em Execblock / Customização |
07. EXEMPLO
User Function WMS095VL() Local lRet := .T. Local cArmOri := PARAMIXB[1] //armazém origem Local cEnderOri := PARAMIXB[2] //endereço origem Local cArmDes := PARAMIXB[3] //armazém destino Local cEnderDes := PARAMIXB[4] //endereço destino Local cProduto := PARAMIXB[5] //produto Local cLote := PARAMIXB[6] //lote Local cSubLote := PARAMIXB[7] //sub-lote Local nQuantid:= PARAMIXB[8] //Quantidade digitada If Alltrim(cEnderDes) == "Teste" WMSVTAviso("WMS","Transferência não permitida.") lRet := .F. EndIf Return lRet |
<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> |