Criação de

campos relacionados ao Cadastro de Naturezas (SED) para utilização do

campos de Plano de Contas no

Financeiro

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
JURXFIN	Integração Jurídico x Financeiro
RUP_PFS	Ajuste de base
JURTPCONTA	Tipos 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 dos campos para utilização do Plano de Contas no Financeiro. 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.  Alteração de Criação de Campos no arquivo SX3 – Campos:

Tabela SED - Naturezas:

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ção	GetMv("MV_JURXFIN",,.F.).And.JurWhenSED('ED_CMOEJUR')

Campo

ED_TIPO

Val. Sistema

Pertence

Vazio(

"12"

).

And

OR.JurValSED()

2. Criação de Campos no arquivo SX3 – Campos:

Tabela SED- Naturezas:


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

B=Banco/Caixa; C=Custo; E=Receita; I=Investimento; L=Lucro/Bônus; O=Obrigações; P=C. C. Profissional; S=Despesa

	#JurListCon()
Validação	Vazio().Or.JurValSED()
Modo Edição	GetMv("MV_JURXFIN",,.F.)

Val. Sistema

JurValSED(

.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

Sim

Não
Browse	Não
Opções	1=Sim; 2=Não

Modo Edição

JurWhenSED("ED_CFJUR")

Inic. Padrão	"2"
Val. Sistema	Pertence("12").And.JurValSED()
Modo Edição	GetMv("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

Sim

Não
Browse	Não
Opções	1=Sim; 2=Não

Modo Edição

JurWhenSED("ED_CPJUR")


Inic. Padrão	"1"
Val. Sistema	Pertence("12").And.JurValSED()
Modo Edição	GetMv("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

Sim

Não
Browse	Não
Opções	1=Sim; 2=Não

Modo Edição

JurWhenSED("ED_CRJUR")


Inic. Padrão	"1"
Val. Sistema	Pertence("12").And.JurValSED()
Modo Edição	GetMv("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

Sim

Não
Browse	Não
Opções	1=Sim; 2=Não
Inic. Padrão	"2"
Val. Sistema	Pertence("12").And.JurValSED()
Modo Edição	GetMv("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_

BANCJUR

CBANCO")

Inic


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")

"2"

Val. Sistema

Pertence("12")

Contexto

Real

Propriedade

Alterar

Gatilhos

Sim


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

Grupo

C.C. Jurídico; 3=Profissional; 4=Tabela de Rateio; 5=Desp de Cliente; 6=Transitória

de Pagamentos

Pós Pagamento
Modo Edição	JurWhenSED("ED_CCJURI")
Val. Sistema

Vazio

JurValSED()

.OR. Pertence("123456")


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 - NaturezasNatureza 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

002

005
Cnt. Domínio	ED_

RATJUR

CCONTA
Tipo	P - Primário
Regra	""
Condição	M->ED_BANCJUR == "

1

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
Seek	Sim
Alias	SA6
Índice	1
Chave	xFilial('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
Seek	Sim
Alias	SA6
Índice	1
Chave	xFilial('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

No módulo Pré-faturamento de Serviços (SIGAPFS), acesse Atualizações / Cadastros / Monetário / Naturezas (FINA010).
Selecione um registro e clique em Visualizar.
Na aba Jurídico, verifique os novos campos:
1. Moeda
2. Tipo Tipo Conta
3. Contas Contas a Receber
4. Contas Contas a Pagar
5. BancoBanco
6. Centro 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

Árvore de páginas

Versões comparadas

Versão antiga 3

Nova versão Atual

Chave

Criação de

campos de Plano de Contas no

Cadastro de Naturezas

Características do Requisito

Descrição

Procedimento para Implantação

Atualizações do Compatibilizador

Procedimento para Utilização

Árvore de páginas

Histórico da Página

Versões comparadas

Versão antiga 3

Nova versão Atual

Chave

Criação de

campos de Plano de Contas no

Cadastro de Naturezas

Características do Requisito

Descrição

Procedimento para Implantação

Atualizações do Compatibilizador

Procedimento para Utilização