Linha Microsiga Protheus

Árvore de páginas

Solução para múltiplos redespachos deverá ser customizada

Características do Requisito

Linha de Produto:

Microsiga Protheus®

Segmento:

Logística

Módulo:

Gestão de Distribuição - SIGAOMS

Rotina:

Rotina

Nome Técnico

OMSM011

Integração OMS x GFE

Rotina(s) envolvida(s)

Nome Técnico

MATA461

Geração da Nota Fiscal

Ponto de Entrada:

M461LSF2

Tickets relacionados

407059

Requisito (informe o requisito relacionado):MLOG-1618

País(es):

Brasil

Banco(s) de Dados:

Todos

Tabelas Utilizadas:

SC5 - Pedido de Venda.

SF2 - Nota Fiscal de Saída.

Sistema(s) Operacional(is):

Windows® / Linux®

Descrição

A solução para múltiplos redespachos deverá ser customizada, respeitando os seguintes procedimentos das nomenclaturas dos campos referenciados abaixo.

Importante:

Para implementar essa solução, será necessário o desenvolvimento por parte do cliente, não há compatibilizador para a criação dos campos, será necessária a criação manual do campos mencionados abaixo.

 

 

 

Criação de Campos 

  1. Criação de Campos no arquivo SX3 – Campos:
  • Tabela SC5 - Pedido de Venda

 

Campo

C5_TFRDP1

Tipo

C - Caracter

Tamanho

1

Decimal

0

Formato

X

Título

Tipo Frete1

Descrição

Tipo do Frete Utilizado1

Nível

1

Usado

Sim

Obrigatório

Não

Browse

Não

Opções

C=CIF; F=FOB

Val. Usuário

pertence("CF")

Ordem

V1

 

Campo

C5_ESTRDP1

Tipo

C - Caracter

Tamanho

2

Decimal

0

Formato

@!

Título

Estado1

Descrição

Sigla da Federacao1

Nível

1

Usado

Sim

Obrigatório

Não

Browse

Não

Val. Sistema

ExistCpo("SX5", "12" + M->C5_ESTRDP1)

Cons. Padrão

12 ( Tabela )

Grupo de Campos

010 - Estado

Pasta

1

Ordem

V2

 

Campo

C5_CMURDP1

Tipo

C - Caracter

Tamanho

5

Decimal

0

Formato

@9

Título

Cd.Municipi1

Descrição

Código do Municipio1

Nível

1

Usado

Sim

Obrigatório

Não

Browse

Não

Val. Sistema

ExistCpo("CC2", M->C5_ESTRDP1 + M->C5_CMURDP1)

Cons. Padrão

CC2

Gatilhos

Sim

Pasta

1

Ordem

V3

 

Campo

C5_REDESP2

Tipo

C - Caracter

Tamanho

6

Decimal

0

Formato

@X

Título

Redespacho02

Descrição

Codigo Transp. Redespacho

Nível

1

Usado

Sim

Obrigatório

Não

Browse

Não

Val. Sistema

Vazio() .OR. ExistCpo("SA4")

Cons. Padrão

SA4

Gatilhos

Sim

Ordem

V4

 

Campo

C5_TFRDP2

Tipo

C - Caracter

Tamanho

1

Decimal

0

Formato

X

Título

Tipo Frete2

Descrição

Tipo do Frete Utilizado2

Nível

1

Usado

Sim

Obrigatório

Não

Browse

Não

Opções

C=CIF; F=FOB

Val. Usuário

pertence("CF")

Ordem

V5

 

Campo

C5_ESTRDP2

Tipo

C - Caracter

Tamanho

2

Decimal

0

Formato

@!

Título

Estado2

Descrição

Sigla da Federacao2

Nível

1

Usado

Sim

Obrigatório

Não

Browse

Não

Val. Sistema

ExistCpo("SX5", "12" + M->C5_ESTRDP2)

Cons. Padrão

12 ( Tabela )

Grupo de Campos

010 - Estado

Pasta

1

Ordem

V6

 

Campo

C5_CMURDP2

Tipo

C - Caracter

Tamanho

5

Decimal

0

Formato

@9

Título

Cd.Municipi2

Descrição

Código do Municipio2

Nível

1

Usado

