DT DLOGTMS02-17806 Viagem automática no lote.

01. DADOS GERAIS

Produto:	TOTVS Logística TMS
Linha de Produto:	Linha Protheus
Segmento:	Logística
Módulo:	TOTVS Logística TMS
Função:	TMSA040 - Cotação de Frete; TMSA050 - Entrada da NF do Cliente; TMSA170 - Lote de Entrada NF; TMSXFUNA - Funções Genéricas; TMSAF64E - Função Viagem Modelo 3; TMSA200 - Cálculo do Frete; TMSA200V - Criação Automática da Viagem; TMSA510 - Cockpit de Clientes.
Ticket:	Não se aplica.
Requisito/Story/Issue (informe o requisito relacionado) :	DLOGTMS02-17806

02. SITUAÇÃO/REQUISITO

O sistema não gera a viagem modelo 3 automaticamente após o cálculo do frete a receber.

Implementar a geração da Viagem de Transporte e Entrega (Modelo 3) Automaticamente através do SIGATMS após o cálculo do frete a receber, isto proporcionará maior agilidade para os processos de emissão de documentos e viagens.

As definições/conceitos para os processos de Lote de Entrada de NFS (TMSA170 - SIGATMS), permanecem os mesmos:

Efetuar o controle de lotes de entrada de notas fiscais.
Agrupar as notas fiscais do cliente durante o processo de recebimento.
Utilização no Cálculo de Frete, o qual permite a geração dos conhecimentos de transporte.

03. SOLUÇÃO

Implementado a nova funcionalidade para geração de viagem após o cálculo do frete.

Foram realizados ajustes nas rotinas citadas no item 01. Dados Gerais, para que o sistema gere a viagem do tipo planejada após o cálculo do frete.

Foram implementadas as seguintes melhorias:

Possibilidade de informar veículo (tracionador e/ou reboques) no cadastramento do lote;
Possibilidade de informar rota;
Possibilidade de informar tipo de serviço Entrega ou Transporte;

Importante:

As alterações de dicionário de dados estarão disponíveis a partir do release 12.1.33.

Para implementação em releases anteriores será necessário a atualização via UPDDISTR, conforme detalharemos no item 04. desta documentação.

04. DEMAIS INFORMAÇÕES

Para uso desta funcionalidade, deve ser utilizado:
Pacote: 009443 - Para atualização de dicionário de dados, criação de novas tabelas, campos, índices e gatilhos.
Fontes atualizados das rotinas envolvidas, mencionadas no item 01. desta documentação;

IMPORTANTE:

Adequações necessárias ao Dicionário de Dados:

Para o correto funcionamento do uso do veículo na rotina de lote de entrada de NFs, é necessário ajustes na tabela SX3 - Campos das Tabelas e Banco de Dados:

O conteúdo do X3_INIBRW dos campos abaixo devem ser ajustados pois o UPDDISTR não realizará esta alteração e o cliente selecionado no browse pode ser apresentado de forma incorreta. Desta forma, se faz necessário o ajuste manual conforme abaixo:

Campo	Conteúdo X3_INIBRW
DV2_NOMCLI	TMSA510Cli(DV2->DV2_CODCLI,DV2->DV2_LOJCLI,"A1_NOME")
DDO_NOMCLI	TMSA510Cli(DDO->DDO_CLIATE,DDO->DDO_LOJATE,"A1_NOME")
DDO_NMCATE	TMSA510Cli(DDO->DDO_CLIATE,DDO->DDO_LOJATE,"A1_NOME")
DUB_NOMCLI	TMSA510Cli(DUB->DUB_CODCLI,DUB->DUB_LOJCLI,"A1_NOME")

Estas tabelas estão no Cockpit de Clientes, mas caso utilizadas em outros Cockpits ou Browses poderá ocorrer incidente, conforme especificado acima.

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

Criação de tabelas:

Tabela	Descrição
DMQ	Veículos do Lote

Ajuste em tabelas:

Tabela	Descrição
DTP	Lote de Entrada da NF

Criação de Campos.

Tabela DMQ (Veículos do Lote ):

Campo	DMQ_FILIAL
Tipo	Caractere
Tamanho	8
Decimal	0
Formato
Título	Filial
Descrição	Filial do Sistema
Usado
Obrigatório
Browse
Opções
When
Relação
Val. Sistema
Help	Informe a filial do sistema.

Campo	DMQ_FILORI
Tipo	Caractere
Tamanho	8
Decimal	0
Formato
Título	Filial
Descrição	Filial de Origem
Usado
Obrigatório
Browse
Opções
When
Relação
Val. Sistema
Help	Informe a filial de Origem

Campo	DMQ_LOTNFC
Tipo	Caractere
Tamanho	6
Decimal	0
Formato	@!
Título	Lote
Descrição	Número do Lote
Usado
Obrigatório
Browse
Opções
When
Relação
Val. Sistema
Help	Número do Lote

