Histórico da Página
Validação dos campos Cliente e Fornecedor em Envolvidos e Assuntos Jurídicos
Linha de Produto: | Microsiga Protheus® |
Segmento: | Jurídico |
Módulo: | SIGAJURI |
Função: | JURA095 - Assuntos Jurídicos JURA105 - Envolvidos JURXFUNB - Funções do módulo JURUPDJURI - Atualização de dicionários |
Situação/Requisito: | A validação de Cliente e Fornecedor está acontecendo antes do preenchimento do campo Loja, com isso, cadastros que possuem mais de um código de loja e o primeiro posicionado está bloqueado, não é possível a inclusão do registro. |
Solução/Implementação: | Rotina ajustada para validar campo somente no campo Loja. |
Importante
Antes de executar o compatibilizador JURUPDMOD, opção 151 -Ajuste na validação 152 -Redefinição das validações dos campos de correção de valor para zerar valores ao serem editados é Cliente na rotina de Processos é 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:
Contate o Help Desk Framework EM CASO DE DÚVIDAS! |
---|
- Em Microsiga Protheus® Smart Client, digite JURUPDMOD no campo Programa Inicial.
- Clique em OK para continuar.
- Ao confirmar é exibida uma mensagem de advertência sobre o backup e a necessidade de sua execução em modo exclusivo.
- Clique em Sim para continuar.
- Selecione o módulo SIGAJURI - Gestão jurídica
- Clique em Confirmar para continuar.
- 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.
- Selecione o item 151 -Ajuste na validação 152 -Redefinição das validações dos campos de correção de valor para zerar valores ao serem editados"Cliente na rotina de Processos
- Clique em Confirmar para iniciar o processamento. O primeiro passo da execução é a preparação dos arquivos. É apresentada uma mensagem explicativa na tela.
- 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.
- Clique em Confirmar para salvar o histórico (log) apresentado.
- 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
...
NSZ-
...
Assuntos Jurídicos
Campo | NSYNSZ_CCOMONCCLIEN |
Val. Sistema(ExistCpo('NW7',M->NSY_CCOMON,1).And.JurValNW7(FwFldGet('NSY_CCOMON'))).OR.(Vazio() .And. J002ClrAtu()) |
Campo | NSYNSZ_CFCOR1LCLIEN |
Val. Sistema | Vazio().Or.(ExistCpo('NW7SA1',M->NSY_CFCOR1>NSZ_CCLIEN+M->NSZ_LCLIEN,1).And.JurValNW7(FwFldGet('NSY_CFCOR1'))).OR.(Vazio(JAATUNT9().And. J002ClrAtu()) |
Campo | NSY_CFCOR2 |
Val. Sistema | (ExistCpo('NW7'JVldClRst(M->NSZ_CCLIEN,M->NSY>NSZ_CFCOR1,1).And.JurValNW7(FwFldGet('NSY_CFCOR1'))).OR.(Vazio() .And. J002ClrAtu())LCLIEN)) |
Campo | NSYNSZ_CFCOR1TIPOAS | |
ValInic. SistemaPadrão | (ExistCpo('NW7',M->NSY_CFCOR2,1).And.JurValNW7(FwFldGet('NSY_CFCOR2'))).OR.(Vazio() .And. J002ClrAtu()) | J095Incid() |
Tabela NT9 - Envolvidos
Campo | NT9_CEMPCL | Campo | NSY_CFCORT |
Val. Sistema(ExistCpo('NW7',M->NSY_CFCORT,1).And.JurValNW7(FwFldGet('NSY_CFCORT'))).OR.(Vazio() .And. J002ClrAtu() | Vazio() .Or. JA105VLCLI() |
Campo | NSYNT9_CFCMULLOJACL |
Val. Sistema | (ExistCpo('NW7',M->NSY_CFCMUL,1 Vazio() .AndOR. JurValNW7J95VldNT9(FwFldGet('NSY_CFCMUL'))).OR.(Vazio() .And. J002ClrAtu())SA1') |
Campo | NSYNT9_FCJUROCFORNE |
Val. Sistema(ExistCpo('NW7',M->NSY_FCJURO,1).And.JurValNW7(FwFldGet('NSY_FCJURO'))).OR.(Vazio() .And. J002ClrAtu()) |
Campo | NSYNT9_CFJUR1LFORNE |
Val. Sistema | (ExistCpo('NW7',M->NSY_CFJUR1,1Vazio() .AndOR. JurValNW7(FwFldGetJ95VldNT9('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
...
SA2') |
Procedimento para Utilização
Validações dos campos Cliente na rotina de Processos aba Detalhes
Abrir rotina do menu Atualizações > Assuntos Jurídicos > Pesquisa
Na tela de Pesquisa;
Clicar no Botão Incluir;
Preencha o campo Cliente com o código de um cliente bloqueado ( Manualmente, sem usar consulta padrão );
Preencha o campo loja com a loja do cadastro do cliente bloqueado;
A validação de campo deve apresentar a mensagem padrão:
Problema:
Este Registro está bloqueado para uso
Solução :
Entre em contato com o administrador do sistema ou o responsável pelo registro para identificar o motivo do bloqueio.
Em caso de rotina automática, verifique a informação assinalada no log gerado.
Validações dos campos Fornecedor na rotina de Processos aba Envolvidos
Inclua uma nova linha;
Principal? = 1-Sim;
Fornecedor? = 1-Sim;
Polo = 2-Polo Passivo;
Cod Tipo Env = Qualquer código válido e ativo;
Cód Forneced = Um código de fornecedor bloqueado ( digitar manualmente);
Loja Fornece = A loja do fornecedor bloqueado;
Validações dos campos Cliente na rotina de Processos na aba Envolvidos
Abrir rotina do menu Atualizações > Assuntos Jurídicos > Pesquisa
Na tela de Pesquisa;
Selecionar um tipo de assunto jurídico que possua aba Envolvidos
Modificar valor do campo Situação para 1- Em andamento;
Clicar no Botão Pesquisar;
Selecionar um Assunto Jurídico da Grid;
Clicar no botão Alterar;
Na tela do Processo;
Clicar na aba Envolvidos;
Inclua uma nova linha;
Principal? = 1-Sim;
Cliente? = 1-Sim;
Polo = 2-Polo Passivo;
Cod Tipo Env = Qualquer código válido e ativo;
Cód Cliente = Um código de Cliente bloqueado ( digitar manualmente);
Loja cliente = A loja do Cliente bloqueado;
A rotina deve permitir a utilização do campo mesmo com registro bloqueado
...