CPC-VP0310P_P

• Rotina chamada na opção elimina do programa de manutenção de beneficiários.
• 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 vp0310p.p, antes de eliminar o beneficiário titular.

Ponto de Utilização

"EXCLUI-TIT"
"ENT-DADOS-DEST"
"PERFIL-USUARIO"
"DENT-PROC-DAD"

Include das definições das tabelas temporárias

• cpc-vp0310p.i

Tabelas de entrada e saída

Tabela de entrada tmp-cpc-vp0310p-entrada

def temp-table tmp-cpc-vp0310p-entrada no-undo

field in-evento-programa                              as char format "x(06)"
filed lg-mensagem-na-tela                           as logical
field cd-modalidade-tit                                  like usuario.cd-modalidade
field nr-proposta-tit                                       like usuario.nr-proposta
field cd-usuario-tit                                         like usuario.cd-usuario
field h-frame                                                 as handle
field lg-benef-exclu                                       as logical
field h-hill                                                      as handle

Definição campo a campo da tabela de entrada

• • • in-evento-programa – Evento do programa que chama a cpc-vp0310p, que deve ser "ALT".
    • lg-mensagem-na-tela – indica se o programa deverá mostrar mensagens na tela ou executar em batch.
    • cd-modalidade-tit – código da modalidade do beneficiário titular que esta sendo eliminado.
    • Nr-proposta-tit – número da proposta do beneficiário titular que esta sendo eliminado.
    • Cd-usuario-tit – código do beneficiário titular que esta sendo eliminado.
    • H-frame – Variável que ira receber o handle de um frame especifico.
    • Lg-benef-exclu – Variável que indica se o programa irá transferir beneficiários excluídos.
    • H-hill – Variável que ira receber o handle de um frame especifico.
      
      

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

def temp-table tmp-cpc-vp0310p-saida no-undo

field lg-tem-mensagem                     as logical
field ds-mensagem-retorno               as char format "x(75)"
field cd-vendedor-aux                        like propost.cd-vendedor
field lg-caren-pro                               as log
field lg-caren-usu                               as log
field lg-bonifica                                  as log
field lg-bonif-auto                              as log
field lg-trans-usu-exclu                       as log
field lg-undo retry                              as log
field lg-erro                                        as log
field h-hill as handle

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

• • • lg-tem-mensagem - Variável que controla se existe mensagem para informação sobre beneficiário titular a ser eliminado.
    • ds-mensagem-retorno – Deve conter mensagem referente ao beneficiário titular a ser eliminado.
    • lg-caren-pro – Variável que controla se ira considerar carencia/bonif. dos modulos da proposta de origem.
    • lg-caren-usu – variável que controla se ira considerar carencia/bonif. do benef. da proposta de origem.
    • lg-bonifica – Variável que controla se ira cons. dias cumpridos entre datas de inclusao prop. dest./orig.
    • lg-bonif-auto – Variável que controla se ira criar bonoficacao automatica pelo padrao de cobertura.
    • Lg-trans-usu-exclu – Variável que controla se foi selecionado a transferência dos beneficiários excluídos.
    • Lg-undo-retry – Variável que retorna as ações do sistema, caso encontre erro.
    • Lg-erro – Variável que busca por erros.
    • H-hill – Variável que ira receber o handle de um frame especifico.