DT PE WMS074CF - Executa rotina após o encerramento da atividade de conferência de entrada relacionada ao endereçamento

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:	WMSV074 - Conferência de Entrada (Coletor)
País:	Todos Países
Ticket:	-
Requisito/Story/Issue (informe o requisito relacionado) :	-

02. DESCRIÇÃO

Este Ponto de Entrada permite efetuar a execução de um rotina após o encerramento da atividade de conferência configurada junto com o serviço de endereçamento, sendo que o mesmo será executado quando no serviço de endereçamento existir uma atividade de conferência cadastrada.

03. LOCALIZAÇÃO

No momento da finalização da atividade de conferência executada pela convocação ativa.

Será executado na rotina WMSV074 (Conferência de Entrada), após a mensagem informando que a conferência foi encerrada com sucesso.

04. PARÂMETROS

Nome	Tipo	Descrição
cServico	Caractere	Código do serviço endereçamento onde a atividade de conferência está relacionada.
cDocto	Caractere	Numero do documento de entrada .
cSerie	Caractere	Série do do documento de entrada.

05. RETORNO

Não se aplica.

06. VERSÕES

Protheus 12.1.23 ou superiores.

07. OBSERVAÇÃO

Não se aplica.

08. EXEMPLO

------

#INCLUDE "PROTHEUS.CH"
#INCLUDE "TOTVS.CH"

User Function WMS074CF()
Local cServico := paramixb[1]
Local cDocto := paramixb[2]
Local cSerie := paramixb[3]
Local cAliasQry := ""
Local aRecnoD12 := {}

cAliasQry := GetNextAlias()
BeginSql Alias cAliasQry
SELECT D12.R_E_C_N_O_ RECNOD12
FROM %Table:D12% D12
WHERE D12.D12_FILIAL = %xFilial:D12%
AND D12.D12_SERVIC = %Exp:cServico%
AND D12.D12_DOC = %Exp:cDocto%
AND D12.D12_SERIE = %Exp:cSerie%
AND ((D12.D12_QTDMOV - D12.D12_QTDLID) > 0)
AND D12.%NotDel%
EndSql

Do While (cAliasQry)→ (!Eof())
Aadd(aRecnoD12,(cAliasQry)→ RECNOD12)
(cAliasQry)->(DbSkip())
ENDDO
(cAliasQry)→(dbCloseArea())

Return