Árvore de páginas

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.


01. DADOS GERAIS

Produto:

Solucoes_totvs
SolucaoTOTVS OMS

Solucoes_totvs_cross
SolucaoCross

Solucoes_totvs_parceiros
SolucaoParceiros

Solucoes_totvs_parceirosexptotvs
SolucaoParcsExpsTOTVS

Linha de Produto:

Linhas_totvs
LinhaLinha Protheus

Segmento:

Segmentos_totvs
SegmentoLogí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 Cockpit LogísticoTOTVS Otimização Logística, possibilitando assim a gravação de informações
adicionais 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

NomeTipoDescrição
cCargaCaractereCódigo da carga gerada.
cRegIdCaractereCódigo da regional do Cockpit Logísticodo TOTVS Otimização Logística.
cViagIdCaractereCódigo da viagem recebida do Cockpit Logísticodo TOTVS Otimização Logística.

05. RETORNO

Este Ponto de Entrada não necessidade de um estornoNã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

...

languagecpp
titleExemplo
linenumberstrue
collapsetrue

...

------

#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

------


Templatedocumentos


HTML
<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>