Árvore de páginas

Criação de campos de Plano de Contas no Cadastro de Naturezas

Características do Requisito

Linha de Produto:

Microsiga Protheus® 

Segmento:

Jurídico

Módulo:

SIGAPFS

Rotina:

Rotina

Nome Técnico

FINA010

Cadastro de Naturezas Financeiras

JURXFINIntegração Jurídico x Financeiro
RUP_PFSAjuste de base
JURTPCONTATipos de Contas

Requisito:

DJURFAT1-1234

DJURFAT1-1623

DJURFAT1-1767

DJURFAT1-2077

País(es):

Brasil

Banco(s) de Dados:

Todos

Tabelas Utilizadas:

SED - Naturezas

Sistema(s) Operacional(is):

Todos

Descrição

Criação de campos no cadastro de Naturezas Financeiras do módulo Financeiro (SIGAFIN), de forma a possibilitar sua utilização semelhante ao Plano de Contas do BCSFinanceiro (Sisjuri).

O plano de contas financeiro é uma lista das contas que serão utilizadas para a consolidação das transações financeiras. Visa classificar todos os tipos de Receitas, Despesas e Custos que possam existir na área de gestão e controladoria de escritórios de advocacia.


Procedimento para Implantação

O sistema é atualizado logo após a aplicação do pacote de atualizações (Patch) deste chamado.

Aplique o patch do requisito e execute uma vez a rotina UPDDISTR.

Logo após a execução desta rotina é alterado o dicionário de dados da base, conforme especificações abaixo:


Atualizações do Compatibilizador


1.  Criação de Campos no arquivo SX3 – Campos:
  • Tabela SED - Natureza Financeira:

Campo

ED_CMOEJUR

Tipo

Caracter

Tamanho

2

Decimal

0

Título

Cód Moeda

Descrição

Código Moeda

Usado

Sim

Obrigatório

Não

Browse

Não

Modo EdiçãoGetMv("MV_JURXFIN",,.F.).And.JurWhenSED('ED_CMOEJUR')

Val. Sistema

Vazio().OR.JurValSED()

Contexto

Real

Propriedade

Alterar

Cons. Padrão

JURCTO

Gatilhos

Sim

Pasta

4

Campo

ED_DMOEJUR

Tipo

Caracter

Tamanho

10

Decimal

0

Título

Símb Moeda

Descrição

Símbolo Moeda

Usado

Sim

Obrigatório

Não

Browse

Não

Inic. Padrão

IF(!INCLUI, POSICIONE('CTO', 1, XFILIAL('CTO') + SED->ED_CMOEJUR, 'CTO_SIMB'), '')

Contexto

Virtual

Propriedade

Visualizar

Pasta

4

Campo

ED_TPCOJR

Tipo

Caracter

Tamanho

1

Decimal

0

Formato

@!

Título

Tipo Conta

Descrição

Tipo de Conta

Usado

Sim

Obrigatório

Não

Browse

Sim

Opções

#JurListCon()

ValidaçãoVazio().Or.JurValSED()

Modo Edição

GetMv("MV_JURXFIN",,.F.).And.JurWhenSED('ED_TPCOJR')

Contexto

Real

Propriedade

Alterar

Gatilhos

Sim

Pasta

4 - Jurídico

 

Campo

ED_CFJUR

Tipo

Caracter

Tamanho

1

Decimal

0

Formato

@!

Título

Cashflow?

Descrição

Cashflow?

Usado

Sim

Obrigatório

Não

Browse

Não

Opções

1=Sim; 2=Não

Inic. Padrão

"2"

Val. Sistema

Pertence("12").And.JurValSED()

Modo EdiçãoGetMv("MV_JURXFIN",,.F.)

Contexto

Real

Propriedade

Alterar

Pasta

4 - Jurídico

 

Campo

ED_CPJUR

Tipo

Caracter

Tamanho

1

Decimal

0

Formato

@!

Título

Contas Pag?

Descrição

Contas a Pagar?

Usado

Sim

Obrigatório

Não

Browse

Não

Opções

1=Sim; 2=Não

Inic. Padrão

"1"

Val. Sistema

Pertence("12").And.JurValSED()

Modo EdiçãoGetMv("MV_JURXFIN",,.F.)

Contexto

Real

Propriedade

Alterar

Pasta

4 - Jurídico

 

Campo

ED_CRJUR

Tipo

Caracter

Tamanho

1

Decimal

0

Formato

@!

Título

Contas Rec?

Descrição

Contas a Receber?

Usado

Sim

Obrigatório

Não

Browse

Não

Opções

1=Sim; 2=Não

Inic. Padrão

