Linha Microsiga Protheus

Árvore de páginas

Melhoria na rotina Objetos para Zerar valores atualizados

Linha de Produto:

Microsiga Protheus®

Segmento:

Jurídico

Módulo:

SIGAJURI

Função:

JURA002 - Correção de Valores

JURXFUNB - Funções do módulo

JURA094 - Valores em Discussão

JURUPDJURI - Atualização de dicionários

Situação/Requisito:

Alterar forma de correção dos pedidos zerar os campos de valores atualizados. / multa e juros quando existir conforme o calculo.

Solução/Implementação:

Ao mudar a forma de correção os campos valores atualizados, multa e juros são zerados

Importante

Antes de executar o compatibilizador JURUPDMOD, opção 151 -Ajuste na validação dos campos de correção de valor para zerar valores ao serem editados  é imprescindível:

  • Realizar o backup da base de dados do produto que será executado o compatibilizador (diretório PROTHEUS_DATA\DATA, se versão 10, ou \PROTHEUS11_DATA\DATA, se versão 11) e dos dicionários de dados SXs (diretório PROTHEUS_DATA_SYSTEM, se versão 10, ou \PROTHEUS11_DATA\SYSTEM, se versão  11).
  • Os diretórios acima mencionados correspondem à instalação padrão do Protheus, portanto, devem ser alterados conforme o produto instalado na empresa.
  • Essa rotina deve ser executada em modo exclusivo, ou seja, nenhum usuário deve estar utilizando o sistema.
  • Se os dicionários de dados possuírem índices personalizados (criados pelo usuário), antes de executar o compatibilizador, certifique-se de que estão identificados pelo nickname. Caso o compatibilizador necessite criar índices, irá adicioná-los a partir da ordem original instalada pelo Protheus, o que poderá sobrescrever índices personalizados, caso não estejam identificados pelo nickname.
  • O compatibilizador deve ser executado com a Integridade Referencial desativada*.

Atenção

O procedimento a seguir deve ser realizado por um profissional   qualificado como Administrador de Banco de Dados (DBA) ou equivalente!

A ativação indevida da Integridade Referencial pode alterar   drasticamente o relacionamento entre tabelas no banco de dados. Portanto,   antes de utilizá-la, observe atentamente os procedimentos a seguir:

  1. No   Configurador (SIGACFG), veja se a empresa utiliza Integridade   Referencial, selecionando a opção Integridade/Verificação   (APCFG60A).
  2. Se não   há Integridade Referencial ativa,   são relacionadas em uma nova janela todas as empresas e filiais cadastradas   para o sistema e nenhuma delas estará selecionada. Neste caso, E SOMENTE NESTE, não é necessário   qualquer outro procedimento de ativação   ou desativação de integridade, basta finalizar a verificação e aplicar   normalmente o compatibilizador, conforme instruções.
  3.  Se há Integridade Referencial ativa   em todas as empresas e filiais, é   exibida uma mensagem na janela Verificação   de relacionamento entre tabelas. Confirme a mensagem para que a   verificação seja concluída, ou;
  4.  Se   há Integridade Referencial ativa   em uma ou mais empresas, que não   na sua totalidade, são relacionadas em uma nova janela todas as empresas e   filiais cadastradas para o sistema e, somente, a(s) que possui(em)   integridade está(arão) selecionada(s). Anote qual(is) empresa(s) e/ou   filial(is) possui(em) a integridade ativada e reserve esta anotação para   posterior consulta na reativação (ou ainda, contate nosso Help Desk Framework   para informações quanto a um arquivo que contém essa informação).
  5. Nestes   casos descritos nos itens “iii” ou   “iv”, E SOMENTE NESTES CASOS, é necessário desativar tal integridade, selecionando a opção Integridade/ Desativar (APCFG60D).
  6.  Quando desativada a Integridade Referencial,   execute o compatibilizador, conforme instruções.
  7. Aplicado o compatibilizador, a Integridade   Referencial deve ser reativada, SE E   SOMENTE SE tiver sido desativada, através da opção Integridade/Ativar (APCFG60). Para isso, tenha em mãos as   informações da(s) empresa(s) e/ou filial(is) que possuía(m) ativação da   integridade, selecione-a(s) novamente e confirme a ativação.

 

Contate o Help Desk Framework EM CASO DE DÚVIDAS!

  1. Em Microsiga Protheus® Smart Client, digite JURUPDMOD no campo Programa Inicial.
  2. Clique em OK para continuar.
  3. Ao confirmar é exibida uma mensagem de advertência sobre o backup e a necessidade de sua execução em modo exclusivo.
  4. Clique em Sim para continuar.
  5. Selecione o módulo SIGAJURI - Gestão jurídica
  6. Clique em Confirmar para continuar.
  7. Após a confirmação é exibida uma tela para a seleção da empresa em que o dicionário de dados será modificado. Selecione as empresas desejadas e clique em Processar.
  8. Selecione o item 151 -Ajuste na validação dos campos de correção de valor para zerar valores ao serem editados"
  9. Clique em Confirmar para iniciar o processamento. O primeiro passo da execução é a preparação dos arquivos. É apresentada uma mensagem explicativa na tela.
  10. Em seguida, é exibida a janela Atualização concluída com o histórico (log) de todas as atualizações processadas. Nesse log de atualização são apresentados somente os campos atualizados pelo programa. O compatibilizador cria os campos que ainda não existem no dicionário de dados.
  11. Clique em Confirmar para salvar o histórico (log) apresentado.
  12. Clique em Fechar para encerrar o processamento.

