| Produto: | TOTVS Logística WMS |
|---|---|
| Linha de : | Linha Protheus |
| Segmento: | Logística |
| Módulo: | TOTVS WMS - Linha Protheus - WMS Protheus (SIGAWMS) |
| Função: | WMSA170 - Geração de Endereços |
| País: | Todos Países |
| Ticket: | 23156287 |
| Requisito/Story/Issue (informe o requisito relacionado) : | DLOGWMSMSP-17451 / DLOGWMSMSP-17497 |
Este Ponto de Entrada permite realizar consistências antes da gravação de um novo endereço (SBE). Caso o ponto de entrada retorne false a gravação do novo endereço não é realizada e o processo segue para o próximo registro da lista de endereços.
Localizado na função WMA170Grv da rotina WMSA170 (Geração de Endereços), dentro do laço de repetição do array que possui os dados para a geração dos novos endereços.
Nome | Tipo | Descrição |
|---|---|---|
| cFilSBE | Caracter | Código da Filial a ser gravada na tabela SBE. |
| cArmazem | Caracter | Armazém a ser gravado na tabela SBE. |
| cCodEst | Caracter | Código da Estrutura Física a ser gravada na tabela SBE. |
| cCodCfg | Caracter | Código da Configuração a ser gravada na tabela SBE. |
| cCodZon | Caracter | Zona de Armazenagem a ser gravada na tabela SBE. |
| cEndereco | Caracter | Código do Endereço a ser gravado na tabela SBE. |
| cCodExc | Caracter | Código de Exceção a ser gravada na tabela SBE. |
| nAltura | Numérico | Altura do Endereço a ser gravada na tabela SBE. |
| nLargura | Numérico | Largura do Endereço a ser gravada na tabela SBE. |
| nComprim | Numérico | Comprimento do Endereço a ser gravado na tabela SBE. |
| nCapacid | Numérico | Capacidade de Armazenamento a ser gravado na tabela SBE. |
Nome | Tipo | Descrição |
|---|---|---|
| lRet | Lógico | Se o retorno for .T. irá prosseguir para a gravação do endereço. Se o retorno for .F. não irá prosseguir para a gravação do endereço, buscando para o próximo endereço da lista. |
Protheus 12.1.2210 ou superiores.
Não se aplica.
------
#INCLUDE "PROTHEUS.CH"
User Function WMA170EN()
Local cFilSBE := PARAMIXB[1]Local cArmazem := PARAMIXB[2]Local cCodEst := PARAMIXB[3]Local cCodCfg := PARAMIXB[4]Local cCodZon := PARAMIXB[5]Local cEndereco := PARAMIXB[6]Local cCodExc := PARAMIXB[7]Local nAltura := PARAMIXB[8]Local nLargura := PARAMIXB[9]Local nComprim := PARAMIXB[10]Local nCapacid := PARAMIXB[11]Local lRet := .T.
If nAltura > 100 lRet := .F. EndIf
Return lRet
------