Produto: | |
---|---|
Linha de Produto: | |
Segmento: | |
Módulo: | TOTVS OMS - Gestão de Distribuição (SIGAOMS) |
Função: | OMSXCPL6- Envio de Pedidos (TOL) |
País: | Todos Países |
Ticket: | 15016745 |
Requisito/Story/Issue (informe o requisito relacionado) : | DLOGWMSMSP-14476 |
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.
Localizado no término da integração de envio de Pedidos ao TOL.
Nome | Tipo | Descrição |
---|---|---|
dDataIni | date | Data inicial do processamento do envio da integração |
cHrIni | character | Horário inicial do processamento do envio da integração |
dDataFim | date | Data final do processamento do retorno da integração |
cHrFim | character | Horário final do processamento do retorno da integração |
aEnv | array | Array com os pedidos com sucesso na integração |
aFalha | array | Array com os pedidos que ocorreram falha de integração |
Não se aplica
12.1.2210 ou Superiores
Não se aplica
#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
#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 |
<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> |