cpc-rc0212a.p0

Rotina utilizada para gravar informações do registro alterado na tabela especifica de histórico de movimentações.
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 no máximo um registro na tabela temporária de saída.
Localização
Dentro do programa rc0212a.p antes de salvar um beneficiário de outra unidade. Opção de Beneficiários Outras Unidades (Alteração), na Revisão de Contas Médicas (RC-04-F).
Ponto de Utilização
"HIST-ALTERA"
Include das definições das tabelas temporárias
cpc-rc0212a.i
Tabelas de entrada e saída
Tabela de entrada tt-cpc-rc0212a-entrada
def temp-table tt-cpc-rc0212a-entrada no-undo
field nm-ponto-chamada as char format "x(15)"
field nr-rowid-out-uni as rowid.
Definição campo a campo da tabela de entrada
nm-ponto-chamada – Nome do ponto de chamada da cpc dentro do programa que a utiliza. Para o programa rc0212a.p:
"HIST-ALTERA"
nr-rowid-out-uni – N° do rowid gerado na alteração de um beneficiário.
Tabela de saída tt-cpc-rc0212a-saida
def temp-table tt-cpc-rc0212a-saida no-undo
field lg-undo-retry as log
field ds-mensagem-relatorio as char format "x(75)".
Definição campo a campo da tabela de saída
lg-undo-retry – Variável que controla se erros aconteceram dentro da CPC. Se o retorno desta variável for igual a SIM, indicará que erros aconteceram e se o retorno for igual à NÃO, indicará que o processo foi concluído por completo.
ds-mensagem – Variável que retornar mensagem de erro, se ocorrido dentro da CPC.