Árvore de páginas

Ajuste na tabela de Centro de Custo

Características do Requisito

Linha de Produto:

Microsiga Protheus® 

Segmento:

Jurídico

Módulo:

SIGAPFS

Rotina:

Rotina

Nome Técnico

JURXFUNB

Rotinas Genéricas SIGAJURI

JURXFUNCRotinas Genéricas SIGAPFS
CTBA030Centro de Custo
Requisito:

DJURFAT1-2402

DJURFAT1-2445

País(es):

Brasil

Banco(s) de Dados:

Todos

Tabelas Utilizadas:

CTT - Centro de Custo

Sistema(s) Operacional(is):

Todos

Descrição

Criação dos campos de escritório e participante responsável dentro do centro de custo, implementado também a opção de outros responsáveis, que permite vincular outros participantes além do principal. ajustado a rotina de centro de custo mais aderente ao módulo SIGAPFS. Devido a isso esses campos só estarão disponíveis através do acesso pelo SIGAPFS.


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 SX2 – Tabelas:


  • Tabela OHE - Responsáveis x C.Custo:


Chave

Nome

Modo

Pyme

OHE

Responsáveis x C.Custo

Compartilhado

Sim


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

  • Tabela OHE - Responsáveis x C.Custo:

 

Campo

OHE_FILIAL

Tipo

Caracter

Tamanho

8

Decimal

0

Título

Filial

Descrição

Filial do sistema

Usado

Não

Obrigatório

Não

Browse

Não

Grupo de Campos

033 - Tamanho da Filial

Ordem

01

 

 

Campo

OHE_CCCUST

Tipo

Caracter

Tamanho

9

Decimal

0

Formato

@!

Título

C. Custo

Descrição

Centro de custo

Usado

Sim

Obrigatório

Não

Browse

Sim

Val. Sistema

ExistCpo('CTT', M->OHE_CCCUST, 1)

Contexto

Real

Propriedade

Visualizar

Grupo de Campos

004 - Centro de Custo

Ordem

02

 

 

Campo

OHE_SIGLA

Tipo

Caracter

Tamanho

5

Decimal

0

Título

Sigla Partic

Descrição

Sigla do participante

Usado

Sim

Obrigatório

Não

Browse

Sim

Inic. Padrão

IF(!INCLUI, POSICIONE('RD0', 1, XFILIAL('RD0') + OHE->OHE_CPART, 'RD0_SIGLA'), '')

Val. Sistema

Vazio() .OR. ExistCpo('RD0', M->OHE_SIGLA, 9)

Contexto

Virtual

Propriedade

Alterar

Inic. Browse

POSICIONE('RD0', 1, XFILIAL('RD0') + OHE->OHE_CPART, 'RD0_SIGLA')

Cons. Padrão

RD0ATV

Gatilhos

Sim

Grupo de Campos

073 - Sigla do Participante (PFS)

Ordem

03

 

 

Campo

OHE_CPART

Tipo

Caracter

Tamanho

6

Decimal

0

Título

Cód Particip

Descrição

Código do Participante

Usado

Sim

Obrigatório

Não

Browse

Não

Contexto

Real

Propriedade

Alterar

Ordem

04

 

 

Campo

OHE_DPART

Tipo

Caracter

Tamanho

30

Decimal

0

Título

Nome Part.

Descrição

Nome do participante

Usado

Sim

Obrigatório

Não

Browse

Sim

Inic. Padrão

IF(!INCLUI, POSICIONE('RD0', 1, XFILIAL('RD0') + OHE->OHE_CPART, 'RD0_NOME'), '')

Contexto

Virtual

Propriedade

Visualizar

Inic. Browse

POSICIONE('RD0', 1, XFILIAL('RD0') + OHE->OHE_CPART, 'RD0_NOME')

Ordem

05

 

 

  • Tabela CTT - Centro de Custo:

Campo

CTT_CESCRI

Tipo

Caracter

Tamanho

5

Decimal

0

Título

Cód. Escrit

Descrição

Código do escritório

Usado

Sim (Somente módulo SIGAPFS)

Obrigatório

Não

Browse

Sim

Modo Edição

M->CTT_CLASSE = '2'

Val. Sistema

