Exibir origem

01. DADOS GERAIS

Produto:	TOTVS Logística TMS
Linha de Produto:	Linha Protheus
Segmento:	Logistica
Módulo:	GESTÃO DE TRANSPORTES (SIGATMS)
Funções:	OMSA040 - Cadastro de Motorista OMSA060 - Cadastro de Veículo OMSA100 - Cadastro de Rotas RTMSR37 - Rdmake de impressão do Relatório Financeiro Pagbem TMSA250 - Contrato de Carreteiro TMSA251 - Liberação de Contrato TMSA256 - Encerramento CIOT TMSA310 - Fechamento da Viagem TMSA350 - Operações da viagem TMSAC15A - Função genégica TMSAC28 - Regras de Quitação de Frete Pagbem TMSAE60 - Operadora de Frota TMSAF60 - Viagem mod. 3 TMSAF62 - Validações genéricas Viagem Mod 3 TMSAF64 - Validações genéricas Viagem Mod 3 TMSAF64P - Validações genéricas Viagem Mod 3 TMSPAMCARD - Validações genéricas Operadoras de Frota TMSXFUNA - Validações genéricas TMS Protheus TMSXFUNC - Validações genéricas TMS Protheus TMSXFUNE - Validações genéricas TMS Protheus TMSXFUNJ - Envios endpoints TMS x Pagbem
Requisito/Story/Issue (informe o requisito relacionado) :	DLOGTMS02-21024

02. SITUAÇÃO/REQUISITO

Implementar melhoria no processo de integração entre o módulo SIGATMS e Pagbem, baseia-se na tecnologia Web API* em arquitetura RestFul.

A API de integração da Pagbem permite a realização de diversas operações contidas no Repom Frete, como manipulação de cadastros (Contratados, Motoristas e Veículos), Roteiros, Viagens, Pedágio, e Pagamento de frete.

* Web APÌ - Solução utilizada na integração de sistemas e na comunicação entre diferentes aplicações, utilizando a linguagem universal JSON para tráfego de dados, proporciona a sistemas desenvolvidos em plataformas distintas sejam compatíveis.

03. SOLUÇÃO

Realizada a implementação em questão entre a solução TOTVS Logistica TMS x Pagbem.

Implementações realizadas:

Novo cadastro Regras de Quitação de Frete Pagbem (TMSAC28);
Criação do Parâmetro MV_TMSPBLG para habilitar a gravação de Logs durante o processo de Integração
Atualização de Dicionário de dados e Menu Protheus

Alterações de dicionário de dados e menu estarão disponíveis a partir do release 12.1.2210

04. DEMAIS INFORMAÇÕES

Para uso desta funcionalidade, deve ser utilizado:

Pacote: 009932 e 010781 - Para atualização de dicionário de dados, criação/alteração de campos e índices.
Menu - Necessário para criar no menu do TMS a nova rotina Regras de Quitação

DETALHAMENTO DA ATUALIZAÇÃO DE DICIONÁRIO CONFORME ABAS

Tabela	Descrição
DMZ	Regras de Quitação PagBem

Atualização de dicionário de dados da tabela "DA3"

Campo	DA3_CODMUN
Tipo	C
Tamanho	5
Decimal	0
Formato	@9
Título	Cd.Municipio
Descrição	Codigo IBGE do Municipio
Usado	Sim
Obrigatório	Não
Browse	Não
Opções
When
Relação
Val. Sistema	Vazio() .Or. ExistCpo('CC2',M->DA3_ESTPLA+M->DA3_CODMUN)

Campo	DA3_RODAGE
Tipo	C
Tamanho	1
Decimal	0
Formato	@!
Título	Eixo/Rodagem
Descrição	Filial do sistema
Usado	Sim
Obrigatório	Não
Browse	Não
Opções	1=Eixo Simples/Rodagem Simples;2=Eixo Simples/Rodagem Dupla;3=Eixo Duplo/Tandem;4=Eixo Duplo/Não em Tandem;5=Eixo Triplo
When
Relação
Val. Sistema	Pertence(' 12345')

Campo	DA3_INTOPE
Tipo	C
Tamanho	1
Decimal	0
Formato	@!
Título	Integra Ope?
Descrição	Integra com operadora?
Usado	Sim
Obrigatório	Não
Browse	Não
Opções	1=Não;2=REPOM;3=PagBem;4=Repom e PagBem
When
Relação
Val. Sistema	Pertence(' 1234')

