Page tree

Implementação do Campo Quantidade no Pacote Layout A500

Características do Requisito

Linha de Produto:

Microsiga Protheus

Segmento:

Saúde

Módulo:

Plano de Saúde

Rotina:

Rotina

Nome Técnico

PLUSA500

Exportação Layout A500.

País(es):

Todos

Banco(s) de Dados:

Todos

Tabelas Utilizadas:

BLE, BLY e B42

Sistema(s) Operacional(is):

Todos

Descrição

Desenvolvido o compatibilizador UPDPLSZL para Criar os campos "Quantidade Pacote" (BLY_QTDPAC, BLE_QTDPAC e B42_QTDPAC). Esta implementação é para que o cliente possa definir Quantidade em um determinado item do pacote e este seja exportado juntamente com o Layout A500. Somente Unimeds (Parâmetro MV_PLSUNI = 1) terão este campo ativo na tela. Para os outros clientes, o campo ficará Bloqueado.

 

Importante

Antes de executar o compatibilizador informe o UPDPLSZL é 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 TOTVS Smart Client (se versão 10), digite o UPDPLSZL  no campo Programa Inicial. Descreva se o compatibilizador deve ter uma data específica ou superior para que a atualização nos dicionários seja efetuada corretamente. Importante: Para a correta atualização do dicionário de dados, certifique-se que a data do compatibilizador seja igual ou superior a 04/10/2016.
  2. Clique em OK para continuar.
  3. Após a confirmação é exibida uma tela para a seleção da empresa em que o dicionário de dados será modificado ou é apresentada a janela para seleção do compatibilizador. 
  4. Ao confirmar é exibida uma mensagem de advertência sobre o backup e a necessidade de sua execução em modo exclusivo.
    1. Clique em Processar para iniciar o processamento. O primeiro passo da execução é a preparação dos arquivos.
      É apresentada uma mensagem explicativa na tela.
    2. 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.
    3. Clique em Gravar para salvar o histórico (log) apresentado.
    4. Clique em OK para encerrar o processamento.

 

Descreva se há algum procedimento necessário após a aplicação do compatibilizador.

Atualizações do Compatibilizador

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

  • Tabela BLE - Itens do Pacote:

 

Campo

BLE_QTDPAC

Tipo

N

Tamanho

4

Decimal

0

Formato

9999

Título

Qtd Pacote  

Descrição

Qtd Itens no Pacote      

Nível

1

Usado

Sim

Obrigatório

Não

Browse

Sim

When

IF(AllTrim(GETNEWPAR("MV_PLSUNI","1"))=="1",.T.,.F.)        

Relação

1

Help

Informe a quantidade para este item do pacote.

 

  • Tabela BLY - Pacotes Cabeçalho:

 

Campo

BLY_QTDPAC

Tipo

N

Tamanho

4

Decimal

0

Formato

9999

Título

Qtd Pacote  

Descrição

Qtd Itens no Pacote      

Nível

1

Usado

Sim

Obrigatório

Não

Browse

Sim

When

IF(AllTrim(GETNEWPAR("MV_PLSUNI","1"))=="1",.T.,.F.)        

Relação

1

Help

Informe a quantidade para este item do pacote.


Tabela B42 - Itens das Classes de Pacotes: 

 

Campo

B42_QTDPAC

Tipo

N

Tamanho

4

Decimal

0

Formato

9999

Título

Qtd Pacote  

Descrição

Qtd Itens no Pacote      

Nível

1

Usado

Sim

Obrigatório

Não

Browse

Sim

When

IF(AllTrim(GETNEWPAR("MV_PLSUNI","1"))=="1",.T.,.F.)        

Relação

1

Help

 Informe a quantidade para este item do pacote.

 

 

 

 

Procedimento para Utilização


Exemplo:

       1.            No Plano de Saúde (SIGAPLS), acesse Atualizações / Procedimento / Pacote (PLSA586).

O sistema apresenta a janela de pacotes cadastrados. Lembrando que o parâmetro MV_PLSUNI deve estar igual a 1.

       2.            Posicione o cursor em um pacote e clique em Alterar.

       3.            Insira alguns itens ao pacote e também sua quantidade. Salve a tela.

       4.            Digite uma guia com o pacote criado para um beneficiário de intercâmbio.

       5.            Consolide a guia em Atualizações / Faturamento / Consolidação de Participação (PLSM180):

       6.            Gere o Lote de intercâmbio (PLSA628).

       7.            Exporte o Layout A500 em Miscelânia/ Unimed/ EDI Exportação/ Layout A500 (PLSUA500).

       8.            Ao gerar o Arquivo no Local indicado, visualize da posição 101 até 106 do registro 504 a quantidade definida no pacote.