Histórico da Página

...

Produto:

Solucoes_totvs

Solucao	TOTVS OMS

Solucoes_totvs_cross

SolucaoCross

Solucoes_totvs_parceiros

SolucaoParceiros

Solucoes_totvs_parceirosexptotvs

SolucaoParcsExpsTOTVS

Linha de Produto:

Linhas_totvs

Linha	Linha Protheus

Segmento:

Segmentos_totvs

Segmento	Logística

Módulo:

SIGAOMS - Gestão de Distribuição

Função:

OMSXCPL6- Envio de Pedidos (TOL)

País:

Todos Países

Ticket:

15016745

Requisito/Story/Issue (informe o requisito relacionado) :

DLOGWMSMSP-14476

02. DESCRIÇÃO

Este Ponto de Entrada recebe as informações de data inicial, horário inicial, data final, horário final,

...

Pedidos processados,

...

Pedidos com falhas ao término do processamento de envio de

...

Pedidos ao TOL.

03. LOCALIZAÇÃO

Localizado

...

no término da integração de envio de

...

Pedidos ao TOL.

04. PARÂMETROS

Nome	Tipo	Descrição
dDataIni	date	data Data inicial do processamento do envio da integração
cHrIni	character	horário Horário inicial do processamento do envio da integração
dDataFim	date	data Data final do processamento do retorno da integração
cHrFim	character	horário Horário final do processamento do retorno da integração
aEnv	array	array Array com os pedidos com sucesso na integração
aFalha	array	array Array com os pedidos que ocorreram falha de integração

05. RETORNO

Não se aplica

...

06. VERSÕES

12.1.2210 ou Superiores

07. OBSERVAÇÃO

Não se aplica

08. EXEMPLO

...

Bloco de código

title	Exemplo de ponto de entrada

#include 'protheus.ch'

User Function OMSTOL02()

	Local dDataIni := PARAMIXB[1]
	Local cHrIni   := PARAMIXB[2]
	Local dDataFim := PARAMIXB[3]
	Local cHrFim   := PARAMIXB[4]
	Local aEnv     := PARAMIXB[5]
	Local aFalha   := PARAMIXB[6]
	Local nX       := 1

	conout("Data início da integração " + cValToChar(dDataIni) +;
		   " Horário início da integração " + cValToChar(cHrIni) +;
		   " Data final da integração " + cValToChar(dDataFim) +;
		   " Horário final da integração " + cValToChar(cHrFim))

	conout("Pedidos enviados para a integração:")

	For nX := 1 To Len(aEnv)
		conout("Filial: " + aEnv[nX][1] + " Pedido: " + aEnv[nX][2] + " Seq Int: " + aEnv[nX][3])
	Next

	If !Empty(aFalha)
		conout("Pedidos enviados com falha de integração:")
		For nX := 1 To Len(aFalha)
			conout("Filial: " + aFalha[nX][1] + " Pedido: " + aFalha[nX][2] )
		Next
	EndIf

Return

...

Árvore de páginas

Versões comparadas

Versão antiga 1

Nova versão 2

Chave