Árvore de páginas

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

...

Produto:

TOTVS Logística WMS

Linha de Produto:

Linha Protheus

Segmento:

Logística

Módulo:TOTVS WMS - Linha Protheus - WMS Protheus (SIGAWMS)
Função:

WMSV095.PRW

País:Todos Países
Ticket:18590948
Requisito/Story/Issue (informe o requisito relacionado) :DLOGWMSMSP-15902


02. DESCRIÇÃO

Necessidade de realizar uma nova validação ao informar o campo "Endereço Origem".

03. LOCALIZAÇÃO

Localizado na rotina WMSV095 (Transferência de Produtos Entre Endereços), na validação do endereço origem.

04. PARÂMETROS

Nome

Tipo

Descrição

cArmOriCaractereArmazém Origem
cEnderOriCaractereEndereço Origem
cProdutoCaractereProduto
cLoteCaractereLote
cSubLoteCaractereSublote
nQuantidNuméricoQuantidade digitada

05. RETORNO

Nome

Tipo

Descrição

lRetLógicoIndica se o sistema irá permitir prosseguir ou não para informação do próximo campo.

06. VERSÕES

Protheus 12.1.17 ou superiores.

...

User Function WMS095VL()
Local lRet := .T.
Local cArmOri := PARAMIXB[1] //armazém origem
Local cEnderOri := PARAMIXB[2] //endereço origem
Local cArmDes cProduto := PARAMIXB[3] //armazém destino
Local cEnderDes := PARAMIXB[4] //endereço destino
Local cProduto := PARAMIXB[5] //produto
Local cLote := PARAMIXB[64] //lote
Local cSubLote := PARAMIXB[75] //sub-lote
Local nQuantid:= PARAMIXB[86] //Quantidade digitada

If Alltrim(cEnderDescEnderOri ) == "Teste"
          WMSVTAviso("WMS","Transferência não permitida.")
          lRet := .F.
EndIf

...