Disponibilização de Projeto / Finalidade nas rotinas do Financeiro
Características do Requisito
Linha de Produto: | Microsiga Protheus® | ||||||||||||||||||||
Segmento: | Jurídico | ||||||||||||||||||||
Módulos: | SIGAPFS SIGAFIN | ||||||||||||||||||||
Rotina: |
| ||||||||||||||||||||
Requisito: | DJURFAT1-5590 | ||||||||||||||||||||
País(es): | Brasil | ||||||||||||||||||||
Banco(s) de Dados: | Todos | ||||||||||||||||||||
Sistema(s) Operacional(is): | Todos |
Descrição
Disponibilização dos campos de Projeto/Finalidade nas rotinas de Desdobramento, Desdobramento Pós Pagamento, Lançamentos e Solicitação/Aprovação de Despesas.
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
Criação de campos no arquivo SX3 – Dicionário de Dados:
Tabela NZQ - Solicitação / Aprovação de Despesa:
Campo
NZQ_CPROJE
Tipo
Caracter
Tamanho
6
Decimal
0
Título
Cód. Projeto
Descrição
Código do Projeto
Usado
Sim
Obrigatório
Não
Browse
Sim
Val. Sistema
Vazio() .OR. ExistCpo('OHL', FwFldGet("NZQ_CPROJE"), 1)
Contexto
Real
Propriedade
Alterar
Cons. Padrão
OHL
Gatilhos
Sim
Ordem
46
Campo
NZQ_DPROJE
Tipo
Caracter
Tamanho
200
Decimal
0
Título
Desc Projeto
Descrição
Descrição do Projeto
Usado
Sim
Obrigatório
Não
Browse
Não
Inic. Padrão
IF(!INCLUI, POSICIONE('OHL', 1, xFilial('OHL') + FwFldGet("NZQ_CPROJE"), 'OHL_DPROJE'), '')
Contexto
Virtual
Propriedade
Visualizar
Ordem
47
Campo
NZQ_CITPRJ
Tipo
Caracter
Tamanho
6
Decimal
0
Título
Cód Item Prj
Descrição
Código do Item do Projeto
Usado
Sim
Obrigatório
Não
Browse
Sim
Modo Edição
!Empty(FwFldGet("NZQ_CPROJE"))
Val. Sistema
Vazio() .OR. ExistCpo('OHM', FwFldGet("NZQ_CPROJE") + FwFldGet("NZQ_CITPRJ"), 1)
Contexto
Real
Propriedade
Alterar
Cons. Padrão
OHM
Gatilhos
Sim
Ordem
48
Campo
NZQ_DITPRJ
Tipo
Caracter
Tamanho
200
Decimal
0
Título
Descr. Item
Descrição
Descrição do Item
Usado
Sim
Obrigatório
Não
Browse
Não
Inic. Padrão
IF(!INCLUI, POSICIONE('OHM', 1, xFilial('OHM') + FwFldGet("NZQ_CPROJE") + FwFldGet("NZQ_CITPRJ"), 'OHM_DITEM'), '')
Contexto
Virtual
Propriedade
Visualizar
Ordem
49
Tabela OHB - Lançamento:
Campo
OHB_CPROJE
Tipo
Caracter
Tamanho
6
Decimal
0
Título
Cód. Projeto
Descrição
Código do Projeto
Usado
Sim
Obrigatório
Não
Browse
Sim
Val. Sistema
Vazio() .OR. ExistCpo('OHL', FwFldGet("OHB_CPROJE"), 1)
Contexto
Real
Propriedade
Alterar
Cons. Padrão
OHL
Gatilhos
Sim
Ordem
22
Campo
OHB_DPROJE
Tipo
Caracter
Tamanho
200
Decimal
0
Título
Desc Projeto
Descrição
Descrição do Projeto
Usado
Sim
Obrigatório
Não
Browse
Não
Inic. Padrão
IF(!INCLUI, POSICIONE('OHL', 1, xFilial('OHL') + FwFldGet("OHB_CPROJE"), 'OHL_DPROJE'), '')
Contexto
Virtual
Propriedade
Visualizar
Ordem
23
Campo
OHB_CITPRJ
Tipo
Caracter
Tamanho
6
Decimal
0
Título
Cód Item Prj
Descrição
Código do Item do Projeto
Usado
Sim
Obrigatório
Não
Browse
Sim
Modo Edição
!Empty(FwFldGet("OHB_CPROJE"))
Val. Sistema
Vazio() .OR. ExistCpo('OHM', FwFldGet("OHB_CPROJE") + FwFldGet("OHB_CITPRJ"), 1)
Contexto
Real
Propriedade
Alterar
Cons. Padrão
OHM
Gatilhos
Sim
Ordem
24
Campo
OHB_DITPRJ
Tipo
Caracter
Tamanho
200
Decimal
0
Título
Descr. Item
Descrição
Descrição do Item
Usado
Sim
Obrigatório
Não
Browse
Não
Inic. Padrão
IF(!INCLUI, POSICIONE('OHM', 1, xFilial('OHM') + FwFldGet("OHB_CPROJE") + FwFldGet("OHB_CITPRJ"), 'OHM_DITEM'), '')
Ordem
25
Campo
OHB_CPROJD
Tipo
Caracter
Tamanho
6
Decimal
0
Título
Cd Proj Dest
Descrição
Cód Projeto Natur Destino
Usado
Sim
Obrigatório
Não
Browse
Sim
Val. Sistema
Vazio() .OR. (ExistCpo('OHL', FwFldGet("OHB_CPROJD"), 1) .AND. JAVLDCAMPO('OHBMASTER', 'OHB_CPROJD', 'OHL', 'OHL_SITUAC', '2'))
Contexto
Real
Propriedade
Alterar
Cons. Padrão
OHL
Gatilhos
Sim
Ordem
49
Campo
OHB_DPROJD
Tipo
Caracter
Tamanho
200
Decimal
0
Título
Dsc Proj Des
Descrição
Descrição Projeto Destino
Usado
Sim
Obrigatório
Não
Browse
Não
Inic. Padrão
IF(!INCLUI, POSICIONE('OHL', 1, xFilial('OHL') + FwFldGet("OHB_CPROJD"), 'OHL_DPROJE'), '')
Contexto
Virtual
Propriedade
Visualizar
Ordem
50
Campo
OHB_CITPRD
Tipo
Caracter
Tamanho
6
Decimal
0
Título
Cód Item Prj
Descrição
Código Item Projeto Desti
Usado
Sim
Obrigatório
Não
Browse
Sim
Modo Edição !Empty(FwFldGet("OHB_CPROJD")) Val. Sistema Vazio().Or.ExistCpo('OHM',FwFldGet("OHB_CPROJD")+FwFldGet("OHB_CITPRD"),1) Contexto
Real
Propriedade
Alterar
Cons. Padrão
OHM
Gatilhos
Sim
Ordem
51
Campo
OHB_DITPRD
Tipo
Caracter
Tamanho
200
Decimal
0
Título
Descr. Item
Descrição
Descr. Item Projeto Desti
Usado
Sim
Obrigatório
Não
Browse
Não
Inic. Padrão
IF(!INCLUI, POSICIONE('OHM', 1, xFilial('OHM') + FwFldGet("OHB_CPROJD") + FwFldGet("OHB_CITPRD"), 'OHM_DITEM'), '')
Contexto
Virtual
Propriedade
Visualizar
Ordem
52
Tabela OHF - Desdobramento:
Campo
OHF_CPROJE
Tipo
Caracter
Tamanho
6
Decimal
0
Título
Cód. Projeto
Descrição
Código do Projeto
Usado
Sim
Obrigatório
Não
Browse
Sim
Val. Sistema
Vazio() .OR. ExistCpo('OHL', FwFldGet("OHF_CPROJE"), 1)
Contexto
Real
Propriedade
Alterar
Cons. Padrão
OHL
Gatilhos
Sim
Ordem
30
Campo
OHF_DPROJE
Tipo
Caracter
Tamanho
200
Decimal
0
Título
Desc Projeto
Descrição
Descrição do Projeto
Usado
Sim
Obrigatório
Não
Browse
Não
Inic. Padrão
IF(!INCLUI, POSICIONE('OHL', 1, xFilial('OHL') + OHF->OHF_CPROJE, 'OHL_DPROJE'), '')
Contexto
Virtual
Propriedade
Visualizar
Ordem
31
Campo
OHF_CITPRJ
Tipo
Caracter
Tamanho
6
Decimal
0
Título
Cód Item Prj
Descrição
Código do Item do Projeto
Usado
Sim
Obrigatório
Não
Browse
Sim
Modo Edição
!Empty(FwFldGet("OHF_CPROJE"))
Val. Sistema
Vazio() .OR. ExistCpo('OHM', FwFldGet("OHF_CPROJE") + FwFldGet("OHF_CITPRJ"), 1)
Contexto
Real
Propriedade
Alterar
Cons. Padrão
OHM
Gatilhos
Sim
Ordem
32
Campo
OHF_DITPRJ
Tipo
Caracter
Tamanho
200
Decimal
0
Título
Descr. Item
Descrição
Descr. Item do Projeto
Usado
Sim
Obrigatório
Não
Browse
Não
Inic. Padrão
IF(!INCLUI, POSICIONE('OHM', 1, xFilial('OHM') + OHF->OHF_CPROJE + OHF->OHF_CITPRJ, 'OHM_DITEM'), '')
Contexto
Virtual
Propriedade
Visualizar
Ordem
33
Tabela OHG - Desdobramento Pós Pagamento:
Campo
OHG_CPROJE
Tipo
Caracter
Tamanho
6
Decimal
0
Título
Cód. Projeto
Descrição
Código do Projeto
Usado
Sim
Obrigatório
Não
Browse
Sim
Val. Sistema
Vazio() .OR. ExistCpo('OHL', FwFldGet("OHG_CPROJE"), 1)
Contexto
Real
Propriedade
Alterar
Cons. Padrão
OHL
Gatilhos
Sim
Ordem
30
Campo
OHG_DPROJE
Tipo
Caracter
Tamanho
200
Decimal
0
Título
Desc Projeto
Descrição
Descrição do Projeto
Usado
Sim
Obrigatório
Não
Browse
Não
Inic. Padrão
IF(!INCLUI, POSICIONE('OHL', 1, xFilial('OHL') + OHG->OHG_CPROJE, 'OHL_DPROJE'), '')
Contexto
Virtual
Propriedade
Visualizar
Ordem
31
Campo
OHG_CITPRJ
Tipo
Caracter
Tamanho
6
Decimal
0
Título
Cód Item Prj
Descrição
Código do Item do Projeto
Usado
Sim
Obrigatório
Não
Browse
Sim
Modo Edição
!Empty(FwFldGet("OHG_CPROJE"))
Val. Sistema
Vazio() .OR. ExistCpo('OHM', FwFldGet("OHG_CPROJE") + FwFldGet("OHG_CITPRJ"), 1)
Contexto
Real
Propriedade
Alterar
Cons. Padrão
OHM
Gatilhos
Sim
Ordem
32
Campo
OHG_DITPRJ
Tipo
Caracter
Tamanho
200
Decimal
0
Título
Descr. Item
Descrição
Descrição do Item
Usado
Sim
Obrigatório
Não
Browse
Não
Inic. Padrão
IF(!INCLUI, POSICIONE('OHM', 1, xFilial('OHM') + OHG->OHG_CPROJE + OHG->OHG_CITPRJ, 'OHM_DITEM'), '')
Contexto
Virtual
Propriedade
Visualizar
Ordem
33
Criação de gatilhos no arquivo SX7 - Gatilhos:
Tabela NZQ - Solicitação / Aprovação de Despesa:
Campo
NZQ_CITPRJ
Sequência
001
Cnt. Domínio
NZQ_DITPRJ
Tipo
P - Primário
Regra
OHM->OHM_DITEM
Posiciona
S
Alias
OHM
Ordem
1
Chave
xFilial('NZQ') + FwFldGet('NZQ_CPROJE') + FwFldGet('NZQ_CITPRJ')
Proprietário
Sim
Campo
NZQ_CPROJE
Sequência
001
Cnt. Domínio
NZQ_DPROJE
Tipo
P - Primário
Regra
OHL->OHL_DPROJE
Posiciona
S
Alias
OHL
Ordem
1
Chave
xFilial('OHL') + FwFldGet('NZQ_CPROJE')
Proprietário
Sim
Campo
NZQ_CPROJE
Sequência
002
Cnt. Domínio
NZQ_CITPRJ
Tipo
P - Primário
Regra
""
Condição
Empty(FwFldGet('NZQ_CPROJE'))
Proprietário
Sim
Campo
NZQ_CPROJE
Sequência
003
Cnt. Domínio
NZQ_DITPRJ
Tipo
P - Primário
Regra
""
Condição
Empty(FwFldGet('NZQ_CPROJE'))
Proprietário
Sim
Tabela OHB - Lançamento:
Campo
OHB_CITPRD
Sequência
001
Cnt. Domínio
OHB_DITPRD
Tipo
P - Primário
Regra
OHM->OHM_DITEM
Posiciona
S
Alias
OHM
Ordem
1
Chave
xFilial('OHM') + FwFldGet('OHB_CPROJD') + FwFldGet('OHB_CITPRD')
Proprietário
Sim
Campo
OHB_CITPRJ
Sequência
001
Cnt. Domínio
OHB_DITPRJ
Tipo
P - Primário
Regra
OHM->OHM_DITEM
Posiciona
S
Alias
OHM
Ordem
1
Chave
xFilial('OHM') + FwFldGet('OHB_CPROJE') + FwFldGet('OHB_CITPRJ')
Proprietário
Sim
Campo
OHB_CPROJD
Sequência
001
Cnt. Domínio
OHB_DPROJD
Tipo
P - Primário
Regra
OHL->OHL_DPROJE
Posiciona
S
Alias
OHL
Ordem
1
Chave
xFilial('OHL') + FwFldGet('OHB_CPROJD')
Proprietário
Sim
Campo
OHB_CPROJD
Sequência
002
Cnt. Domínio
OHB_CITPRD
Tipo
P - Primário
Regra
""
Condição
Empty(FwFldGet('OHB_CPROJD'))
Proprietário
Sim
Campo
OHB_CPROJD
Sequência
003
Cnt. Domínio
OHB_DITPRD
Tipo
P - Primário
Regra
""
Condição
Empty(FwFldGet('OHB_CPROJD'))
Proprietário
Sim
Campo
OHB_CPROJE
Sequência
001
Cnt. Domínio
OHB_DPROJE
Tipo
P - Primário
Regra
OHL->OHL_DPROJE
Posiciona
S
Alias
OHL
Ordem
1
Chave
xFilial('OHL') + FwFldGet('OHB_CPROJE')
Proprietário
Sim
Campo
OHB_CPROJE
Sequência
002
Cnt. Domínio
OHB_CITPRJ
Tipo
P - Primário
Regra
""
Condição
Empty(FwFldGet('OHB_CPROJE'))
Proprietário
Sim
Campo
OHB_CPROJE
Sequência
003
Cnt. Domínio
OHB_DITPRJ
Tipo
P - Primário
Regra
""
Condição
Empty(FwFldGet('OHB_CPROJE'))
Proprietário
Sim
Tabela OHF - Desdobramento:
Campo
OHF_CITPRJ
Sequência
001
Cnt. Domínio
OHF_DITPRJ
Tipo
P - Primário
Regra
OHM->OHM_DITEM
Posiciona
S
Alias
OHM
Ordem
1
Chave
xFilial('OHM') + FwFldGet('OHF_CPROJE') + FwFldGet('OHF_CITPRJ')
Proprietário
Sim
Campo
OHF_CPROJE
Sequência
001
Cnt. Domínio
OHF_DPROJE
Tipo
P - Primário
Regra
OHL->OHL_DPROJE
Posiciona
S
Alias
OHL
Ordem
1
Chave
xFilial('OHL') + FwFldGet('OHF_CPROJE')
Proprietário
Sim
Campo
OHF_CPROJE
Sequência
002
Cnt. Domínio
OHF_CITPRJ
Tipo
P - Primário
Regra
""
Condição
Empty(FwFldGet('OHF_CPROJE'))
Proprietário
Sim
Campo
OHF_CPROJE
Sequência
003
Cnt. Domínio
OHF_DITPRJ
Tipo
P - Primário
Regra
""
Condição
Empty(FwFldGet('OHF_CPROJE'))
Proprietário
Sim
Tabela OHG - Desdobramento Pós Pagamento:
Campo
OHG_CITPRJ
Sequência
001
Cnt. Domínio
OHG_DITPRJ
Tipo
P - Primário
Regra
OHM->OHM_DITEM
Posiciona
S
Alias
OHM
Ordem
1
Chave
xFilial("OHM") + FwFldGet('OHG_CPROJE') + FwFldGet("OHG_CITPRJ")
Proprietário
Sim
Campo
OHG_CPROJE
Sequência
001
Cnt. Domínio
OHG_DPROJE
Tipo
P - Primário
Regra
OHL->OHL_DPROJE
Posiciona
S
Alias
OHL
Ordem
1
Chave
xFilial('OHL') + FwFldGet('OHG_CPROJE')
Proprietário
Sim
Campo
OHG_CPROJE
Sequência
002
Cnt. Domínio
OHG_CITPRJ
Tipo
P - Primário
Regra
""
Condição
Empty(FwFldGet('OHG_CPROJE'))
Proprietário
Sim
Campo
OHG_CPROJE
Sequência
003
Cnt. Domínio
OHG_DITPRJ
Tipo
P - Primário
Regra
""
Condição
Empty(FwFldGet('OHG_CPROJE'))
Proprietário
Sim
Criação de relacionamentos no arquivo SX9 - Relacionamentos:
Tabela OHL - Projeto:Domínio OHL Sequência 001 Contra Domínio NZQ Expressão Domínio OHL_CPROJE Expressão Contra Domínio NZQ_CPROJE Domínio OHL Sequência 002 Contra Domínio OHB Expressão Domínio OHL_CPROJE Expressão Contra Domínio OHB_CPROJD Domínio OHL Sequência 003 Contra Domínio OHB Expressão Domínio OHL_CPROJE Expressão Contra Domínio OHB_CPROJE Domínio OHL Sequência 004 Contra Domínio OHF Expressão Domínio OHL_CPROJE Expressão Contra Domínio OHF_CPROJE Domínio OHL Sequência 005 Contra Domínio OHG Expressão Domínio OHL_CPROJE Expressão Contra Domínio OHG_CPROJE Tabela OHM - Itens de Projeto:
Domínio OHM Sequência 005 Contra Domínio NZQ Expressão Domínio OHM_CPROJE+OHM_ITEM Expressão Contra Domínio NZQ_CPROJE+NZQ_CITPRJ Domínio OHM Sequência 002 Contra Domínio OHB Expressão Domínio OHM_CPROJE+OHM_ITEM Expressão Contra Domínio OHB_CPROJD+OHB_CITPRD Domínio OHM Sequência 003 Contra Domínio OHB Expressão Domínio OHM_CPROJE+OHM_ITEM Expressão Contra Domínio OHB_CPROJE+OHB_CITPRJ Domínio OHM Sequência 004 Contra Domínio OHF Expressão Domínio OHM_CPROJE+OHM_ITEM Expressão Contra Domínio OHF_CPROJE+OHF_CITPRJ Domínio OHM Sequência 001 Contra Domínio OHG Expressão Domínio OHM_CPROJE+OHM_ITEM Expressão Contra Domínio OHG_CPROJE+OHG_CITPRJ
Procedimento para Configuração
CONFIGURAÇÃO DE PARÂMETROS
No Configurador (SIGACFG), acesse Ambientes/Cadastros/Parâmetros (CFGX017). Configure o parâmetro a seguir:
Itens/Pastas
Descrição
Nome Var.
MV_JUTPROJ
Tipo
Lógico
Descrição
Indica se será utilizado Projeto/Finalidade nas
Cont.Descric.
rotinas do Financeiro. (.T. = Sim; .F. = Não)
Itens/Pastas
Descrição
Nome Var.
MV_JURXFIN
Tipo
Lógico
Descrição
Indica se será utilizado Projeto/Finalidade nas
Cont.Descric.
Habilita a integração entre os módulos SIGAFIN - Financeiro e SIGAPFS - Juridico (.T. = Sim, .F. = Não)
Procedimento para Utilização
- No módulo Financeiro (SIGAFIN), acesse Atualizações / Jurídico / Lançamento (JURA241).
- Clique em Incluir.
- Preencha os campos, verificando os novos campos de Projeto e Item de Projeto.
- Estes campos estão disponíveis também no Desdobramento e Desdobramento Pós Pagamento do Contas a Pagar (FINA050) e na Solicitação / Aprovação de Despesas (JURA235).
- documento_tecnico
- mp_sigapfs_inov
- sigapfs
- juridico
- bra
- pre_faturamento_de_servicos
- squad_sigapfs_sisjuri
- sigapfs_sisjuri
- mv_jurxfin
- financeiro
- versao_12_1_21
- 12_1_21
- mv_jutproj
- projeto
- finalidade
- ohl
- ohm
- desdobramento
- sigafin
- djurfat1-5590
- ohf_cproje
- ohf_dproje
- ohf_citprj
- ohf_ditprj
- ohg_cproje
- ohg_dproje
- ohg_citprj
- ohg_ditprj
- nzq_cproje
- nzq_dproje
- nzq_citprj
- nzq_ditprj
- ohb_cproje
- ohb_dproje
- ohb_citprj
- ohb_ditprj
- ohb_cprojd
- ohb_dprojd
- ohb_citprd
- ohb_ditprd
- nzq
- ohb
- ohf
- ohg
- jura246
- jura247
- jura241
- jura235
- jura235a
- fina050
- cp
- contas
- pagar