Campo	DA3_INTEGR
Tipo	C
Tamanho	1
Decimal	0
Formato	@!
Título	Integrado?
Descrição	Registro Integrado?
Usado	Sim
Obrigatório	Não
Browse	Não
Opções	1=Sim;2=Não
When
Relação	"2"
Val. Sistema	Pertence(' 12')

Atualização de dicionário de dados da tabela "DVG"

Campo	DVG_CODREG
Tipo	C
Tamanho	8
Decimal	0
Formato	@!
Título	Cod.Regra
Descrição	Cod.Regra Quitação Pagbem
Usado	Sim
Obrigatório	Não
Browse	Não
Opções
When
Relação
Val. Sistema	ExistCpo("DMZ",M->DVG_CODREG)

Atualização de dicionário de dados da tabela "DEG"

Campo	DEG_CONPDG
Tipo	C
Tamanho	1
Decimal	0
Formato	@!
Título	Contr.Pdg.PB
Descrição	Contrato de Pedagio Pgbem
Usado	Sim
Obrigatório	Não
Browse	Não
Opções	1=Sim;2=Não
When	M->DEG_CODOPE == '03'
Relação	"1"
Val. Sistema

Atualização de dicionário de dados da tabela "DJL"

Campo	DJL_CODOPE
Tipo	C
Tamanho	2
Decimal	0
Formato	@!
Título	Cod. Operad.
Descrição	Codigo da Operadora
Usado	Sim
Obrigatório	Não
Browse	Não
Opções
When
Relação
Val. Sistema

Campo	DJL_DATENC
Tipo	D
Tamanho	8
Decimal	0
Formato
Título	Dt. Enc CIOT
Descrição	Data Encerramento do CIOT
Usado	Sim
Obrigatório	Não
Browse	Não
Opções
When
Relação
Val. Sistema

Atualização de dicionário de dados da tabela "DTY"

Campo	DTY_IDQUIT
Tipo	C
Tamanho	20
Decimal	0
Formato	@!
Título	ID Quitação
Descrição	ID Quitação PagBem
Usado	Sim
Obrigatório	Não
Browse	Não
Opções
When
Relação
Val. Sistema

Atualização de dicionário de dados da tabela "DTR"

Campo	DTR_PRIRRF
Tipo	N
Tamanho	14
Decimal	2
Formato	@E 99,999,999,999.99
Título	IRRF Previst
Descrição	IRRF Previsto
Usado	Sim
Obrigatório	Não
Browse	Não
Opções
When
Relação
Val. Sistema	Positivo()

Campo	DTR_PRSEST
Tipo	N
Tamanho	14
Decimal	2
Formato	@E 99,999,999,999.99
Título	Pr.Sest.Sena
Descrição	Sest Senat Previsto
Usado	Sim
Obrigatório	Não
Browse	Não
Opções
When
Relação
Val. Sistema	Positivo()

Campo	DTR_PRINSS
Tipo	N
Tamanho	14
Decimal	2
Formato	@E 99,999,999,999.99
Título	INSS Previst
Descrição	INSS Previsto
Usado	Sim
Obrigatório	Não
Browse	Não
Opções
When
Relação
Val. Sistema	Positivo()

Campo	DTR_PRISS
Tipo	N
Tamanho	14
Decimal	2
Formato	@E 99,999,999,999.99
Título	ISS Previst
Descrição	ISS Previsto
Usado	Sim
Obrigatório	Não
Browse	Não
Opções
When
Relação
Val. Sistema	Positivo()

Campo	DTR_PRPIS
Tipo	N
Tamanho	14
Decimal	2
Formato	@E 99,999,999,999.99
Título	PIS Previsto
Descrição	PIS Previsto
Usado	Sim
Obrigatório	Não
Browse	Não
Opções
When
Relação
Val. Sistema	Positivo()

Campo	DTR_PRCOFI
Tipo	N
Tamanho	14
Decimal	2
Formato	@E 99,999,999,999.99
Título	COFINS Previ
Descrição	COFINS Previsto
Usado	Sim
Obrigatório	Não
Browse	Não
Opções
When
Relação
Val. Sistema	Positivo()

Campo	DTR_PRCSLL
Tipo	N
Tamanho	14
Decimal	2
Formato	@E 99,999,999,999.99
Título	CSLL Previst
Descrição	COFINS Previsto
Usado	Sim
Obrigatório	Não
Browse	Não
Opções
When
Relação
Val. Sistema	Positivo()

Atualização de dicionário de dados da tabela "DMZ"

Campo	DMZ_FILIAL
Tipo	C
Tamanho	8
Decimal	0
Formato
Título	Filial
Descrição	Filial do sistema
Usado	Não
Obrigatório	Não
Browse	Não
Opções
When
Relação
Val. Sistema

