DT PE OMSCPL6B - Permite inserir validações no envio do pedido para o TOL

01. DADOS GERAIS

Produto:	TOTVS OMS
Linha de Produto:	Linha Protheus
Segmento:	Logística
Módulo:	SIGAOMS - Gestão de Distribuição
Função:	OMSXCPL6 - Envio de Pedidos de Venda
País:	Todos Países
Ticket:	-
Requisito/Story/Issue (informe o requisito relacionado) :	-

02. DESCRIÇÃO

Este Ponto de Entrada permite incluir as validações no momento do envio do Pedido de Venda para o TOTVS Otimização Logística, que será utilizado como decisão para integrar ou não o Pedido.

03. LOCALIZAÇÃO

Localizado na função Cpl6EnvPed da rotina OMSXCPL6, a qual é chamada ao clicar no botão Enviar Pedidos CPL (F3).

04. PARÂMETROS

Nome	Tipo	Descrição
cFilPed	Caractere	Filial do pedido de venda.
cPedido	Caractere	Número do pedido de venda.

05. RETORNO

Este Ponto de Entrada deve retornar um array com as seguintes informações:

Nome	Tipo	Descrição
lRet	Lógico	Se .F. o pedido não será integrado.
cFalha	Caractere	Mensagem do motivo da rejeição do envio (quando o retorno for Falso).

06. VERSÕES

Protheus 12.1.17 ou superiores.

07. OBSERVAÇÃO

Todos os parâmetros são recebidos na User Function via PARAMIXB, conforme consta em Execblock / Customização.

08. EXEMPLO

------

User Function OMSCPL6B()
Local cFilPed := PARAMIXB[1] //Filial do pedido
Local cPedido := PARAMIXB[2] //Número do pedido
Local aRet := {}
Local lRet := .T.
Local cFalha := ""

If SC5->(DbSeek(cFilPed+cPedido))
If !Empty(SC5->C5_TRANSP)
lRet := .F.
cFalha := "O pedido não possuí a transportadora informada."
EndIf
EndIf

aRet := {lRet,cFalha}

Return aRet