CPC-FP0512C.p

• Rotina utilizada para verificar simular os movimentos de pré-pagamento das notas de serviç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.

Localização

• Dentro do programa FP0512C.P.

Ponto de Utilização

• "LEITURA-PRO-PLA" → Ponto de CPC ao buscar o registro da tabela pro-pla vinculado ao módulo.
• "CONTA-USUARIO" → Ponto de CPC ao contar a quantidade de beneficiários do contrato.
• "DESCONS-TIPLEVE"→ Ponto de CPC ao testar casos do faturamento.

Include das definições das tabelas temporárias

• cpc-fp0512c.i

Tabelas de entrada e saída

Tabela de entrada tmp-cpc-fp0512c-entrada

def temp-table tmp-cpc-fp0512c-entrada no-undo
     field in-evento-programa        as char format "x(10)"
     field nm-ponto-chamada-cpc as char format "x(15)"
     field cd-modalidade                like tipeleven.cd-modalidade
     field nr-proposta                     like propost.nr-proposta
     field cd-modulo                      like tipeleven.cd-modulo
     field qt-usuario                       as int
     field aa-referencia                   like notaserv.aa-referencia
     field mm-referencia                like notaserv.mm-referencia

    field cd-evento                         like tipleven.cd-evento.

Definição campo a campo da tabela de entrada

• • in-evento-programa – Nome do evento de chamada da cpc dentro do programa que a utiliza
  • nm-ponto-chamada-cpc - Nome do ponto de chamada da cpc dentro do programa que a utiliza
  • cd-modalidade - Código da modalidade
  • nr-proposta - Número da proposta
  • cd-modulo - Código do módulo
  • qt-usuario - Quantidade de beneficiários
  • aa-referencia - Ano de referência
  • mm-referencia - Mês de referência.
  • cd-evento - Código do Evento.

Tabela de saída tmp-cpc-fp0512c-saida

def temp-table tmp-cpc-fp0512c-saida no-undo
     field lg-undo-retry               as log
     field ds-mensagem              as char
     field nr-rowid-pro-pla         as rowid
     field qt-usuario                   as int

     field lg-descons-tipleven   as log.

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

• • lg-undo-retry - Informa ao programa se deve continuar ou voltar e desfazer
  • ds-mensagem - Mensagem de erro
  • nr-rowid-pro-pla - Rowid da tabela PRO-PLA localizado pela CPC
  • qt-usuario - Quantidade de beneficiários contados na CPC
  • lg-descons-tipleven - Campo lógico para desconsiderar eventos.