CPC-RTLOCART.P

Rotina para localizar:

• A carteira antiga do beneficiário, quando utilizado o ponto de chamada "CART-ANTIGA". Essa rotina deve devolver o código da carteira do usuário e a unidade da mesma.
• A carteira do beneficiário, quando utilizado o ponto de chamada "CART-REPASSE" e o beneficiário for repassado. Essa rotina deve devolver o código da carteira do usuário e a unidade da mesma.
• da carteira antiga do beneficiário. Essa rotina deve devolver o código da carteira do usuário e a unidade da mesma.
• Rotina utilizada para gravar informações do beneficiário de outras unidades incluído ou alterado na tabela especifica de histórico de movimentações e mostrar em tela o último usuário e data de alteração.
• 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 apenas um registro na tabela temporária de saída. Caso possuir mais de um registro um erro será reportado. 

...

"CART-ANTIGA"
"CART-REPASSE"
"HIST-ALTERA"
"ANTES-MENS-TELA"
"ANTES-CART"

Include das definições das tabelas temporárias

...

field nm-ponto-chamada-cpc                     as char format "x(15)"
field in-evento-programa                            as char format "x(10)"
field lg-mensagem-na-tela as log
field nr-rowid-out-uni as rowid
field nm-programa as char format "x(25)"
field cd-carteira-usuario like guiautor.cd-carteira-usuario
field cd-unidade-carteira like guiautor.cd-unidade-carteira
field nr-via-carteira like guiautor.nr-via-carteira
field r-usuario as rowid
field cd-unidade-prestador as int
field in-entidade as char

Definição campo a campo da tabela de entrada

• • • In-evento-programa – Evento do programa que chama a rotina rtlocart, na qual será passada para a cpc-rtlocart.p.: CARTEIRA.
    • Nm-ponto-chamada-cpc – Nome do ponto de chamada da cpc dentro do programa que a utiliza. Para a rotina rtlocart.p: CART-ANTIGA.
    • Lg-mensagem-na-tela – Indica se as mensagens de erro devem ser dispostas na tela ou não. Caso o indicador for não o campo da tabela de saída ds-mensagem deve ser preenchido. (não obrigatório).
    • Nr-rowid-out-uni – não utilizado neste ponto de chamada.
    • Nm-programa – nome do programa chamador da rotina rtlocart.p. O programa RTLOCART.P é chamado pelos programas abaixo listados, sendo que o cliente pode dentro de sua CPC verificar qual é o programa chamador para realizar as consistências conforme sua necessidade.
    • AT0110C1.P – Menu AT-02-A (Procedimentos Permitidos e Inclusão de Guias de Autorização).
    • PP0411C.P – Menu PP-02-A (Movimentos Extras dos Prestadores).
    • RC0110W.P – Menu RC-04-G (Cancela Movimentos do RC gerados pelo AC).
    • RC0210F.P – Menu RC-05-E (Movimentos por Beneficiário).
    • RC0311A4.P – Menu RC-04-C (Documentos do Revisão de Contas ).
    • Cd-carteira-usuario – código da carteira do usuário.
    • Cd-unidade-carteira– código da unidade da carteira.
    • Nr-via-carteira – número da via da carteira.
    • r-usuario - rowid do registro da tabela USUARIO
    • cd-unidade-prestador - unidade do prestador recebida pelo rotina
    • in-entidade - refere-se ao módulo, "AT", "RC" etc.

Tabela de saída tt-cpc-rtclpart-saida

...

field lg-undo-retry                                as log
field ds-mensagem-relatorio                as char format "x(75)"
field cd-carteira-usuario                        like guiautor.cd-carteira-usuario
field cd-unidade-carteira                      like guiautor.cd-unidade-carteira
field nr-rowid                                        as rowed
field lg-mens-tela                                 as log
field lg-intercambio-eventual               as log

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

• • • Lg-undo-retry – Variável que controla se erros aconteceram dentro da CPC deve retornar SIM se erros aconteceram e NÃO se o processo foi concluído por completo.
    • Ds-mensagem-relatorio – Deve conter mensagens de erro ou qualquer outro tipo de mensagem. Utilizado em conjunto com a entrada lg-mens-tela. Se lg-mens-tela for Não então esse campo deve ser preenchido.
    • Cd-carteira-usuario – código da carteira do usuário .
    • Cd-unidade-carteira – código da unidade da carteira.
    • Nr-rowid – rowid do registro acessado da tabela car-ide.
    • LG-mens-tela – Indica se irá mostrar mensagem em tela ou não
    • lg-intercambio-eventual - indica se é intercâmbio eventual