cpc-rtconvpr.p4

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.

Localização
Dentro da rotina RTCONVPR, no momento da conversão do procedimento.
Pontos de Utilização
"CONVERTE-PROC"
Include das definições das tabelas temporárias
CPC-CONVPR.I
Tabelas de entrada e saída
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;