DT PE OMSCPL7G - Permitir a manipulação da carga gerada para a viagem cockpit antes da integração com SIGAGFE

01. DADOS GERAIS

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

02. DESCRIÇÃO

Este Ponto de Entrada permite a manipulação da carga gerada para a viagem recebida do TOTVS Logística Cockpit, possibilitando assim a gravação
de informações adicionais na carga ou alteração das informações da carga, antes da integração com o TOTVS Logística Frete Embarcador (SIGAGFE).

03. LOCALIZAÇÃO

Localizado na função GeraCarga da rotina OMSXCPL7, logo após a gravação da carga e seus itens (DAK e DAI).

04. PARÂMETROS

Nome	Tipo	Descrição
cCarga	Caractere	Código da carga gerada.
cRegId	Caractere	Código da regional do Cockpit Logístico.
cViagId	Caractere	Código da viagem recebida do Cockpit Logístico.

05. RETORNO

Não se aplica.

06. VERSÕES

Protheus 12.1.27 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

------

#INCLUDE "PROTHEUS.CH"

User Function OMSCPL7G()
Local cCodCarga := PARAMIXB[1] //Código da carga
Local cRegId := PARAMIXB[2] //Código da regional
Local cViagId := PARAMIXB[3] //Código da viagem

Local aAreaDAK := DAK→ (GetArea())

DAK→ (DbSetOrder(1))

If DAK→ (DbSeek(xFilial('DAK')+cCodCarga))
RecLock('DAK',.F.)
DAK→ DAK_CAMINH := "TESTE" //Campo a ser alterado
DAK→ (MsUnlock())

EndIf

RestArea(aAreaDAK)

Return