Vazio() .OR. (ExistCpo('NS7', M->CTT_CESCRI, 1) .AND. JAVLDCAMPO('CTBA030_CTT', 'CTT_CESCRI', 'NS7', 'NS7_ATIVO', '1'))

Contexto

Real

Propriedade

Alterar

Cons. Padrão

NS7ATV

Gatilhos

Sim

Grupo de Campos

098 - Escritório

Pasta

1

Ordem

84

Campo

CTT_DESCRI

Tipo

Caracter

Tamanho

100

Decimal

0

Formato

@S30

Título

Escritório

Descrição

Nome do escritório

Usado

Sim (Somente módulo SIGAPFS)

Obrigatório

Não

Browse

Sim

Inic. Padrão

IF(!INCLUI, POSICIONE('NS7', 1, XFILIAL('NS7') + CTT->CTT_CESCRI, 'NS7_NOME'), '')

Contexto

Virtual

Propriedade

Visualizar

Inic. Browse

POSICIONE('NS7', 1, XFILIAL('NS7') + CTT->CTT_CESCRI, 'NS7_NOME')

Pasta

1

Ordem

85

Campo

CTT_SIGLA

Tipo

Caracter

Tamanho

5

Decimal

0

Título

Sigla Resp.

Descrição

Sigla do responsável

Usado

Sim (Somente módulo SIGAPFS)

Obrigatório

Não

Browse

Sim

Inic. Padrão

IF(!INCLUI, POSICIONE('RD0', 1, XFILIAL('RD0') + CTT->CTT_CPART, 'RD0_SIGLA'), '')

Val. Sistema

Vazio() .OR. (ExistCpo('RD0', M->CTT_SIGLA, 9) .AND. JURRD0('CTBA030_CTT', 'CTT_SIGLA', '1', .T.))

Contexto

Virtual

Propriedade

Alterar

Inic. Browse

POSICIONE('RD0', 1, XFILIAL('RD0') + CTT->CTT_CPART, 'RD0_SIGLA')

Cons. Padrão

RD0ATV

Gatilhos

Sim

Grupo de Campos

073 - Sigla do Participante (PFS)

Pasta

1

Ordem

86

Campo

CTT_CPART

Tipo

Caracter

Tamanho

6

Decimal

0

Título

Cód. Resp.

Descrição

Código do responsável

Usado

Não

Obrigatório

Não

Browse

Não

Contexto

Real

Propriedade

Alterar

Pasta

1

Ordem

87

Campo

CTT_DPART

Tipo

Caracter

Tamanho

30

Decimal

0

Título

Nome Resp.

Descrição

Nome do responsável

Usado

Sim (Somente módulo SIGAPFS)

Obrigatório

Não

Browse

Sim

Inic. Padrão

IF(!INCLUI, POSICIONE('RD0', 1, XFILIAL('RD0') + CTT->CTT_CPART, 'RD0_NOME'), '')

Contexto

Virtual

Propriedade

Visualizar

Inic. Browse

POSICIONE('RD0', 1, XFILIAL('RD0') + CTT->CTT_CPART, 'RD0_NOME')

Pasta

1

Ordem

88

Campo

CTT_EMAIL

Tipo

Caracter

Tamanho

60

Decimal

0

Título

E-mail Resp.

Descrição

E-mail do responsável

Usado

Sim (Somente módulo SIGAPFS)

Obrigatório

Não

Browse

Não

Contexto

Real

Propriedade

Alterar

Pasta

1

Ordem

89


Importante:

O tamanho dos campos que possuem grupo pode variar conforme ambiente em uso.


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

  • Tabela OHE - Responsáveis x C.Custo:


Campo

OHE_SIGLA

Sequência

001

Cnt. Domínio

OHE_CPART

Tipo

P - Primário

Regra

RD0->RD0_CODIGO

Posiciona

S

Alias

RD0

Ordem

9

Chave

xFilial("RD0") + M->OHE_SIGLA

Propietário

Sim

Campo

OHE_SIGLA

Sequência

002

Cnt. Domínio

OHE_DPART

Tipo

P - Primário

Regra

RD0->RD0_NOME

Posiciona

S

Alias

RD0

Ordem

9

Chave

xFilial("RD0") + M->OHE_SIGLA

