Produto: | |
---|---|
Linha de Produto: | |
Segmento: | |
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) : | - |
Este Ponto de Entrada permite alterar a Classificação de Operação a ser utilizada na integração com o SIGAGFE.
Localizado na função GeraCarga da rotina OMSXCPL7, antes da gravação da carga e seus itens (DAK e DAI).
Nome | Tipo | Descrição |
---|---|---|
cViagId | Caractere | Código da viagem |
cClassif | Caractere | Classificação de operação |
cRegId | Caractere | Id da região |
Nome | Tipo | Descrição | Obrigatório |
---|---|---|---|
cClassif | Caractere | Classificação de operação a ser utilizada na integração com o SIGAGFE | Sim |
Protheus 12.1.17 ou superiores.
Todos os parâmetros são recebidos na User Function via PARAMIXB, conforme consta no documento: Execblock / Customização.
A emissão de mensagens será efetuada pelo Ponto de Entrada.
------
#include 'protheus.ch'
#include 'parmtype.ch'
//Ponto de entrada para ajustar Classificação de Operação com a Integração com o GFE.
user function OMSCPL7F()
Local cCodViag := PARAMIXB[1] //Viagem
Local cClassif := PARAMIXB[2] //cClasFrete
Local cCodRegi := PARAMIXB[3] //Regional
Local cClasFrg := SuperGetMv("MV_CDCLFR",.F.,"")
dbSelectArea("DK1")
DK1→ (dbSetOrder(1))
If DK1→ (dbSeek(xFilial("DK1")+ cCodRegi+cCodViag))
While DK1->(!Eof()) .AND. xFilial("DK1") == DK1->DK1_FILIAL .AND. DK1->DK1_REGID == cCodRegi .AND. DK1->DK1_VIAGID == cCodViag
IF DK1→ DK1_FILPED == "01001"
cClassif := cClasFrg
exit
EndIF
DK1→(DbSkip())
EndDo
EndIF
return cClassif
------
<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> |