cpc-api-usuario.p0

Rotina utilizada para permitir que seja possível excluir beneficiários com data anterior a data do último faturamento.
Caso o cliente não queira executar a chamada da CPC no seu cadastro deve colocar CPC Ativo como não.
Para que o percentual de desconto das propostas tenham o valor definido no programa especifico, é aplicado o desconto para todos os beneficiários.
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.
Localização
Dentro do programa api-usuario.p.
Ponto de Utilização
"EXCLUI-FATURADO"
"GRAU-PAR"
"APOS-INCLUSAO"
"GRAVA-TEMP"
FINAL-EXCLUI
Include das definições das tabelas temporárias
cpc-api-usuario.i
Tabelas de entrada e saída
Tabela de entrada tmp-cpc-api-usuario-entrada
def temp-table tmp-cpc-api-usuario-entrada no-undo
field nm-ponto-chamada as char format "x(15)"
field in-evento-programa as char format "x(10)"
field aa-ult-faturamento like usuario.aa-ult-fat
field mm-ult-faturamento like usuario.mm-ult-fat
field dt-exclusao-plano like usuario.dt-exclusao-plano
field r-propost as rowid
field r-usuario as rowid
field cd-modalidade like usuario.cd-modalidade
field nr-proposta like usuario.nr-proposta
field in-est-civil like usuario.in-est-civil
field cd-grau-parentesco like usuario.cd-grau-parentesco
field in-funcao as char format "x(03)"
field char-1 as char format "x(30)"
field char-2 as char format "x(30)"
field char-3 as char format "x(30)"
field char-4 as char format "x(30)"
field char-5 as char format "x(30)"
field char-6 as char format "x(60)"
field char-7 as char format "x(60)"
field char-8 as char format "x(60)"
field char-9 as char format "x(60)"
field char-10 as char format "x(60)".
Definição campo a campo da tabela de entrada
nm-ponto-chamada-cpc – Ponto de chamada de cpc
in-evento-programa – Identifica qual evento deve ser executado no momento que está sendo chamada
aa-ult-faturamento – Ano do último faturamento do beneficiário.
mm-ult-faturamento – Mês do último faturamento do beneficiário.
dt-exclusao-plano – data informada na qual o beneficiário será excluído
r-proposta – número do registro no banco da tabela referente a proposta
r-usuario - número do registro no banco da tabela referente a usuário
cd-modalidade – Numero da modalidade.
Nr-proposta - Numero da proposta.
In-estado-civil – numero do estado civil
Cd-grau-parentesco – Numero do grau parentesco
in-funcao – função que a api está executando no momento (inclusão, exclusão, etc)
char-1 – utilizados como reserva
char-2 – utilizados como reserva
char-3 – utilizados como reserva
char-4 – utilizados como reserva
char-5 – utilizados como reserva
char-6 – utilizados como reserva
char-7 – utilizados como reserva
char-8 – utilizados como reserva
char-9 – utilizados como reserva
char-10 – utilizados como reserva
Tabela de saída tmp-cpc-api-usuario-saida
def temp-table tmp-cpc-api-usuario-saida no-undo
field lg-undo-retry as logical
field ds-mensagem-erro as char format "x(75)"
field dt-exclusao-plano like usuario.dt-exclusao-plano
field lg-continua as logical initial yes.
Definição campo a campo da tabela de saída
lg-undo-retry –controla os erros que podem ocorrer na CPC.
ds-mensagem-erro – recebe a descrição dos erros que ocorreram na CPC.
dt-exclusao-plano – recebe a data de exclusão do beneficiário alterada.
Lg-continua– controla se o programa deve continuar.