Sim

Obrigatório

Não

Browse

Não

Val. Sistema

ExistCpo("CC2", M->C5_ESTRDP2 + M->C5_CMURDP2)

Cons. Padrão

CC2

Gatilhos

Sim

Pasta

1

Ordem

V7

 

Campo

C5_REDESP3

Tipo

C - Caracter

Tamanho

6

Decimal

0

Formato

@X

Título

Redespacho03

Descrição

Codigo Transp. Redespacho

Nível

1

Usado

Sim

Obrigatório

Não

Browse

Não

Val. Sistema

Vazio() .OR. ExistCpo("SA4")

Cons. Padrão

SA4

Gatilhos

Sim

Ordem

V8

 

Campo

C5_TFRDP3

Tipo

C - Caracter

Tamanho

1

Decimal

0

Formato

X

Título

Tipo Frete3

Descrição

Tipo do Frete Utilizado3

Nível

1

Usado

Sim

Obrigatório

Não

Browse

Não

Opções

C=CIF; F=FOB

Val. Usuário

pertence("CF")

Ordem

V9

 

Campo

C5_ESTRDP3

Tipo

C - Caracter

Tamanho

2

Decimal

0

Formato

@!

Título

Estado3

Descrição

Sigla da Federacao3

Nível

1

Usado

Sim

Obrigatório

Não

Browse

Não

Val. Sistema

ExistCpo("SX5", "12" + M->C5_ESTRDP3)

Cons. Padrão

12 ( Tabela )

Grupo de Campos

010 - Estado

Pasta

1

Ordem

W0

 

Campo

C5_CMURDP3

Tipo

C - Caracter

Tamanho

5

Decimal

0

Formato

@9

Título

Cd.Municipi3

Descrição

Código do Municipio3

Nível

1

Usado

Sim

Obrigatório

Não

Browse

Não

Val. Sistema

ExistCpo("CC2", M->C5_ESTRDP3 + M->C5_CMURDP3)

Cons. Padrão

CC2

Gatilhos

Sim

Pasta

1

Ordem

W1

 

Campo

C5_REDESP4

Tipo

C - Caracter

Tamanho

6

Decimal

0

Formato

@X

Título

Redespacho04

Descrição

Codigo Transp. Redespacho

Nível

1

Usado

Sim

Obrigatório

Não

Browse

Não

Val. Sistema

Vazio() .OR. ExistCpo("SA4")

Cons. Padrão

SA4

Gatilhos

Sim

Ordem

W2

 

Campo

C5_TFRDP4

Tipo

C - Caracter

Tamanho

1

Decimal

0

Formato

X

Título

Tipo Frete4

Descrição

Tipo do Frete Utilizado4

Nível

1

Usado

Sim

Obrigatório

Não

Browse

Não

Opções

C=CIF; F=FOB

Val. Usuário

pertence("CF")

Ordem

W3

 

Campo

C5_ESTRDP4

Tipo

C - Caracter

Tamanho

2

Decimal

0

Formato

@!

Título

Estado4

Descrição

Sigla da Federacao4

Nível

1

Usado

Sim

Obrigatório

Não

Browse

Não

Val. Sistema

ExistCpo("SX5", "12" + M->C5_ESTRDP4)

Cons. Padrão

12 ( Tabela )

Grupo de Campos

010 - Estado

Pasta

1

Ordem

W4

 

Campo

C5_CMURDP4

Tipo

C - Caracter

Tamanho

5

Decimal

0

Formato

@9

Título

Cd.Municipi4

Descrição

Código do Municipio4

Nível

1

Usado

Sim

Obrigatório

Não

Browse

Não

Val. Sistema

ExistCpo("CC2", M->C5_ESTRDP4 + M->C5_CMURDP4)

Cons. Padrão

CC2

Gatilhos

Sim

Pasta

1

Ordem

W5

 

Campo

C5_REDESP5

Tipo

C - Caracter

Tamanho

6

Decimal

0

Formato

@X

Título

Redespacho05

Descrição

Codigo Transp. Redespacho

Nível

1

Usado

Sim

Obrigatório

Não

Browse

Não

Val. Sistema

Vazio() .OR. ExistCpo("SA4")

Cons. Padrão

SA4

