Histórico da Página
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: |
| ||||||||||
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çã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 | @! |
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 |
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:
- Moeda
- Tipo Conta
- Contas a Receber
- Contas a Pagar
- Banco
- Centro de Custo Jurídico
- Código do cadastro da tabela de rateio
- Código do banco usado
- Código da agência
- Código da conta