"1"

Val. Sistema

Pertence("12").And.JurValSED()

Modo EdiçãoGetMv("MV_JURXFIN",,.F.)

Contexto

Real

Propriedade

Alterar

Pasta

4 - Jurídico

 

Campo

ED_BANCJUR

Tipo

Caracter

Tamanho

1

Decimal

0

Formato

@!

Título

Banco?

Descrição

Banco?

Usado

Sim

Obrigatório

Não

Browse

Não

Opções

1=Sim; 2=Não

Inic. Padrão

"2"

Val. Sistema

Pertence("12").And.JurValSED()

Modo EdiçãoGetMv("MV_JURXFIN",,.F.)

Contexto

Real

Propriedade

Alterar

Gatilhos

Sim

Pasta

4 - Jurídico

Campo

ED_CBANCO

Tipo

Caracter

Tamanho

3

Decimal

0

Formato

@!

Título

Cód Banco

Descrição

Código do Banco

Usado

Sim

Obrigatório

Não

Browse

Não

Modo Edição

JurWhenSED("ED_CBANCO")

Contexto

Real

Propriedade

Alterar

Cons. Padrão

SA6JUR

Grupo de Campos

007 - Banco

Pasta

4 - Jurídico

Campo

ED_CAGENC

Tipo

Caracter

Tamanho

5

Decimal

0

Formato

@!

Título

Cód Agência

Descrição

Código Agência Bancária

Usado

Sim

Obrigatório

Não

Browse

Não

Modo Edição

JurWhenSED("ED_CAGENC")

Contexto

Real

Propriedade

Alterar

Grupo de Campos

008 - Agencia

Pasta

4 - Jurídico

  

Campo

ED_CCONTA

Tipo

Caracter

Tamanho

10

Decimal

0

Formato

@!

Título

Cód Conta

Descrição

Código Conta Bancária

Usado

Sim

Obrigatório

Não

Browse

Não

Modo Edição

JurWhenSED("ED_CCONTA")

Val. Sistema

Vazio() .OR. ExistCPO( 'SA6', M->ED_CBANCO + M->ED_CAGENC + M->ED_CCONTA, 1)

Grupo de Campos

009 - Conta Corrente

Pasta

4 - Jurídico

Campo

ED_DBANCO

Tipo

Caracter

Tamanho

40

Decimal

0

Título

Nome Banco

Descrição

Nome do Banco

Usado

Sim

Obrigatório

Não

Browse

Não

Inic. Padrão

IF(!INCLUI, POSICIONE("SA6", 1, XFILIAL("SA6") + SED->ED_CBANCO + SED->ED_CAGENC + SED->ED_CCONTA, "A6_NOME"), '')

Contexto

Virtual

Propriedade

Visualizar

Inic. Browse

POSICIONE("SA6", 1, XFILIAL("SA6") + SED->ED_CBANCO + SED->ED_CAGENC, "A6_NOME")

Pasta

4 - Jurídico

 

Campo

ED_CCJURI

Tipo

Caracter

Tamanho

1

Decimal

0

Formato

@!

Título

C. Custo Jur

Descrição

Centro de Custo Jurídico

Usado

Sim

Obrigatório

Não

Browse

Sim

Opções

1=Escritório;  2=Escritório e C.C. Jurídico;  3=Profissional;  4=Tabela de Rateio;  5=Desp de Cliente;  6=Transitória Pós Pagamento

Modo Edição

JurWhenSED("ED_CCJURI")

Val. Sistema

JurValSED()

Contexto

Real

Propriedade

Alterar

Gatilhos

Sim

Pasta

4 - Jurídico

 

Campo

ED_RATJUR

Tipo

Caracter

Tamanho

10

Decimal

0

Formato

@!

Título

Cód. Tab Rat

Descrição

Código Tabela de Rateio

Usado

Sim

Obrigatório

Não

Browse

Sim

Modo Edição

JurWhenSED("ED_RATJUR")

Val. Sistema

Vazio() .OR. JURRAT()

 Contexto

Real

Propriedade

Alterar

Cons. Padrão

OH6SED

Pasta

4 - Jurídico


2.  Alteração de Campos no arquivo SX3 – Campos:
  • Tabela SED - Natureza Financeira:

Campo

ED_TIPO

Val. Sistema

Pertence("12")

Campo

ED_GRPNAT

Usado

Não

Campo

ED_ESCRIT

Usado

Não

Campo

ED_GRPJUR

Usado

Não



3.  Criação de Gatilhos no arquivo SX7 – Gatilhos:

  • Tabela SED - Natureza Financeira:


Campo

ED_CMOEJUR

Sequência