Gatilhos

Sim

Ordem

W6

 

Campo

C5_TFRDP5

Tipo

C - Caracter

Tamanho

1

Decimal

0

Formato

X

Título

Tipo Frete5

Descrição

Tipo do Frete Utilizado5

Nível

1

Usado

Sim

Obrigatório

Não

Browse

Não

Opções

C=CIF; F=FOB

Val. Usuário

pertence("CF")

Ordem

W7

 

Campo

C5_ESTRDP5

Tipo

C - Caracter

Tamanho

2

Decimal

0

Formato

@!

Título

Estado5

Descrição

Sigla da Federacao5

Nível

1

Usado

Sim

Obrigatório

Não

Browse

Não

Val. Sistema

ExistCpo("SX5", "12" + M->C5_ESTRDP5)

Cons. Padrão

12 ( Tabela )

Grupo de Campos

010 - Estado

Pasta

1

Ordem

W8

 

Campo

C5_CMURDP5

Tipo

C - Caracter

Tamanho

5

Decimal

0

Formato

@9

Título

Cd.Municipi5

Descrição

Código do Municipio5

Nível

1

Usado

Sim

Obrigatório

Não

Browse

Não

Val. Sistema

ExistCpo("CC2", M->C5_ESTRDP5 + M->C5_CMURDP5)

Cons. Padrão

CC2

Gatilhos

Sim

Pasta

1

Ordem

W9

 

  • Tabela SF2 - Nota Fiscal de Saída 

Campo

F2_ESTRDP1

Tipo

C - Caracter

Tamanho

2

Decimal

0

Formato

@!

Título

Estado1

Descrição

Sigla da Federacao1

Nível

1

Usado

Sim

Obrigatório

Não

Browse

Não

Val. Sistema

ExistCpo("SX5", "12" + M->F2_ESTRDP1)

Cons. Padrão

12 ( Tabela )

Grupo de Campos

010 - Estado

Pasta

1

Ordem

01

 

Campo

F2_CMURDP1

Tipo

C - Caracter

Tamanho

5

Decimal

0

Formato

@9

Título

Cd.Municipi1

Descrição

Código do Municipio1

Nível

1

Usado

Sim

Obrigatório

Não

Browse

Não

Val. Sistema

ExistCpo("CC2", M->F2_ESTRDP1 + M->F2_CMURDP1)

Cons. Padrão

CC2

Gatilhos

Sim

Pasta

1

Ordem

02

 

Campo

F2_REDESP2

Tipo

C - Caracter

Tamanho

6

Decimal

0

Formato

@!

Título

Redespacho2

Descrição

Transp. para Redespacho2

Nível

1

Usado

Sim

Obrigatório

Não

Browse

Não

Cons. Padrão

SA4

Ordem

03

 

Campo

F2_TFRDP2

Tipo

C - Caracter

Tamanho

1

Decimal

0

Formato

@!

Título

Tipo de fre2

Descrição

Indica tipo de frete2

Nível

1

Usado

Sim

Obrigatório

Não

Browse

Não

Contexto

Real

Propriedade

Visualizar

Ordem

04

 

Campo

F2_ESTRDP2

Tipo

C - Caracter

Tamanho

2

Decimal

0

Formato

@!

Título

Estado2

Descrição

Sigla da Federacao2

Nível

1

Usado

Sim

Obrigatório

Não

Browse

Não

Val. Sistema

ExistCpo("SX5", "12" + M->F2_ESTRDP2)

Cons. Padrão

12 ( Tabela )

Grupo de Campos

010 - Estado

Pasta

1

Ordem

05

 

Campo

F2_CMURDP2

Tipo

C - Caracter

Tamanho

5

Decimal

0

Formato

@9

Título

Cd.Municipi2

Descrição

Código do Municipio2

Nível

1

Usado

Sim

Obrigatório

Não

Browse

Não

Val. Sistema

ExistCpo("CC2", M->F2_ESTRDP2 + M->F2_CMURDP2)

Cons. Padrão

CC2

Gatilhos

Sim

Pasta

1

Ordem

06

 

Campo

F2_REDESP3

Tipo

C - Caracter

Tamanho

6

Decimal

0

Formato

@!

Título

Redespacho3

Descrição

