Árvore de páginas

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

CPC-CG0112A.p

Produto:

Gestão de Planos de Saúde

Módulo:Todos
Versão:12.x.x
Assuntos:

cpc-cg0112a.p

 

  • Rotina chamada na programa que altera prestadores.
  • Caso o cliente não queira executar a chamada da CPC no seu cadastro deve colocar CPC Ativo como não.
  • Será permitido para esta CPC apenas um registro na tabela temporária de saída. Caso possuir mais de um registro um erro será reportado.

 

Âncora__RefHeading__23223_2053127524__RefHeading__23223_2053127524 Âncora__RefHeading__9378_486694287__RefHeading__9378_486694287 Âncora__RefHeading__4589_213273755__RefHeading__4589_213273755 Âncora__RefHeading__13987_644533341__RefHeading__13987_644533341 Âncora__RefHeading__89885_1756225838__RefHeading__89885_1756225838Localização

  • Dentro do programa cg0112b.p , após alterar os dados do prestador.
  • Dentro do programa cg0112b.p ,ao chamar a função "F5-Correspondência Eletrônica".
  • Dentro do programa cg0112b.p , após alterar as informações referentes a correspondência eletrônica.
  • Dentro do programa cg0112b.p , após informar a data de exclusão do prestador.
  • Dentro do programa cg0112b.p, após informar o motivo de exclusão do prestador

...

__RefHeading__4591_213273755__RefHeading__4591_213273755 Âncora__RefHeading__13989_644533341__RefHeading__13989_644533341 Âncora__RefHeading__89887_1756225838__RefHeading__89887_1756225838Ponto de Utilização

  • "APOS-CONSULTA", "APÓS-MODIFICA", "ANTES-EVENTO", "APÓS-EVENTO", "DATA-EXCLUSAO" , "PRES-E-MAIL", "INICIO-ENDPRES", "APOS-EXCL-LOGIC" , "MOSTRA-DADOS" e "CONS-USUARIO". 


Âncora__RefHeading__23227_2053127524__RefHeading__23227_2053127524 Âncora__RefHeading__9382_486694287__RefHeading__9382_486694287 Âncora__RefHeading__4593_213273755__RefHeading__4593_213273755 Âncora__RefHeading__13991_644533341__RefHeading__13991_644533341 Âncora__RefHeading__89889_1756225838__RefHeading__89889_1756225838Include das definições das tabelas temporárias

  • cpc-cg0112b.i

 

Âncora__RefHeading__23229_2053127524__RefHeading__23229_2053127524 Âncora__RefHeading__9384_486694287__RefHeading__9384_486694287 Âncora__RefHeading__4595_213273755__RefHeading__4595_213273755 Âncora__RefHeading__13993_644533341__RefHeading__13993_644533341 Âncora__RefHeading__89891_1756225838__RefHeading__89891_1756225838Tabelas de entrada e saída
Âncora__RefHeading__23231_2053127524__RefHeading__23231_2053127524 Âncora__RefHeading__9386_486694287__RefHeading__9386_486694287 Âncora__RefHeading__4597_213273755__RefHeading__4597_213273755 Âncora__RefHeading__13995_644533341__RefHeading__13995_644533341 Âncora__RefHeading__89893_1756225838__RefHeading__89893_1756225838

Tabela de entrada tmp-cpc-cg0112b-entrada

def temp-table tmp-cpc-cg0112b-entrada no-undo

field in-evento-programa

...

                 as char format "x(06)"
field nm-ponto-chamada-cpc             as char format "x(15)"
field r-preserv                                 as rowid
field lg-corres-eletr-aux

...

                   as log
field int-10

...

                                     like preserv.int-10
field en-rua                                     like preserv.en-rua
field en-compl                                 like preserv.char-15
field en-bairro

...

                                 like preserv.en-bairro
field en-cep                                     like preserv.en-cep
field en-uf                                       like preserv.en-uf
field cd-cidade                                 like preserv.cd-cidade
field nm-email                                 like preserv.nm-email
field nr-telefone-1

