cpc-mc0210v.p1

Rotina utilizada para tratar de forma diferenciada a reativação do beneficiário.
Caso o cliente não queira executar a chamada da CPC no seu cadastro deve colocar CPC Ativo como não.
Localização
Dentro do programa mc0210v.p.
Ponto de Utilização
"REATIVA-BENEF"
"SETA-DT-REAT"
"VERIF-SIT-BENEF"
Include das definições das tabelas temporárias
cpc-mc0210v.i
Tabelas de entrada e saída
Tabela de entrada tmp-cpc-mc0210v-entrada
def temp-table tmp-cpc-mc0210v-entrada no-undo
field in-evento-programa as char format "x(10)"
field nm-ponto-chamada as char format "x(15)"
field nm-ponto-chamada-cpc as char format "x(15)"
field nm-tabela as char format "x(20)"
field cd-modalidade like usuario.cd-modalidade
field nr-proposta like usuario.nr-proposta
field cd-usuario like usuario.cd-usuario
field nr-ter-adesao like usuario.nr-ter-adesao
field r-usuario as rowid
field lg-reativa as log
field mm-ult-fat like ter-ade.mm-ult-fat
field aa-ult-fat like ter-ade.aa-ult-fat.
Definição campo a campo da tabela de entrada
nm-ponto-chamada-cpc - Nome do ponto de chamada da cpc dentro do programa que a utiliza.
R-usuario – rowid do beneficiário
Lg-reativa – Indicador que forca a reativação do beneficiário.
Mm-ult-fat – mês de referncia da ultima fatura.
Aa-ult-fat – Ano de referencia da ultima fatura.
Tabela de saída tmp-cpc-mc0210v-saida
def temp-table tmp-cpc-mc0210v-saida no-undo
field lg-undo-retry as log
field ds-mensagem as char format "x(75)"
field ds-mensagem-erro as char format "x(75)"
field lg-reativa as log
field dt-ult-fat as date
field lg-atualiza-benef as log
field lg-continua as log.
Definição campo a campo da tabela de saída
lg-erro - Variável que controla se erros aconteceram dentro da CPC. Se o retorno desta variável for igual a SIM, indicará que erros aconteceram e se o retorno for igual à NÃO, indicará que o processo foi concluído por completo.
ds-mensagem - Variável que retornar mensagem de erro, se ocorrido dentro da CPC.
Lg-reativa – Indicador que forca a reativação do beneficiário.
Dt-ult-fat – Retorna data da ultima fatura.
lg-atualiza-benef - Controla o disparo da mensagem: "Situacao do beneficiario nao permite ser reativado".
Lg-continua – determina se o processo deve continuar ou não.