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 Centro de Custo Jurídico e Código do cadastro da tabela de rateio de campos no cadastro de Naturezas , para utilização do Financeiras do módulo Financeiro (SIGAFIN), de forma a possibilitar sua utilização semelhante ao Plano de Contas no Financeiro.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

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

Tabela 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')
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ção	Vazio().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çã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	Não
Browse	Não
Opções	1=Sim; 2=Não
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	Não
Browse	Não
Opções	1=Sim; 2=Não
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	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_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

@9

@!
Título	C. Custo Jur
Descrição	Centro de Custo

Juridico

Jurídico
Usado	Sim
Obrigatório	Não
Browse	Sim
Opções	1=

Escritorio

Escritório; 2=

Escritorio e Grupo Juridico;

Escritório e C.C. Jurídico; 3=Profissional; 4=Tabela de Rateio; 5=Desp de Cliente;

6=Transitoria de Pagamentos

6=Transitória Pós Pagamento
Modo Edição	JurWhenSED("ED_CCJURI")
Val. Sistema	JurValSED()
Contexto	Real
Propriedade	Alterar

Val. SistemaVazio() .or. Pertence("123456")

Gatilhos	Sim
Pasta	4 - Jurídico

Campo	ED_RATJUR
Tipo	Caracter
Tamanho	10
Decimal	0
Formato

@9

@!

Título

Cod

Cód. Tab Rat

Descrição

Codigo

Código Tabela de Rateio
Usado	Sim
Obrigatório	Não
Browse	Sim

WhenM->ED_CCJURI=='4'

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

_CCJURI


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

Posiciona?

N

Chave

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

S

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 campos de Centro de Custo Jurídico e 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
no cadastro de Naturezas
2. Código do banco usado
3. Código da agência
4. Código da conta

Árvore de páginas

Versões comparadas

Versão antiga 1

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 1

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