Campo	DMQ_SEQUEN
Tipo	Caractere
Tamanho	2
Decimal	0
Formato	@!
Título	Sequencia
Descrição	Sequencia
Usado	Sim
Obrigatório
Browse
Opções
When
Relação
Val. Sistema
Help	Sequencia

Campo	DMQ_CODVEI
Tipo	Caractere
Tamanho	8
Decimal	0
Formato	@!
Título	Cod Veículo
Descrição	Código do Veículo
Usado	Sim
Obrigatório
Browse
Opções
When	TMSA170Whe()
Relação
Val. Sistema	Vazio() .Or. (ExistCpo('DA3') .And. TmsA170Vld())
Help	Código do veículo

Campo	DMQ_MODVEI
Tipo	Caractere
Tamanho	40
Decimal	0
Formato	@!
Título	Mod Veiculo
Descrição	Modelo do Veículo
Usado	Sim
Obrigatório
Browse
Opções
When
Relação
Val. Sistema
Help	Modelo do Veículo.

Campo	DMQ_CODRB1
Tipo	Caractere
Tamanho	8
Decimal	0
Formato	@!
Título	Cod Reb 1
Descrição	Código Reboque 1
Usado	Sim
Obrigatório
Browse
Opções
When	TMSA170Whe()
Relação
Val. Sistema	Vazio() .Or. (ExistCpo('DA3') .And. TmsA170Vld())
Help	Código Reboque 1

Campo	DMQ_MODRB1
Tipo	Caractere
Tamanho	30
Decimal	0
Formato	@!
Título	Mod Reb 1
Descrição	Modelo Reboque 1
Usado	Sim
Obrigatório
Browse
Opções
When
Relação	If(Inclui,"",Posicione("DA3",1,xFilial("DA3")+DMQ->DMQ_CODRB1,"DA3_DESC"))
Val. Sistema
Help	Modelo Reboque 1

Campo	DMQ_CODRB2
Tipo	Caractere
Tamanho	8
Decimal	0
Formato	@!
Título	Cod Reb 2
Descrição	Código Reboque 2
Usado	Sim
Obrigatório
Browse
Opções
When
Relação
Val. Sistema	Vazio() .Or. (ExistCpo('DA3') .And. TmsA170Vld())
Help	Código Reboque 2

Campo	DMQ_MODRB2
Tipo	Caractere
Tamanho	30
Decimal	0
Formato	@!
Título	Mod Reb 2
Descrição	Modelo Reboque 2
Usado	Sim
Obrigatório
Browse
Opções
When
Relação	If(Inclui,"",Posicione("DA3",1,xFilial("DA3")+DMQ->DMQ_CODRB2,"DA3_DESC"))
Val. Sistema
Help	Modelo Reboque 2

Campo	DMQ_CODRB3
Tipo	Caractere
Tamanho	8
Decimal	0
Formato	@!
Título	Cod Reb 3
Descrição	Código Reboque 3
Usado	Sim
Obrigatório
Browse
Opções
When
Relação
Val. Sistema	Vazio() .Or. (ExistCpo('DA3') .And. TmsA170Vld())
Help	Código Reboque 3

Campo	DMQ_MODRB3
Tipo	Caractere
Tamanho	30
Decimal	0
Formato	@!
Título	Mod Reb 3
Descrição	Modelo Reboque 3
Usado	Sim
Obrigatório
Browse
Opções
When
Relação	If(Inclui,"",Posicione("DA3",1,xFilial("DA3")+DMQ->DMQ_CODRB3,"DA3_DESC"))
Val. Sistema
Help	Modelo Reboque 3

Tabela DTP (Lote ):

Campo	DTP_SERVIC
Tipo	Caractere
Tamanho	1
Decimal	0
Formato	@!
Título	Serviço
Descrição	Serviço de Negociação
Usado	Sim
Obrigatório	Não
Browse	Sim
Opções
When
Relação
Val. Sistema	ExistCpo("DC5",,1)
Help	Indica o Serviço de Negociação utilizado no Lote de Rateio.

Criação de gatilhos:

DMQ:

X7_Campo	X7_Sequencia	X7_Regra	X7_CDOMIN	X7_Alias	X7_Ordem	X7_Chave
DMQ_CODRB1	001	DA3->DA3_DESC	DMQ_MODRB1	DA3	1	xFilial("DA3")+M->DMQ_CODRB1
DMQ_CODRB2	002	DA3->DA3_DESC	DMQ_MODRB2	DA3	1	xFilial("DA3")+M->DMQ_CODRB2
DMQ_CODRB3	003	DA3->DA3_DESC	DMQ_MODRB3	DA3	1	xFilial("DA3")+M->DMQ_CODRB3
DMQ_CODVEI	004	DA3->DA3_DESC	DMQ_MODVEI	DA3	1	xFilial("DA3")+M->DMQ_CODVEI

Criação de índices: