cpc-vp0310p.p1

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