CPC-API-USUARIO.p

• 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.

...

• "EXCLUI-FATURADO"
• "GRAU-PAR"
• "APOS-INCLUSAO"
• "GRAVA-TEMP"
• "VALIDA-USUARIO"
• FINAL"ANTES-EXCLUIINCLUIR"

Include das definições das tabelas temporárias

...

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   civil                                 like usuario.in-est-civil
field cd-grau-parentesco   parentesco                  like usuario.cd-grau-parentesco

field dt-nascimento                           like pessoa-fisica.dt-nascimento

field cd-cpf                                        like pessoa-fisica.cd-cpf

field id-pessoa                                  like pessoa-fisica.id-pessoa

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)".

...

• • 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

...

field lg-undo-retry                        as logical

field cd-mensagem                      as int

field ds-mensagem-erro              as char format "x(75)"
field dt-exclusao-plano                like usuario.dt-exclusao-plano
field lg-continua continua                           as logical initial yes.

...