CPC-COMPANY.p

• Rotina utilizada pela integração do Gestão de Planos com o Autorizador Datasul Medical, para que o usuário possa informar o tipo de empresa a ser cadastrada ao integrar os cadastros no sentido GPS -> ATZ.

...

Localização

...

• Dentro do programa company.p, antes de montar a mensagem XML de integração.

Âncora__RefHeading__23149_2053127524__RefHeading__23149_2053127524 Âncora__RefHeading__9304_486694287__RefHeading__9304_486694287 Âncora__RefHeading__4515_213273755__RefHeading__4515_213273755 Âncora__RefHeading__13913_644533341__RefHeading__13913_644533341 Âncora__RefHeading__89811_1756225838__RefHeading__89811_1756225838Ponto de Utilização

• "TIPO-DOMINIO1"
• "TIPO-EMPRESA"
• "TIPO-DOMINIO2"

Âncora__RefHeading__23151_2053127524__RefHeading__23151_2053127524 Âncora__RefHeading__9306_486694287__RefHeading__9306_486694287 Âncora__RefHeading__4517_213273755__RefHeading__4517_213273755 Âncora__RefHeading__13915_644533341__RefHeading__13915_644533341 Âncora__RefHeading__89813_1756225838__RefHeading__89813_1756225838Include das definições das tabelas temporárias

• cpc-company.i

...

__RefHeading__89815_1756225838Tabelas de entrada e saída
Âncora__RefHeading__23155_2053127524__RefHeading__23155_2053127524 Âncora__RefHeading__9310_486694287__RefHeading__9310_486694287 Âncora__RefHeading__4521_213273755__RefHeading__4521_213273755 Âncora__RefHeading__13919_644533341__RefHeading__13919_644533341 Âncora__RefHeading__89817_1756225838__RefHeading__89817_1756225838

Tabela de entrada tmp-cpc-company-prest-entrada

def temp-table tmp-cpc-company-prest-entrada no-undo

field in-evento-programa                     as char format "x(10)"
field nm-ponto-chamada-cpc               as char format "x(15)"
field cd-prestador                               as int.
field cd-dominio-clinica                       as int.
field cd-dominio-prestador

...

                  as int.

Definição campo a campo da tabela de entrada

• in-evento-programa – Evento do programa que chama a cpc-company.p. Os valores desse campo podem ser: " INT-ATZ"
• nm-ponto-chamada-cpc – Nome do ponto de chamada da cpc dentro do programa que a utiliza.
• cd-grupo-prestador – código do grupo de prestadores no cadastro do Gestão de Planos
• cd-dominio-clinica – código do tipo da clínica.
• Cd-domínio-prestador - código do grupo do prestador no cadastro do Gestão de Planos

...

...

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

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

field in-tipo-dominio-atz

...

                   as int
field lg-undo-retry

...

                           as log
field ds-mensagem

...

                         as char format "x(75)".

...

...

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

• Para "TIPO-DOMINIO1":
• in-tipo-domínio-atz – variável que deverá ser preenchida pela lógica específica da CPC para informar ao sistema qual é o código de tipo de domínio a ser enviada para o Autorizador Datasul Medical, caso seja prestador. Os valores possíveis são:

2 - Laboratório
3 - Plano de Saúde
4 - Hospital
5 - Clínica
6 - Consultório
7 - Farmácia
999 - Não atribuído

• • Para "TIPO-DOMINIO2":
  • in-tipo-domínio-atz – variável que deverá ser preenchida pela lógica específica da CPC para informar ao sistema qual é o código de tipo de domínio a ser enviada para o Autorizador Datasul Medical, caso seja uma clínica. Os valores possíveis são:

2 - Laboratório
3 - Plano de Saúde
4 - Hospital
5 - Clínica
6 - Consultório
7 - Farmácia
999 - Não atribuído

• • Para "TIPO-EMPRESA"
  • in-tipo-domínio-atz – variável que deverá ser preenchida pela lógica específica da CPC para informar ao sistema qual é o código de tipo de empresa a ser enviada para o Autorizador Datasul Medical. Os valores possíveis são:

1 - Auto-relacionamento
2 - Laboratórios
3 - Clínicas de RX
4 - Hospitais
5 - Clínicas
6 - Pronto-Socorros
7 - Intercâmbio
8 - Médicos não-Cooperados
9 - Patologia
10 - Seguro
11 - Congêneres
12 - Urgência Abrange
13 - Operadora
14 - Reembolso
15 - Farmácias
16 - Dentistas
17 - Óticas
18 - Reembolso Executivo
19 - Reembolso Normal
20 – Cliente

• • Lg-undo-retry – indica se ocorreu algum erro durante a execução da CPC.
  • ds-mensagem - Retorna a mensagem da cpc. Se lg-undo-retry retornar ligado, este campo será exibido em mensagem em tela.

...