001

Cnt. Domínio

ED_DMOEJUR

Tipo

P - Primário

Regra

CTO->CTO_SIMB

Posiciona

S

Alias

CTO

Ordem

1

Chave

xFilial('CTO') + M->ED_CMOEJUR

Propietário

Sim

Campo

ED_BANCJUR

Sequência

001

Cnt. Domínio

ED_CCJURI

Tipo

P - Primário

Regra

""

Condição

M->ED_BANCJUR == "1"

Proprietário

Sim

 

Campo

ED_BANCJUR

Sequência

002

Cnt. Domínio

ED_RATJUR

Tipo

P - Primário

Regra

""

Condição

M->ED_BANCJUR == "1"

Proprietário

Sim

 

Campo

ED_BANCJUR

Sequência

003

Cnt. Domínio

ED_CBANCO

Tipo

P - Primário

Regra

""

Condição

M->ED_BANCJUR == "2"

Propietário

Sim

 

Campo

ED_BANCJUR

Sequência

004

Cnt. Domínio

ED_CAGENC

Tipo

P - Primário

Regra

""

Condição

M->ED_BANCJUR == "2"

Propietário

Sim

 

Campo

ED_BANCJUR

Sequência

005

Cnt. Domínio

ED_CCONTA

Tipo

P - Primário

Regra

""

Condição

M->ED_BANCJUR == "2"

Propietário

Sim

 

Campo

ED_BANCJUR

Sequência

006

Cnt. Domínio

ED_DBANCO

Tipo

P - Primário

Regra

""

Condição

M->ED_BANCJUR == "2"

Propietário

Sim

 

Campo

ED_CCJURI

Sequência

001

Cnt. Domínio

ED_RATJUR

Tipo

P - Primário

Regra

''

Condição

M->ED_CCJURI!='4'

Proprietário

Sim

Campo

ED_CCJURI

Sequência

002

Cnt. Domínio

ED_TPCOJR

Tipo

P - Primário

Regra

"1"

Condição

M->ED_CCJURI='6'

Proprietário

Sim

Campo

ED_CCJURI

Sequência

003

Cnt. Domínio

ED_BANCJUR

Tipo

P - Primário

Regra

"2"

Condição

M->ED_CCJURI='6'

Proprietário

Sim

Campo

ED_CCJURI

Sequência

004

Cnt. Domínio

ED_CFJUR

Tipo

P - Primário

Regra

"2"

Condição

M->ED_CCJURI='6'

Proprietário

Sim

Campo

ED_CCJURI

Sequência

005

Cnt. Domínio

ED_CPJUR

Tipo

P - Primário

Regra

"1"

Condição

M->ED_CCJURI='6'

Proprietário

Sim

Campo

ED_CCJURI

Sequência

006

Cnt. Domínio

ED_CRJUR

Tipo

P - Primário

Regra

"2"

Condição

M->ED_CCJURI='6'

Proprietário

Sim

Campo

ED_CCJURI

Sequência

007

Cnt. Domínio

ED_CMOEJUR

Tipo

P - Primário

Regra

GetMv('MV_JMOENAC',,"01")

Condição

M->ED_CCJURI='6'

Proprietário

Sim

Campo

ED_CBANCO

Sequência

001

Cnt. Domínio

ED_DBANCO

Tipo

P - Primário

SeekSim
AliasSA6
Índice1
ChavexFilial('SA6')+M->ED_CBANCO 

Regra

SA6->A6_NOME 

Proprietário

Sim

Campo

ED_CCONTA

Sequência

001

Cnt. Domínio

ED_DBANCO

Tipo

P - Primário

SeekSim
AliasSA6
Índice1
ChavexFilial('SA6')+M->ED_CBANCO+M->ED_CAGENC+M->ED_CCONTA

Regra

SA6->A6_NOME 

Proprietário

Sim

Campo

ED_TPCOJR

Sequência

001

Cnt. Domínio

ED_CFJUR

Tipo

P - Primário

Regra

"2"

Condição

M->ED_TPCOJR <> "1"

Propietário

Sim

Procedimento para Utilização

  1. No módulo Pré-faturamento de Serviços (SIGAPFS), acesse Atualizações / Cadastros / Monetário / Naturezas (FINA010).
  2. Selecione um registro e clique  em Visualizar.
  3. Na aba Jurídico, verifique os novos campos:
    1. Moeda
    2. Tipo Conta
    3. Contas a Receber
    4. Contas a Pagar
    5. Banco
    6. Centro de Custo Jurídico 
    7. Código do cadastro da tabela de rateio
    8. Código do banco usado
    9. Código da agência
    10. Código da conta