CPC-RTCONVPR.P0

• Rotina utilizada para permitir a operadora considerar os seus cadastros específicos da relação AMB X CBHPM e CBHPM X AMB no processo de conversão de procedimentos.
• Caso o cliente não queira executar a chamada da CPC no seu cadastro deve colocar CPC Ativo como não.

Âncora__RefHeading__20477_2053127524__RefHeading__20477_2053127524 Âncora__RefHeading__6632_486694287__RefHeading__6632_486694287 Âncora__RefHeading__1843_213273755__RefHeading__1843_213273755 Âncora__RefHeading__11241_644533341__RefHeading__11241_644533341 Âncora__RefHeading__87139_1756225838__RefHeading__87139_1756225838Localização

• Dentro da rotina RTCONVPR, no momento da conversão do procedimento.

...

__RefHeading__20479_2053127524__RefHeading__20479_2053127524 Âncora__RefHeading__6634_486694287__RefHeading__6634_486694287 Âncora__RefHeading__1845_213273755__RefHeading__1845_213273755 Âncora__RefHeading__11243_644533341__RefHeading__11243_644533341 Âncora__RefHeading__87141_1756225838__RefHeading__87141_1756225838Pontos de Utilização

"CONVERTE-PROC"

Âncora__RefHeading__20481_2053127524__RefHeading__20481_2053127524 Âncora__RefHeading__6636_486694287__RefHeading__6636_486694287 Âncora__RefHeading__1847_213273755__RefHeading__1847_213273755 Âncora__RefHeading__11245_644533341__RefHeading__11245_644533341 Âncora__RefHeading__87143_1756225838__RefHeading__87143_1756225838Include das definições das tabelas temporárias

• CPC-CONVPR.I

...

__RefHeading__6638_486694287 Âncora__RefHeading__1849_213273755__RefHeading__1849_213273755 Âncora__RefHeading__11247_644533341__RefHeading__11247_644533341 Âncora__RefHeading__87145_1756225838__RefHeading__87145_1756225838Tabelas de entrada e saída
Âncora__RefHeading__20485_2053127524__RefHeading__20485_2053127524 Âncora__RefHeading__6640_486694287__RefHeading__6640_486694287 Âncora__RefHeading__1851_213273755__RefHeading__1851_213273755 Âncora__RefHeading__11249_644533341__RefHeading__11249_644533341 Âncora__RefHeading__87147_1756225838__RefHeading__87147_1756225838

Tabela de entrada tmp-cpc-rtconvpr-entrada

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

field in-evento-programa

...

                                         as char format "x(06)"
field nm-ponto-chamada-cpc                                   as char format "x(15)"
field in-modulo

...

                                                             as char format "x(2)"
field cd-tipo-conv                                                         as int format "9"
field dt-realizacao

...

                                                       as date format "99/99/9999"
field cd-codigo-ent

...

                                                     as int format "99999999"

...

...

Definição campo a campo da tabela de entrada

• • • in-evento-programa – Evento do programa de chamada da CPC

...

• • • .
    • "CONVERSAO".
    • nm-ponto-chmada-cpc – Ponto de chamada da CPC

...

• • • .
    • "CONVERTE-PROC".
    • in-modulo – Indica qual é o modulo do sistema que esta solicitando a conversão (AT, RC, AC)

...

• • • .
    • cd-tipo-conv – Indica qual é o tipo de conversão a ser feita. Se igual a 1 então entra procedimento AMB e sai procedimento correspondente CBHPM senão entra procedimento CBHPM e sai procedimento correspondente AMB.
    • dt-realizacao – Data de realização do movimento

...

• • • .
    • cd-codigo-ent – Código do procedimento que será verificado para conversão

...

• • • .

...

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

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

field lg-undo-retry

...

                           as log
field cd-codigo-sai                           as int format "99999999"
field ds-mensagem                         as char format "x(40)"

...

...

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

• • • lg-undo-retry – Indica que ocorreu algum erro durante o processamento.
    • cd-codigo-sai – código do procedimento convertido. Se igual a Zeros (00000000) é porque não ocorreu a conversão.
    • ds-mensagem – Retorna a mensagem da cpc

...

• • • .