cpc-rtpercob.p1

Rotina utilizada para valorizar procedimentos de acordo com os parâmetros cadastrados, para o ponto de chamada "VAL-ESPEC".
Caso o cliente não queira executar a chamada da CPC no seu cadastro deve colocar CPC Ativo como não.
Localização
Dentro do programa rtpercob.p.
Ponto de Utilização
"VAL-ESPEC"
Include das definições das tabelas temporárias
cpc- rtpercob.i
Tabelas de entrada e saída
Tabela de entrada tmp-cpc- rtpercob -entrada
def temp-table tmp-cpc-rtpercob-entrada no-undo
field nm-ponto-chamada-cpc as char format "x(15)"
field nr-rowid-movimento as rowid
field vl-honorarios like moviproc.vl-honorarios-medicos
field vl-operacional like moviproc.vl-operacional
field vl-filme like moviproc.vl-filme
Definição campo a campo da tabela de entrada
nm-ponto-chamada-cpc – Nome do ponto de chamada da cpc dentro do programa que a utiliza.
nr-rowid-movimento – Variável que guarda o rowid da tabela.
Vl-honorarios – Variável que guarda o valor dos honorários do procedimento.
Vl-operacional – Variável que guarda o valor operacional do procedimento.
Vl-filme – Variável que guarda o valor filme do procedimento.
Tabela de saída tmp-cpc- rtpercob -saida
def temp-table tmp-cpc-rtpercob-saida no-undo
field lg-erro-cpc as log
field ds-mensagem as char format "x(80)"
field vl-honorarios like moviproc.vl-honorarios-medicos
field vl-operacional like moviproc.vl-operacional
field vl-filme like moviproc.vl-filme
Definição campo a campo da tabela de saída
lg-erro-cpc – Variável que controla se erros aconteceram dentro da CPC.
ds-mensagem – descrição da mensagem de erro caso ocorra, dentro na cpc.
Vl-honorarios – Variável que guarda o valor dos honorários do procedimento.
Vl-operacional – Variável que guarda o valor operacional do procedimento.
Vl-filme – Variável que guarda o valor filme do procedimento.