Transp. para Redespacho3

Nível

1

Usado

Sim

Obrigatório

Não

Browse

Não

Cons. Padrão

SA4

Ordem

07

 

Campo

F2_TFRDP3

Tipo

C - Caracter

Tamanho

1

Decimal

0

Formato

@!

Título

Tipo de fre3

Descrição

Indica tipo de frete3

Nível

1

Usado

Sim

Obrigatório

Não

Browse

Não

Contexto

Real

Propriedade

Visualizar

Ordem

08

 

Campo

F2_ESTRDP3

Tipo

C - Caracter

Tamanho

2

Decimal

0

Formato

@!

Título

Estado3

Descrição

Sigla da Federacao3

Nível

1

Usado

Sim

Obrigatório

Não

Browse

Não

Val. Sistema

ExistCpo("SX5", "12" + M->F2_ESTRDP3)

Cons. Padrão

12 ( Tabela )

Grupo de Campos

010 - Estado

Pasta

1

Ordem

09

 

Campo

F2_CMURDP3

Tipo

C - Caracter

Tamanho

5

Decimal

0

Formato

@9

Título

Cd.Municipi3

Descrição

Código do Municipio3

Nível

1

Usado

Sim

Obrigatório

Não

Browse

Não

Val. Sistema

ExistCpo("CC2", M->F2_ESTRDP3 + M->F2_CMURDP3)

Cons. Padrão

CC2

Gatilhos

Sim

Pasta

1

Ordem

10

 

Campo

F2_REDESP4

Tipo

C - Caracter

Tamanho

6

Decimal

0

Formato

@!

Título

Redespacho4

Descrição

Transp. para Redespacho4

Nível

1

Usado

Sim

Obrigatório

Não

Browse

Não

Cons. Padrão

SA4

Ordem

11

 

Campo

F2_TFRDP4

Tipo

C - Caracter

Tamanho

1

Decimal

0

Formato

@!

Título

Tipo de fre4

Descrição

Indica tipo de frete4

Nível

1

Usado

Sim

Obrigatório

Não

Browse

Não

Contexto

Real

Propriedade

Visualizar

Ordem

12

 

Campo

F2_ESTRDP4

Tipo

C - Caracter

Tamanho

2

Decimal

0

Formato

@!

Título

Estado4

Descrição

Sigla da Federacao4

Nível

1

Usado

Sim

Obrigatório

Não

Browse

Não

Val. Sistema

ExistCpo("SX5", "12" + M->F2_ESTRDP4)

Cons. Padrão

12 ( Tabela )

Grupo de Campos

010 - Estado

Pasta

1

Ordem

13

 

Campo

F2_CMURDP4

Tipo

C - Caracter

Tamanho

5

Decimal

0

Formato

@9

Título

Cd.Municipi4

Descrição

Código do Municipio4

Nível

1

Usado

Sim

Obrigatório

Não

Browse

Não

Val. Sistema

ExistCpo("CC2", M->F2_ESTRDP4 + M->F2_CMURDP4)

Cons. Padrão

CC2

Gatilhos

Sim

Pasta

1

Ordem

14

 

Campo

F2_REDESP5

Tipo

C - Caracter

Tamanho

6

Decimal

0

Formato

@!

Título

Redespacho5

Descrição

Transp. para Redespacho5

Nível

1

Usado

Sim

Obrigatório

Não

Browse

Não

Cons. Padrão

SA4

Ordem

15

 

Campo

F2_TFRDP5

Tipo

C - Caracter

Tamanho

1

Decimal

0

Formato

@!

Título

Tipo de fre5

Descrição

Indica tipo de frete5

Nível

1

Usado

Sim

Obrigatório

Não

Browse

Não

Contexto

Real

Propriedade

Visualizar

Ordem

16

 

Campo

F2_ESTRDP5

Tipo

C - Caracter

Tamanho

2

Decimal

0

Formato

@!

Título

Estado5

Descrição

Sigla da Federacao5

Nível

1

Usado

Sim

Obrigatório

Não

Browse

Não

Val. Sistema

ExistCpo("SX5", "12" + M->F2_ESTRDP5)

Cons. Padrão

12 ( Tabela )

Grupo de Campos

010 - Estado

Pasta

