| Produto: | |
|---|---|
| Linha de Produto: | |
| Segmento: | |
| Módulo: | |
| Função: | WMSA170 - Geração de Endereços |
| País: | Brasil |
| Ticket: | 23156287 |
| Requisito/Story/Issue (informe o requisito relacionado) : | DLOGWMSMSP-17451 |
Inclusão de novos pontos de entrada no momento da gravação de novos endereços (tabela SB2).
Efetuada a inclusão de um ponto de entrada WMA170EN para que seja executado antes da gravação dos endereços, de modo com que seja possível realizar consistências anteriores à inclusão e se necessário barrar a geração de determinados endereços.
Efetuada a inclusão de um ponto de entrada WMA170FI para que seja executado no final da geração dos endereços pelo programa WMSA170.
Exemplo de uso:
#INCLUDE "PROTHEUS.CH"
User Function WMA170FI()
MsgStop("Novos endereços gravados com sucesso!", "Atenção!")
Return |
#INCLUDE "PROTHEUS.CH" User Function WMA170EN() Local cFilSBE := PARAMIXB[1] Local cArmazem := PARAMIXB[2] Local cCodEst := PARAMIXB[3] Local cCodCfg := PARAMIXB[4] Local cEndereco := PARAMIXB[5] Local cCodExc := PARAMIXB[6] Local nAltura := PARAMIXB[7] Local nLargura := PARAMIXB[8] Local nComprim := PARAMIXB[9] Local nCapacid := PARAMIXB[10] Local lRet := .t. If nAltura > 100 lRet := .f. EndIf Return lRet |