Produto: | |
---|---|
Linha de Produto: | |
Segmento: | |
Módulo: | SIGAWMS - Gestão de Armazenagem |
Função: | - |
País: | Todos Países |
Ticket: | - |
Requisito/Story/Issue (informe o requisito relacionado) : | - |
Este Ponto de Entrada permite executar um processo adicional logo após a execução automática da geração de uma ou mais Ordens de Serviço WMS.
Localizado na função que efetua a execução de serviços WMS de forma automática.
Este Ponto de Entrada recebe como parâmetro um array com os códigos DCF_ID executados, referentes a tabela de Ordem de Serviço DCF.
No array pode ser retornada uma ou mais linhas, de acordo com a parametrização efetuada no Sistema e se utilizou ou não aglutinação de Ordens de Serviço.
Não se aplica.
12.1.17 ou superiores.
Não se aplica.
#INCLUDE "PROTHEUS.CH" User Function WMSXFEXS() Local aLibDCF := PARAMIXB[1] //ID CDF Local nX :=0 local cAliasQry := Nil For nX := 1 To Len(aLibDCF) cAliasQry := GetNextAlias() BeginSql Alias cAliasQry SELECT DCF.R_E_C_N_O_ RECNODCF, DCF.DCF_ORIGEM FROM %Table:DCF% DCF WHERE DCF.DCF_FILIAL = %xFilial:DCF% AND DCF.DCF_ID = %Exp:aLibDCF[nX]% AND DCF.DCF_ORIGEM = 'SC9' AND DCF.%NotDel% EndSql If (cAliasQry)->(!Eof()) DCF->(dbGoTo((cAliasQry)->RECNODCF)) RecLock("DCF",.F.) DCF->DCF_CODFUN := 'XXXXXX' DCF->(MsUnLock()) EndIf (cAliasQry)->(dbCloseArea()) Next Return |
<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> |