...

                           like preserv.nr-telefone[1]
field nr-telefone-2

...

                           like preserv.nr-telefone[2]
field nr-telefone-3

...

                           like preserv.char-16
field nr-telefone-4                             like preserv.char-18
field nr-ramal-1                                 like preserv.nr-ramal[1]
field nr-ramal-2                                 like preserv.nr-ramal[2]
field nr-ramal-3                                 like preserv.char-17
field nr-ramal-4                                 like preserv.char-19
field dt-exclusao                               like preserv.dt-exclusao
field cd-grupo-prestador                     like gruppres.cd-grupo-prestador.
field dt-exclusao                               like preserv.dt-exclusao
field cd-motivo                                 like preserv.cd-motivo-cancel
field cd-retorno-cpc

...

                         as int format 99.

...

...

Definição campo a campo da tabela de entrada

  • in-evento-programa – Evento do programa que chama a CPC-CG0112B.P podendo ser igual a "INICIO-PROCESSO" .
  • nm-ponto-chamada – Nome do Ponto de Utilização, que deve ser "APOS-CONSULTAI", "APÓS-MODIFICA", "ANTES-EVENTO", "APÓS-EVENTO", "DATA-EXCLUSAO", ou "PRES-E-MAIL"
  • r-preserv – Registro do prestador a ser consultado.
  • lg-corres-aletr-aux – Indicador de alteração de envio de correspondência eletrônica para o prestador.
  • int-10 – Variável de campo inteiro reserva.
  • en-rua – Variável para armazenar nome da rua.
  • en-compl – Variável para armazenar complemento de endereço.
  • en-bairro – Variável para armazenar nome do bairro.
  • en-cep – Variável para armazenar o cep.
  • en-uf – Variável para armazenar o Estado.
  • cd-cidade – Variável de código de cidade.
  • nm-email – Variável de endereço de e-mail.
  • nr-telefone-1 – Variável de armazenar número telefonico Principal.
  • nr-telefone-2 – Variável de armazenar número telefonico Secundário.
  • nr-telefone-3 – Variável auxiliar para número telefonico.
  • nr-telefone-4 - Variável auxiliar para número telefonico.
  • nr-ramal-1 – Variável que armazena número de ramal principal.
  • nr-ramal-2 - Variável que armazena número de ramal secundário.
  • nr-ramal-3 – Variável auxiliar para número de ramal.
  • nr-ramal-4 – Variável auxiliar para número de ramal.
  • dt-exclusao – Data de exclusão lógica do prestador
  • cd-grupo-prestador – Indica o grupo do prestador
  • cd-motivo – Motivo de exclusão do prestador.
  • cd-retorno-cpc – Código de retorno do tratamento de lotes guias.

...

 

...

Tabela de saída tmp-cpc-cg0112b-saida

def temp-table tmp-cpc-cg0112b-saida no-undo

field lg-permit-manut                         as log
field lg-undo-retry

...

                             as logical
field ds-mensagem-erro

...

                     as char format "x(75)"
field cd-grupo-prestador                     like gruppres.cd-grupo-prestador.
field lg-continua

...

                               as log
field cd-retorno-cpc

...

                           as int format 99.

...

Definição campo a campo da tabela de saída

  • lg-undo-retry – Variável que controla se erros aconteceram dentro da CPC deve retornar SIM se erros aconteceram e NÃO se o processo foi concluído por completo.
  • lg-permit-manut: indica se o campo referente ao recebimento de correspondência eletrônica será ou não habilitado para manutenção.
  • ds-mensagem-erro – Deve conter mensagens de erro caso ocorram.
  • cd-grupo-prestador – Indica o grupo do prestador.
  • lg-continua – Variável que retorna a permissão de liberar ou restringir o usuário.
  • cd-retorno-cpc – Código de retorno do tratamento de lotes guias.

...