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.

Localização

• Dentro do programa api-usuario.p.

Ponto de Utilização

• "EXCLUI-FATURADO"
• "GRAU-PAR"
• "APOS-INCLUSAO"
• "GRAVA-TEMP"
• "VALIDA-USUARIO"
• "ANTES-INCLUIR"
• "ANTES-EXCLUIR"
• "VALIDA-COD-FUNC"
• "ANTES-UPDATE"
• "RETROAGE-DT-MAX" - liberação a partir da 12.1.2301.

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

field lg-altera-data                         as log
field dt-inclusao-plano                   as date format "99/99/9999"
field dt-aux-plano                           as date format "99/99/9999".

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 – Número da modalidade.
  • nr-proposta - Número da proposta.
  • In-estado-civil – Código do estado civil
  • cd-grau-parentesco – Número do grau parentesco
  • dt-nascimento - Data de nascimento
  • cd-cpf - CPF do beneficiário
  • id-pessoa - ID pessoa vinculada ao beneficiário
  • 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
  • lg-altera-data – Controla se deve alterar ou não a data.
  • dt-inclusao-plano – Data de inclusão do beneficiário, calculada pelo sistema.
  • dt-aux-plano – Data auxiliar, calculada pelo sistema.   

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 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                           as logical initial yes

field lg-atualiza                             as logical

field dt-referencia                        as date format "99/99/9999"

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.
    • lg-atualiza – Controla se deve atualizar sim ou não.
    • dt-referencia – Data de inclusão do beneficiário, calculada pela cpc.