Histórico da Página

Informações Gerais

Objetivo

Esta especificação visa detalhar a criação de Pontos de Entrada previstos na solução para a NEG 235, a qual consiste nas regras e modalidades da CEMIG Saúde para reembolso.

Definição da Regra de Negócio

Pontos de entrada para desenvolvimento específico:

 1) PLSBTA480: Permite a inclusão de novas opções do menu Outras Ações da janela da rotina de grupos de cobertura. Esse ponto de entrada já existe no sistema: PL480RT1 (para adicionar itens no menu ações relacionadas da rotina "Grupo de Cobertura") e PL480RT2 (para adicionar itens no menu ações relacionadas da rotina "Grupo de Cobertura>Procedimentos").

2) PLSGCOBA: Possibilita a verificação e determinação do Grupo de Cobertura

• No Fonte PLSXAUT, Função PLSVLDGRU
  
  
• Após a declaração de todas as variáveis e todas as definições DEFAULT e antes da instrução DbSelectArea, adicionar o seguinte trecho:     

         If ExistBlock("PLSGCOBA")
              cChaveAux := ExecBlock("PLSGCOBA",.F.,.F.,{cAlias,cFilSeek,cChaveAux})
       Endif