Campo	DMZ_CODIGO
Tipo	C
Tamanho	10
Decimal	0
Formato	@!
Título	Codigo
Descrição	Cod.Regra Quitacao
Usado	Sim
Obrigatório	Sim
Browse	Sim
Opções
When
Relação	GETSXENUM( "DMZ", "DMZ_CODIGO" )
Val. Sistema	NaoVazio()

Campo	DMZ_DESCRI
Tipo	C
Tamanho	45
Decimal	0
Formato	@!
Título	Descricao
Descrição	Descrição da Regra
Usado	Sim
Obrigatório	Sim
Browse	Sim
Opções
When
Relação
Val. Sistema

Campo	DMZ_TIPTOL
Tipo	C
Tamanho	1
Decimal	0
Formato	@!
Título	Tolerancia?
Descrição	Tipo de Tolerancia?
Usado	Sim
Obrigatório	Sim
Browse	Sim
Opções	1=Porcentagem;2=Quilogramas
When
Relação
Val. Sistema	Pertence("12")

Campo	DMZ_PESUTI
Tipo	C
Tamanho	1
Decimal	0
Formato	@!
Título	Peso Usado?
Descrição	Peso usado na quitacao
Usado	Sim
Obrigatório	Sim
Browse	Sim
Opções	1=Saida;2=Chegada;3=Saida Se Menor Que Chegada
When
Relação
Val. Sistema	Pertence("123")

Campo	DMZ_LIMEXC
Tipo	N
Tamanho	6
Decimal	2
Formato	@E 999.99
Título	% Lim. Exced
Descrição	Limite Excedente em %
Usado	Sim
Obrigatório	Não
Browse	Sim
Opções
When	M->DMZ_TIPTOL == '1'
Relação
Val. Sistema

Campo	DMZ_QUIEXC
Tipo	N
Tamanho	5
Decimal	2
Formato	@E 99999
Título	Kg.Lim.Exced
Descrição	Limite Execedente em Kg
Usado	Sim
Obrigatório	Não
Browse	Sim
Opções
When	M->DMZ_TIPTOL == '2'
Relação
Val. Sistema

Campo	DMZ_COBQUE
Tipo	C
Tamanho	1
Decimal	0
Formato	@!
Título	Cobra Quebra
Descrição	Tip. cobranca p/ Quebra
Usado	Sim
Obrigatório	Não
Browse	Sim
Opções	1=Nao Cobra;2=Parcial;3=Integral
When
Relação
Val. Sistema	Pertence("123")

Campo	DMZ_PORQUE
Tipo	N
Tamanho	6
Decimal	2
Formato	@E 999.99
Título	% de Quebra
Descrição	Margem em % p/ quebra
Usado	Sim
Obrigatório	Não
Browse	Sim
Opções
When	M->DMZ_TIPTOL == '1'
Relação
Val. Sistema

Campo	DMZ_QUIQUE
Tipo	N
Tamanho	5
Decimal	0
Formato	@E 99999
Título	Kg de Quebra
Descrição	Margem em kg p/ quebra
Usado	Sim
Obrigatório	Não
Browse	Sim
Opções
When	M->DMZ_TIPTOL == '2'
Relação
Val. Sistema

Campo	DMZ_COBAVA
Tipo	C
Tamanho	1
Decimal	0
Formato	@!
Título	Cobra Avaria
Descrição	Tipo de cobrança da avaria
Usado	Sim
Obrigatório	Não
Browse	Sim
Opções	1=Não Cobra;2=Integral
When
Relação	"1"
Val. Sistema	Pertence("12")

Campo	DMZ_ADIANT
Tipo	C
Tamanho	1
Decimal	0
Formato	@!
Título	Adiantamento
Descrição	Quem recebe o adiantamento?
Usado	Sim
Obrigatório	Não
Browse	Sim
Opções	1=Motorista;2=Proprietário
When
Relação
Val. Sistema	Pertence("12")

Campo	DMZ_QUITAC
Tipo	C
Tamanho	1
Decimal	0
Formato	@!
Título	Quem rec.Sal
Descrição	Quem recebe a par. Saldo?
Usado	Sim
Obrigatório	Não
Browse	Sim
Opções	1=Motorista;2=Proprietário
When
Relação
Val. Sistema	Pertence("12")

Campo	DMZ_ENTREG
Tipo	C
Tamanho	1
Decimal	0
Formato	@!
Título	Dt EntregaNF
Descrição	Dt entrega da NF quitação
Usado	Sim
Obrigatório	Não
Browse	Sim
Opções	1=Sim;2=Não
When
Relação	"2"
Val. Sistema	Pertence("12")