1

Ordem

17

 

Campo

F2_CMURDP5

Tipo

C - Caracter

Tamanho

5

Decimal

0

Formato

@9

Título

Cd.Municipi5

Descrição

Código do Municipio5

Nível

1

Usado

Sim

Obrigatório

Não

Browse

Não

Val. Sistema

ExistCpo("CC2", M->F2_ESTRDP5 + M->F2_CMURDP5)

Cons. Padrão

CC2

Gatilhos

Sim

Pasta

1

Ordem

18

 

Campo

F2_TFRDP1

Tipo

C - Caracter

Tamanho

1

Decimal

0

Formato

@!

Título

Tipo de fre1

Descrição

Indica tipo de frete1

Nível

1

Usado

Sim

Obrigatório

Não

Browse

Não

Contexto

Real

Propriedade

Visualizar

Ordem

[0

 

  1. Criação de Gatilhos no arquivo SX7 – Gatilhos:
  • Tabela SC5 – Pedido de Venda 

Campo

C5_REDESP

Sequência

001

Cnt. Domínio

C5_ESTRDP1

Tipo

P - Primário

Regra

SA4->A4_EST

Posiciona

S

Alias

SA4

Ordem

1

Chave

xFilial("SA4") + M->C5_REDESP

 

Campo

C5_REDESP

Sequência

002

Cnt. Domínio

C5_CMURDP1

Tipo

P - Primário

Regra

SA4->A4_COD_MUN

 

Campo

C5_REDESP2

Sequência

001

Cnt. Domínio

C5_ESTRDP2

Tipo

P - Primário

Regra

SA4->A4_EST

Posiciona

S

Alias

SA4

Ordem

1

Chave

xFilial("SA4") + M->C5_REDESP2

 

Campo

C5_REDESP2

Sequência

002

Cnt. Domínio

C5_CMURDP2

Tipo

P - Primário

Regra

SA4->A4_COD_MUN

 

Campo

C5_REDESP3

Sequência

001

Cnt. Domínio

C5_ESTRDP3

Tipo

P - Primário

Regra

SA4->A4_EST

Posiciona

S

Alias

SA4

Ordem

1

Chave

xFilial("SA4") + M->C5_REDESP3

 

Campo

C5_REDESP3

Sequência

002

Cnt. Domínio

C5_CMURDP3

Tipo

P - Primário

Regra

SA4->A4_COD_MUN

 

Campo

C5_REDESP4

Sequência

001

Cnt. Domínio

C5_ESTRDP4

Tipo

P - Primário

Regra

SA4->A4_EST

Posiciona

S

Alias

SA4

Ordem

1

Chave

xFilial("SA4") + M->C5_REDESP4

 

Campo

C5_REDESP4

Sequência

002

Cnt. Domínio

C5_CMURDP4

Tipo

P - Primário

Regra

SA4->A4_COD_MUN

 

Campo

C5_REDESP5

Sequência

001

Cnt. Domínio

C5_ESTRDP5

Tipo

P - Primário

Regra

SA4->A4_EST

Posiciona

S

Alias

SA4

Ordem

1

Chave

xFilial("SA4") + M->C5_REDESP5

 

Campo

C5_REDESP5

Sequência

002

Cnt. Domínio

C5_CMURDP5

Tipo

P - Primário

Regra

SA4->A4_COD_MUN

 

 

Procedimento para Utilização

  • Criação do Ponto de Entrada M461LSF2().      

  • O Ponto de Entrada M461LSF2, será responsável por replicar os dados gravados nos campos customizados da tabela SC5 para a tabela de notas fiscais de saída (SF2). Ele será executado após a gravação dos dados da nota fiscal.

  •  A implementação deve ser realizada para o ambiente OMS, pois o ambiente GFE já contempla por padrão a funcionalidade de múltiplos Redespachos. 

 

Ponto de Entrada

Documentação sobre o ponto de entrada: M461LSF2

Exemplo: 

#INCLUDE "PROTHEUS.CH"

User Function M461LSF2()

Local _TFRDP1  := SC5->(FieldPos("C5_TFRDP1")) > 0

If _TFRDP1

            SF2->F2_TFRDP1  := SC5->C5_TFRDP1

EndIf

Return()