Procedimento para Implantação

O sistema é atualizado logo após a aplicação do pacote de atualizações (Patch) deste chamado.

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

Tabela NSY- Objetos

Campo

NSY_CCOMON

Val. Sistema

(ExistCpo('NW7',M->NSY_CCOMON,1).And.JurValNW7(FwFldGet('NSY_CCOMON'))).OR.(Vazio() .And. J002ClrAtu())

Campo

NSY_CFCOR1

Val. Sistema

(ExistCpo('NW7',M->NSY_CFCOR1,1).And.JurValNW7(FwFldGet('NSY_CFCOR1'))).OR.(Vazio() .And. J002ClrAtu())

Campo

NSY_CFCOR2

Val. Sistema

(ExistCpo('NW7',M->NSY_CFCOR1,1).And.JurValNW7(FwFldGet('NSY_CFCOR1'))).OR.(Vazio() .And. J002ClrAtu())

Campo

NSY_CFCOR1

Val. Sistema

(ExistCpo('NW7',M->NSY_CFCOR2,1).And.JurValNW7(FwFldGet('NSY_CFCOR2'))).OR.(Vazio() .And. J002ClrAtu())

Campo

NSY_CFCORT

Val. Sistema

(ExistCpo('NW7',M->NSY_CFCORT,1).And.JurValNW7(FwFldGet('NSY_CFCORT'))).OR.(Vazio() .And. J002ClrAtu())

Campo

NSY_CFCMUL

Val. Sistema

(ExistCpo('NW7',M->NSY_CFCMUL,1).And.JurValNW7(FwFldGet('NSY_CFCMUL'))).OR.(Vazio() .And. J002ClrAtu())

Campo

NSY_FCJURO

Val. Sistema

(ExistCpo('NW7',M->NSY_FCJURO,1).And.JurValNW7(FwFldGet('NSY_FCJURO'))).OR.(Vazio() .And. J002ClrAtu())

Campo

NSY_CFJUR1

Val. Sistema

(ExistCpo('NW7',M->NSY_CFJUR1,1).And.JurValNW7(FwFldGet('NSY_CFJUR1'))).OR.(Vazio() .And. J002ClrAtu())

Campo

NSY_CFMUL2

Val. Sistema

(ExistCpo('NW7',M->NSY_CFMUL2,1).And.JurValNW7(FwFldGet('NSY_CFMUL2'))).OR.(Vazio() .And. J002ClrAtu())

Campo

NSY_FCJUR2

Val. Sistema

(ExistCpo('NW7',M->NSY_FCJUR2,1).And.JurValNW7(FwFldGet('NSY_FCJUR2'))).OR.(Vazio() .And. J002ClrAtu())

Campo

NSY_CFMULT

Val. Sistema

(ExistCpo('NW7',M->NSY_CFMULT,1).And.JurValNW7(FwFldGet('NSY_CFMULT'))).OR.(Vazio() .And. J002ClrAtu())

Campo

NSY_FCJURT

Val. Sistema

(ExistCpo('NW7',M->NSY_FCJURT,1).And.JurValNW7(FwFldGet('NSY_FCJURT'))).OR.(Vazio() .And. J002ClrAtu())

Campo

NSY_CFMULC

Val. Sistema

(ExistCpo('NW7',M->NSY_CFMULC,1).And.JurValNW7(FwFldGet('NSY_CFMULC'))).OR.(Vazio() .And. J002ClrAtu())

Campo

NSY_FCJURC

Val. Sistema

(ExistCpo('NW7',M->NSY_FCJURC,1).And.JurValNW7(FwFldGet('NSY_FCJURC'))).OR.(Vazio() .And. J002ClrAtu())

Tabela NSZ- Assuntos Jurídicos

Campo

NSZ_CFCORR

Val. Sistema

(ExistCpo('NW7',M->NSZ_CFCORR,1).And.JurValNW7(FwFldGet('NSZ_CFCORR'))).OR.(Vazio() .And. J002ClrAtu())

Tabela NT2- Garantias e Alvarás

Campo

NT2_CCOMON

Val. Sistema

(ExistCpo('NW7',M->NT2_CCOMON,1).And.JurValNW7(FwFldGet('NT2_CCOMON'))).OR.(Vazio() .And. J002ClrAtu())

Procedimento para Utilização

  1. Acessar a tela de objetos e alterar a forma de correção de um objeto já corrigido
  2. Alterar a forma de correção, os campos atualizáveis serão zerados.