DT PE OMSCPL7C - Permite a manipulação da carga gerada para viagem 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:	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 Otimização Logística, possibilitando assim a gravação de informações adicionais na carga.

Exemplo
Acessar informações das tabelas de viagem CPL (DK0 e DK1) para gravar na tabela de carga (DAK).

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 TOTVS Otimização Logística.
cViagId	Caractere	Código da viagem recebida do TOTVS Otimização Logística.

05. RETORNO

Não se aplica.

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

------

#INCLUDE "PROTHEUS.CH"

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

DK0→ (DbSetOrder(1))
DAK→ (DbSetOrder(1))

If DK0→ (DbSeek(xFilial('DK0')+cRegId+cViagId))
If DAK→ (DbSeek(xFilial('DAK')+cCodCarga))
RecLock('DAK',.F.)
DAK→ DAK_DATA := DK0->DK0_XCPO //Campo customizado
DAK→ (MsUnlock())
EndIf
EndIf

Return