01. DADOS GERAIS
Produto: | TOTVS Logística WMS
|
---|---|
Linha de Produto: | Linha Protheus |
Segmento: | Logística |
Módulo: | SIGAWMS - Gestão de Armazenagem |
Função: | WMSA150 - Execução de Serviços |
País: | Todos Países |
Ticket: | - |
Requisito/Story/Issue (informe o requisito relacionado) : | - |
02. DESCRIÇÃO
Este Ponto de Entrada permite substituir o parâmetro MV_WMSACEX, para determinar se a ordem de serviço de expedição será ou não aglutinada em uma carga, sendo utilizado durante a execução do serviço.
IMPORTANTE!
03. LOCALIZAÇÃO
Localizado no processamento da rotina WMSA150 (Execução de Serviços).
04. PARÂMETROS
Nome | Tipo | Descrição |
---|---|---|
CIdDcf | Caractere | Código do ID da execução do serviço. |
05. RETORNO
Nome | Tipo | Descrição |
---|---|---|
cWMSACEX | Caractere | Valor que indicará se aglutina ou não, substituindo neste processamento o valor do parâmetro MV_WMSACEX. |
06. VERSÕES
Protheus 12.1.27.
07. OBSERVAÇÃO
Não se aplica.
08. EXEMPLO
------
#INCLUDE "PROTHEUS.CH"
#INCLUDE "TOTVS.CH"
User Function WMSACEXN()
Local cIdDcf := paramixb[1]
Local cRetPe := SuperGetMv("MV_WMSACEX",.F.,"0")
Local cAliasQry := ""
cAliasQry := GetNextAlias()
BeginSql Alias cAliasQry
SELECT DCF.DCF_CLIFOR,
DCF.dcf_docto
FROM %Table:DCF% DCF
WHERE DCF.DCF_FILIAL = %xFilial:DCF%
AND DCF.DCF_ID = %Exp:cIdDcf%
AND DCF.%NotDel%
EndSql
If (cAliasQry)->(!Eof()) .AND. (cAliasQry)->DCF_CLIFOR = '000001'
cRetPe := '1' //permite aglutinar
Else
cRetPe := '0' //não permite aglutinar
Endif
(cAliasQry)→(dbCloseArea())
Return cRetPe
------
- pontos_de_entrada
- documento_de_referencia
- totvs_logistica_wms
- linha_protheus
- wms_protheus
- sigawms
- gestao_de_armazenagem
- all
- todos_paises
- supply_log_wmsoms_protheus
- processos
- saida
- wmsacexn
- manipulacao_do_parametro_mv_wmsacex
- indicando_se_o_servico_de_expedicao_deve_aglutinar
- wmsa150
- execucao_de_servicos
- versao_12
- versao_12_1_27