Campo	DMZ_PESOEN
Tipo	C
Tamanho	1
Decimal	0
Formato	@!
Título	Peso Entrega
Descrição	Peso Entrega na Quitação
Usado	Sim
Obrigatório	Não
Browse	Sim
Opções	1=Sim;2=Não
When
Relação	"2"
Val. Sistema	Pertence("12")

Campo	DMZ_BALANC
Tipo	C
Tamanho	1
Decimal	0
Formato	@!
Título	Tic. Balança
Descrição	Ticket Balança na Quitação
Usado	Sim
Obrigatório	Não
Browse	Sim
Opções	1=Sim;2=Não
When
Relação	"2"
Val. Sistema	Pertence("12")

Campo	DMZ_AVARIA
Tipo	C
Tamanho	1
Decimal	0
Formato	@!
Título	Avaria Quita
Descrição	Avaria NF Quitação
Usado	Sim
Obrigatório	Não
Browse	Sim
Opções	1=Sim;2=Não
When
Relação	"2"
Val. Sistema	Pertence("12")

Campo	DMZ_NFECAN
Tipo	C
Tamanho	1
Decimal	0
Formato	@!
Título	Rec.Can.NFE
Descrição	Recolhe canhoto Quitação
Usado	Sim
Obrigatório	Não
Browse	Sim
Opções	1=Sim;2=Não
When
Relação	"2"
Val. Sistema	Pertence("12")

Campo	DMZ_COMPDG
Tipo	C
Tamanho	1
Decimal	0
Formato	@!
Título	Comp.PDG
Descrição	Comprovante PDG quitação
Usado	Sim
Obrigatório	Não
Browse	Sim
Opções	1=Sim;2=Não
When
Relação	"2"
Val. Sistema	Pertence("12")

Campo	DMZ_DACTE
Tipo	C
Tamanho	1
Decimal	0
Formato	@!
Título	DACTE Quitac
Descrição	Dacte recolhe na quitação?
Usado	Sim
Obrigatório	Não
Browse	Sim
Opções	1=Sim;2=Não
When
Relação	"2"
Val. Sistema	Pertence("12")

Campo	DMZ_CONTRA
Tipo	C
Tamanho	1
Decimal	0
Formato	@!
Título	Rec.Contrato
Descrição	Recolhe contrato transpor
Usado	Sim
Obrigatório	Não
Browse	Sim
Opções	1=Sim;2=Não
When
Relação	"2"
Val. Sistema	Pertence("12")

Campo	DMZ_LOCQUI
Tipo	C
Tamanho	1
Decimal	0
Formato	@!
Título	Local Quitaç
Descrição	Local da Quitacao do Frete
Usado	Sim
Obrigatório	Não
Browse	Sim
Opções	1=Qualquer Lugar;2=ETF;3=Filial;4=Transportadora
When
Relação	"1"
Val. Sistema	Pertence("1234")

Campo	DMZ_LOCADI
Tipo	C
Tamanho	1
Decimal	0
Formato	@!
Título	Local Adiant
Descrição	Local da Quitação do Adiantamento
Usado	Sim
Obrigatório	Não
Browse	Sim
Opções	1=Qualquer Lugar;2=ETF;3=Filial;4=Transportadora
When
Relação	"1"
Val. Sistema	Pertence("1234")

Campo	DMZ_DESCOM
Tipo	C
Tamanho	1
Decimal	0
Formato	@!
Título	Dest.Comerci
Descrição	Frete Destinação Comercial
Usado	Sim
Obrigatório	Não
Browse	Sim
Opções	1=Sim;2=Não
When
Relação	"2"
Val. Sistema	Pertence("12")

Criação de índice da tabela "DMZ"

Índice	Ordem	Chave	Descrição
DMZ	1	DMZ_FILIAL+DMZ_CODIGO	DMZ_FILIAL+DMZ_CODIGO

Criação de Perguntes para o X1_GRUPO "RTMSR37"

Ordem	01
Pergunt	Data início do período ?
Tipo	D
Tamanho	8
MV_PAR	01

Ordem	02
Pergunt	Data final do período ?
Tipo	D
Tamanho	8
MV_PAR	02

Ordem	03
Pergunt	Viagem de ?
Tipo	C
Tamanho	6
MV_PAR	03

Ordem	04
Pergunt	Viagem até ?
Tipo	C
Tamanho	6
MV_PAR	04

Criação de Pergunte para o X1_GRUPO "TMSA256"

Ordem	04
Pergunt	Operadora Frota ?
Tipo	C
Tamanho	2
MV_PAR	04