Histórico da Página
01. DADOS GERAIS
Produto: |
| ||||||||||||||||
---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
Linha de Produto: |
| ||||||||||||||||
Segmento: |
| ||||||||||||||||
Módulo: |
TOTVS WMS - Linha Protheus - WMS Protheus (SIGAWMS) | |
Função: | - |
---|---|
País: | Todos Países |
Ticket: |
16861003 | |
Requisito/Story/Issue (informe o requisito relacionado) : | DLOGWMSMSP-15271 |
---|
02. DESCRIÇÃO
Este Ponto de Entrada é responsável por validar o lote selecionado durante a execução de um serviço de separação.
03. LOCALIZAÇÃO
Localizado no método ProcEndExp da classe WMSBCCSeparacao.
04. PARÂMETROS
Nome | Tipo | Descrição |
---|---|---|
cEstFis | Caractere | Código da Estrutura Física em que está ocorrendo a separação |
cEnder | Caractere | Endereço em que está ocorrendo a separação |
cLoteCt | Caractere | Lote a ser separado |
cNumLot | Caractere | Sublote a ser separado |
cDtVald | Caractere | Data de Validade do Lote a ser separado |
cIdUnit | Caractere | Id Unitizador |
nQtdLib | Numérico | Quantidade Liberada do Endereço |
nQtdPsr | Numérico | Quantidade de Saída Prevista do Endereço |
nQtdSep | Numérico | Quantidade a ser separada |
Self | Objeto | WMSBCCSeparacao |
05. RETORNO
Lógico - .T. ou .F.
06. VERSÕES
Protheus 12.1.33 ou superiores.
07. OBSERVAÇÃO
Quando existir este Ponto de Entrada e retornar .F. (Falso), o WMS Protheus deve buscar um próximo lote e submetê-lo novamente à validação do Ponto de Entrada, e assim sucessivamente.
Todos os parâmetros são recebidos na User Function
...
via PARAMIXB conforme consta em Execblock / Customização.
08. EXEMPLO
...
language | cpp |
---|---|
title | Exemplo |
linenumbers | true |
collapse | true |
...
------
#INCLUDE "PROTHEUS.CH"
...
User
...
Function
...
WMSAVLT()
...
Local
...
cEstFis
...
:=
...
PARAMIXB[1]
...
Local
...
cEnder
...
:=
...
PARAMIXB[2]
...
Local
...
cLoteCt
...
:=
...
PARAMIXB[3]
...
Local
...
cNumLot
...
:=
...
PARAMIXB[4]
...
Local
...
cDtVald
...
:=
...
PARAMIXB[5]
...
Local
...
cIdUnit
...
:=
...
PARAMIXB[6]
...
Local
...
nQtdLib
...
:=
...
PARAMIXB[7]
...
Local
...
nQtdPsr
...
:=
...
PARAMIXB[8]
...
Local
...
nQtdSep
...
:=
...
PARAMIXB[9]
...
Local Self := PARAMIXB[10]
Local lRet := .T.
...
//Lote
...
válido
...
//Exemplo
...
de
...
validação
...
If
...
cDtVald
...
<
...
Date()
...
WmsMessage("Lote
...
XXXX
...
com
...
Data
...
de
...
Validade
...
expirada.","WMSAVLT",1)
...
lRet :=
...
.F.
...
EndIf
Return lRet
------
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> |