CPC-ZZAT0002.P
Produto: | Gestão de Planos de Saúde |
Módulo: | HAT |
Versão: | 12.x.x |
Assuntos: | cpc-zzat0002.p |
- Programa de zoom de guias do AT;
- Caso o cliente não queira executar a chamada da CPC deve colocar CPC ativa como não no cadastro de CPCs;
- Será permitido para essa CPC apenas um registro na tabela temporária de saída. Caso exista mais de um registro será reportado erro.
Localização
- Ponto "APOS-CLASSIF1": após a primeira tela de classificação.
Ponto de Utilização
- "APOS-CLASSIF1"
Include das definições das tabelas temporárias
- cpc-zzat0002.i
Tabelas de entrada e de saída
Tabela de entrada tmp-cpc-zzat0002-entrada
def temp-table tmp-cpc-zzat0002-entrada no-undo
field nm-ponto-chamada-cpc as char format "x(15)"
field nm-evento as char format "x(15)"
field cd-classificacao as char.
Definição campo a campo da tabela de entrada
- nm-ponto-chamada-cpc - nome do ponto de chamada da CPC;
- nm-evento - nome do evento;
- cd-classificacao - armazena a opção selecionada pelo usuário na primeira tela de classificação.
Tabela de saída tmp-cpc-zzat0002-saida
def temp-table tmp-cpc-zzat0002-saida no-undo
field lg-erro as logical
field ds-mensagem as char
field cd-unidade-guia like guiautor.cd-unidade
field aa-guia-atendimento like guiautor.aa-guia-atendimento
field nr-guia-atendimento like guiautor.nr-guia-atendimento
field cd-retorno as logical
field lg-retorna as logical.
Definição campo a campo da tabela de saída
- lg-erro - indica se ocorreu erro na CPC;
- ds-mensagem - armazena a descrição do erro ocorrido na CPC;
- cd-unidade-guia - unidade da guia de autorização;
- aa-guia-atendimento - ano da guia de autorização;
- nr-guia-atendimento - número da guia de autorização
- cd-retorno - indica retorno do zoom
- lg-retorna - indica que não deve continuar a lógica de produto.