CPC-VP0310P

...

.P

• Rotina chamada na opção elimina do programa de manutenção transferência 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.

...

• Dentro do programa vp0310p.p, antes de eliminar o beneficiário titulartransferir os beneficiários.

Ponto de Utilização

"EXCLUI-TIT"
"ENT-DADOS-DEST"
"PERFILENT-USUARIODADOS" "DENT-PROC-DAD"

Include das definições das tabelas temporárias

...

Tabela de entrada tmp-cpc-vp0310p-entrada

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

                        field nm-ponto-chamada                              as char format "x(75)"

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

field cd-modalidade-transf                           like usuario.cd-modalidade
field nr-ter-adesao-transf                             like usuario.nr-ter-adesao
field cd-usuario-transf                                  like usuario.cd-usuario
field cd-unimed-transf                                  like usurepas.cd-unidade-destino
field cd-unimed-atendimento-transf            like usureate.cd-unidade-atendimento
field cd-cidade-transf                                    like usuario.cd-cidade.

Definição campo a campo da tabela de entrada

• • • nm-ponto-chamada - Nome do ponto de chamada da cpc.
    • in-evento-programa – Evento do programa que chama a cpc-vp0310p, que deve ser "ALT".
    • lg-mensagem-na-tela – indica Indica se o programa deverá mostrar mensagens na tela ou executar em batch.
    • cd-modalidade-tit – código Código da modalidade do beneficiário titular que esta está sendo eliminadotransferido.
    • Nrnr-proposta-tit – número Número da proposta do beneficiário titular que esta está sendo eliminadotransferido.
    • Cdcd-usuario-tit – código Código do beneficiário titular que esta está sendo eliminadotransferido.
    • Hh-frame – Variável que ira irá receber o handle de um frame especifico.
    • Lglg-benef-exclu – Variável que indica se o programa irá transferir beneficiários excluídos.
    • Hh-hill – Variável que ira receber o handle de um frame especifico.
    • cd-modalidade-transf - Código da modalidade do beneficiário que está sendo transferido.
    • nr-ter-adesao-transf - Número do termo de adesão do beneficiário que está sendo transferido.
    • cd-usuario-transf - Código do beneficiário que está sendo transferido.
    • cd-unimed-transf - Código da unidade de repasse do beneficiário que está sendo transferido.
    • cd-unimed-atendimento-transf - Código da unidade de atendimento do beneficiário que está sendo transferido.
    • cd-cidade-transf - Código da cidade do beneficiário que está sendo transferido.

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-hill                                           as handle

field lg-mensagem-na-tela                as log.

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.
    • Lglg-trans-usu-exclu – Variável que controla se foi selecionado a transferência dos beneficiários excluídos.
    • Lglg-undo-retry – Variável que retorna as ações do sistema, caso encontre erro.
    • Lglg-erro – Variável que busca por erros.
    • Hh-hill – Variável que ira receber o handle de um frame especifico.

...

• • • lg-mensagem-na-tela – Indica se o programa deverá mostrar mensagens na tela ou gerar no relatório de erros.