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:
Criação de Campos no arquivo SX3 – Campos:
Campo | O0D_FILIAL |
Tipo | Caracter |
Tamanho | 2 |
Decimal | 0 |
Formato | @! |
Título | Filial |
Descrição | Filial do sistema |
Ordem | 01 |
Usado | Sim |
Obrigatório | Sim |
Browse | Sim |
Visual | Alterar |
Contexto | Real |
Help | Filial do sistema |
Campo | O0D_COD |
Tipo | Caracter |
Tamanho | 5 |
Decimal | 0 |
Título | Código |
Descrição | Código prazo |
Ordem | 02 |
Usado | Sim |
Obrigatório | Sim |
Browse | Sim |
Visual | Visualizar |
Contexto | Real |
Inic. Padrão | GETSXENUM("O0D", "O0D_COD") |
Help | Código prazo |
Campo | O0D_TIPOAS |
Tipo | Caracter |
Tamanho | 3 |
Decimal | 0 |
Título | Cod Tp Assu |
Descrição | Código do tipo de assunto |
Ordem | 03 |
Usado | Sim |
Obrigatório | Não |
Browse | Sim |
Visual | Alterar |
Contexto | Real |
Opções | Consulta padrão: NYB |
Val. Sistema | Vazio() .OR. ExistCPO("NYB", M->O0D_TIPOAS, 1) |
Help | Código Tipo Assunto Jurídico |
Campo | O0D_DTIPAS |
Tipo | Caracter |
Tamanho | 40 |
Decimal | 0 |
Título | Assunto juri |
Descrição | Descrição tipo de assunto |
Ordem | 04 |
Usado | Sim |
Obrigatório | Não |
Browse | Sim |
Visual | Visualizar |
Contexto | Virtual |
Inic. Padrão | IF(!INCLUI,Posicione("NYB",1,xFilial("NYB")+M->O0D_TIPOAS,"NYB_DESC"),'') |
Inic. Browse | POSICIONE("NYB", 1, XFILIAL("NYB") + O0D->O0D_TIPOAS, "NYB_DESC") |
Help | Descrição Tipo Assunto Jurídico |
Campo | O0D_CREAJ |
Tipo | Caracter |
Tamanho | 5 |
Decimal | 0 |
Formato | @! |
Título | Cod Area Jur |
Descrição | Código área jurídica |
Ordem | 05 |
Usado | Sim |
Obrigatório | Não |
Browse | Sim |
Visual | Alterar |
Contexto | Real |
Opções | Consulta padrão NRBJUR |
Val. Sistema | Vazio() .OR. JAVLDCAMPO('O0DMASTER','O0D_CAREAJ','NRB','NRB_ATIVO','1' ) .And. JurVldRest('NRB',M->O0D_CAREAJ) |
Help | Código Área Jurídica |
Campo | O0D_DAREAJ |
Tipo | Caracter |
Tamanho | 50 |
Decimal | 0 |
Formato | @S15 |
Título | Área |
Descrição | Descrição área jurídica |
Ordem | 06 |
Usado | Sim |
Obrigatório | Não |
Browse | Sim |
Visual | Visualizar |
Contexto | Virtual |
Inic. Padrão | IF(!INCLUI,Posicione('NRB',1,xFilial('NRB')+O0D->O0D_CAREAJ,'NRB_DESC'),JurGatilho('O0D_CAREAJ','NRB','NRB_DESC','O0DMASTER')) |
Inic. Browse | POSICIONE("NRB", 1, XFILIAL("NRB") + O0D->O0D_CAREAJ, "NRB_DESC") |
Help | Descrição área jurídica. |
Campo | O0D_CATO |
Tipo | Caracter |
Tamanho | 3 |
Decimal | 0 |
Título | Cód Ato |
Descrição | Código Ato |
Ordem | 07 |
Usado | Sim |
Obrigatório | Sim |
Browse | Sim |
Visual | Alterar |
Contexto | Real |
Val. Sistema | Vazio() .Or. (ExistCpo('NRO',M->O0D_CATO,1).AND.JurVldRest('NRO',M->O0D_CATO)) |
Help | Código Ato processual |
Campo | O0D_DATO |
Tipo | Caracter |
Tamanho | 200 |
Decimal | 0 |
Título | Desc Ato |
Descrição | Descrição Ato |
Ordem | 08 |
Usado | Sim |
Obrigatório | Não |
Browse | Sim |
Visual | Visualizar |
Contexto | Virtual |
Inic. Padrão | IF(!INCLUI,Posicione("NRO",1,xFilial("NRO")+M->O0D_CATO,"NRO_DESC"),'') |
Inic. Browse | POSICIONE("NRO", 1, XFILIAL("NRO") + O0D->O0D_CATO, "NRO_DESC") |
Help | Descrição Ato processual |
Campo | O0D_COBJET |
Tipo | Caracter |
Tamanho | 3 |
Decimal | 0 |
Título | Cód. Assunto |
Descrição | Código do Assunto |
Ordem | 09 |
Usado | Sim |
Obrigatório | Não |
Browse | Sim |
Visual | Alterar |
Contexto | Real |
Opções | Consulta padrão NQ4 |
Val. Sistema | VAZIO() .OR. (ExistCpo('NQ4',M->O0D_COBJET,1).And.JurVldRest('NQ4',M->O0D_COBJET)) |
Help | Código do assunto |
Campo | O0D_DOBJET |
Tipo | Caracter |
Tamanho | 100 |
Decimal | 0 |
Formato | @S15 |
Título | Assunto |
Descrição | Descrição do Assunto |
Ordem | 10 |
Usado | Sim |
Obrigatório | Não |
Browse | Sim |
Visual | Visualizar |
Contexto | Virtual |
Inic. Padrão | IF(!INCLUI,Posicione('NQ4',1,xFilial('NQ4')+O0D->O0D_COBJET,'NQ4_DESC'),'') |
Inic. Browse | Posicione('NQ4',1,xFilial('NQ4')+O0D->O0D_COBJET,'NQ4_DESC') |
Help | Descrição do Assunto. |
Campo | O0D_PRAZO |
Tipo | Caracter |
Tamanho | 4 |
Decimal | 0 |
Formato | 9999 |
Título | Prazo |
Descrição | Prazo Término |
Ordem | 11 |
Usado | Sim |
Obrigatório | Sim |
Browse | Sim |
Visual | Alterar |
Contexto | Real |
Help | Prazo Estimativa - Quantidade de meses para estimativa de termino |
Campo | O0D_DTDIST |
Tipo | Caracter |
Tamanho | 1 |
Decimal | 0 |
Formato | @! |
Título | And ou Distr |
Descrição | Andamento ou distribuição |
Ordem | 12 |
Usado | Sim |
Obrigatório | Sim |
Browse | Sim |
Visual | Alterar |
Contexto | Real |
Val. Sistema | Pertence("12") |
Cbox Port. | 1=Andamento;2=Distribuição |
Inic. Padrão | "1" |
Help | Utiliza data do andamento ou distribuição para cálculo da estimativa de término. |
Alteração de Campos no arquivo SX3 – Campos:
Campo | NSZ_ESTTER |
Visual | Visualizar |
Campo | NSZ_TRITER
|
Tipo | Caracter |
Tamanho | 20 |
Decimal | 0 |
Título | Trimest. Tér |
Descrição | Trimestre de Término |
Usado | Sim |
Obrigatório | Não |
Browse | Sim |
Visual | Visualizar |
Contexto | Real |
Help | Estimativa de término por Trimestre. |
Criação de Índices no arquivo SIX – Índices:
Índice | O0D |
Ordem | 1 |
Chave | O0D_FILIAL + O0D_COD |
Descrição | Filial + Código |
Mostra Pesq. | Sim |
Índice | O0D |
Ordem | 2 |
Chave | O0D_FILIAL + O0D_CTIPOAS + O0D_CAREAJ +O0D_CATO+ O0D_COBJET |
Descrição | Filial + cod tipo assunto + cod área jurídica + cod ato + cod assunto |
Mostra Pesq. | Sim |
Criação de Relacionamentos no arquivo SX9 – Relacionamentos:
Tabela dom | NRB |
Exp domínio | NRB_COD |
Exp c domínio | O0D_CAREAJ |
Tabela dom | NRO |
Exp domínio | NRO_COD |
Exp c domínio | O0D_CATO |
Tabela dom | NYB |
Exp domínio | NYB_COD |
Exp c domínio | O0D_CTIPOAS |
Tabela dom | NQ4 |
Exp domínio | NQ4_COD |
Exp c domínio | O0D_COBJET |
Criação de Gatilhos no arquivo SX7 – Gatilhos:
Campo | O0D_TIPOAS |
Ctr domínio | O0D_DTIPAS |
Sequencia | 001 |
Regra | NYB->NYB_DESC |
Seek | sim |
Alias Pesq. | NYB |
Ordem Pesq. | 1 |
Chave | XFILIAL("NYB") + M->O0D_TIPOAS |
Campo | O0D_CAREAJ |
Ctr domínio | O0D_DAREAJ |
Sequencia | 001 |
Regra | NRB->NRB_DESC |
Seek | sim |
Alias Pesq. | NRB |
Ordem Pesq. | 1 |
Chave | xFilial('NRB')+M->O0D_CAREAJ |
Campo | O0D_CATO |
Ctr domínio | O0D_DATO |
Sequencia | 001 |
Regra | NRO->NRO_DESC |
Seek | sim |
Alias Pesq. | NRO |
Ordem Pesq. | 1 |
Chave | xFilial('NRO')+M→O0D_CATO |