Linha Microsiga Protheus

Árvore de páginas

Versões comparadas

Versão antiga 1

changes.mady.by.user Usuário desconhecido (luciene.sousa)

Gravado em

comparado com

Nova versão 2

changes.mady.by.user Usuário desconhecido (luciene.sousa)

Gravado em

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.


01. DADOS GERAIS

Produto:

Solucoes_totvs
SolucaoTOTVS Logística WMS

Solucoes_totvs_cross
SolucaoCross

Solucoes_totvs_parceiros
SolucaoParceiros

Solucoes_totvs_parceirosexptotvs
SolucaoParcsExpsTOTVS

Linha de Produto:

Linhas_totvs
LinhaLinha Protheus

Segmento:

Segmentos_totvs
SegmentoLogí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

NomeTipoDescrição

cServico

CaractereCódigo do serviço endereçamento onde a atividade de conferência está relacionada.
cDoctoCaractereNumero do documento de entrada .
cSerieCaractereSérie do do documento de entrada.

05. RETORNO

Este Ponto de Entrada não possui retorno.

06. VERSÕES

12.1.23 ou superiores.

07. OBSERVAÇÃO

Não se aplica.

08. EXEMPLO

Bloco de código
languagecpp
titleExemplo
linenumberstrue
collapsetrue
#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

...