Propietário

Sim


  • Tabela CTT - Centro de Custo:

 

Campo

CTT_CESCRI

Sequência

001

Cnt. Domínio

CTT_DESCRI

Tipo

P - Primário

Regra

NS7->NS7_NOME

Posiciona

S

Alias

NS7

Ordem

1

Chave

xFilial("NS7") + M->CTT_CESCRI

Propietário

Sim

Campo

CTT_CLASSE

Sequência

001

Cnt. Domínio

CTT_CESCRI

Tipo

P - Primário

Regra

""

Condição

M->CTT_CLASSE == "1"

Propietário

Sim

Campo

CTT_CLASSE

Sequência

002

Cnt. Domínio

CTT_DESCRI

Tipo

P - Primário

Regra

""

Condição

M->CTT_CLASSE == "1"

Propietário

Sim

Campo

CTT_SIGLA

Sequência

001

Cnt. Domínio

CTT_CPART

Tipo

P - Primário

Regra

RD0->RD0_CODIGO

Posiciona

S

Alias

RD0

Ordem

9

Chave

xFilial("RD0") + M->CTT_SIGLA

Propietário

Sim

Campo

CTT_SIGLA

Sequência

002

Cnt. Domínio

CTT_DPART

Tipo

P - Primário

Regra

RD0->RD0_NOME

Posiciona

S

Alias

RD0

Ordem

9

Chave

xFilial("RD0") + M->CTT_SIGLA

Propietário

Sim

Campo

CTT_SIGLA

Sequência

003

Cnt. Domínio

CTT_EMAIL

Tipo

P - Primário

Regra

RD0->RD0_EMAIL

Posiciona

S

Alias

RD0

Ordem

9

Chave

xFilial("RD0") + M->CTT_SIGLA

Propietário

Sim

Campo

CTT_SIGLA

Sequência

004

Cnt. Domínio

CTT_CPART

Tipo

P - Primário

Regra

""

Condição

EMPTY(M->CTT_SIGLA)

Campo

CTT_SIGLA

Sequência

005

Cnt. Domínio

CTT_DPART

Tipo

P - Primário

Regra

""

Condição

EMPTY(M->CTT_SIGLA)

Campo

CTT_SIGLA

Sequência

006

Cnt. Domínio

CTT_EMAIL

Tipo

P - Primário

Regra

""

Condição

EMPTY(M->CTT_SIGLA)


4. Criação de Relacionamentos no arquivo SX9 – Relacionamentos: 

  • Tabela CTT - Centro de Custo:


Domínio

RD0

Sequência

001

Cnt. Domínio

CTT

Exp. Dom.

RD0_CODIGO

Exp. C. Dom.

CTT_CPART

Proprietário

Sim

Domínio

NS7

Sequência

002

Cnt. Domínio

CTT

Exp. Dom.

NS7_COD

Exp. C. Dom.

CTT_CESCRI

Proprietário

Sim


5. Criação de Índices no arquivo SIX – Relacionamentos: 

  • Tabela OHE - Responsáveis x C.Custo:


Índice

OHE

Ordem

1

Chave

OHE_FILIAL + OHE_CCCUST + OHE_CPART

Descrição

C. Custo + Cód Particip

Mostra Pesq.

Sim


 


Procedimento para Configuração


CONFIGURAÇÃO DE MENUS


1.  No Configurador (SIGACFG), acesse Ambientes/Cadastro/Menu (CFGX013). Informe a nova opção de menu do SIGAPFS - Pré faturamento de serviços, conforme instruções a seguir:


Menu

Atualizações

Submenu

Cadastros

SubmenuCorporativo

Nome da Rotina

Centros de Custo

Programa

CTBA030

Módulo

SIGAPFS

Tipo

Protheus

Procedimento para Utilização

  1. No módulo Pré faturamento de serviço (SIGAPFS), acesse Atualizações / Cadastros / Corporativo / Centros de Custo (CTBA030).
  2. Clique em Incluir.
    1. Preencha os campos da tabela e também os campos escritório e responsável.
    2. Em Outras Ações, selecionar a opção 'Responsáveis x C.Custo
    3. Preencher os demais responsáveis vinculados ao centro de custo
    4. Clique em Confirmar.