cpc-mc0510m.p0

Rotina que permitirá realizar algumas consistências no termo de adesão antes de renovar as carteiras/cartão.
Rotina que permitirá realizar a manipulação do endereço das etiquetas de cartão.
Rotina permitirá aparecer mais uma forma de classificação : 06 - Modalidade/Termo/Campos Específicos/Nome Responsável. Caso a empresa não possua campos específicos cadastrados, então o sistema deverá apresentar a classificação da seguinte forma :Modalidade/Termo/NomeResponsável.
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 mc0510m.p, na leitura do termo de adesão.
Dentro do programa mc0510m.p, logo após ser selecionada em tela a opção "Renovação" e antes da pergunta de confirmação ao usuário.
Dentro do programa mc0510m.p, após a identificação do endereço da etiqueta do cartão.
???
Dentro do programa mc0510m.p, após receber contratante final.
Dentro do programa mc0510m.p, após cada chamada do programa mc0510m.i.
Ponto de Utilização
"RENOVA-CART"
"ANTES-RENOVA"
"ORDEM-CAMPPROP"
"ENDERECO"
"APOS-SELECAO"
"RENOVA-CART-BEN"
Include das definições das tabelas temporárias
cpc-mc0510m.i
  
Tabelas de entrada e saída
Tabela de entrada tmp-cpc-mc0510m-entrada
def temp-table tmp-cpc-mc0510l-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 propost.cd-modalidade
field cd-plano like propost.cd-plano
field cd-tipo-plano like propost.cd-tipo-plano
field nr-proposta like propost.nr-proposta
field nr-ter-adesao like propost.nr-ter-adesao
field r-usuario as rowid
field mostra-classif as handle
field lg-exc-prog-benef as log
field lg-selecao-aleatoria as log.
 
Definição campo a campo da tabela de entrada
in-evento-programa – Evento do programa que chama a cpc-mc0510m.p. Os valores desse campo podem ser: "ATU", "CRIAOPCLASS" ou "SELCAMPESP"
nm-ponto-chamada-cpc – Nome do ponto de chamada da cpc dentro do programa que a utiliza.:"RENOVA-CART" , "ANTES-RENOVA" e "ORDEM-CAMPPROP".
cd-modalidade – Código da modalidade de comercialização (somente para RENOVA-CART);
cd-plano – Código de identificação do Plano no produto (somente para RENOVA-CART);
cd-tipo-plano - Código de identificação do Tipo de Plano no produto (somente para RENOVA-CART);
nr-proposta – Número da proposta (somente para RENOVA-CART);
nr-ter-adesao- Número do termo de adesão (somente para RENOVA-CART);
r-usuario – Rowid do Usuário
mostra-classif – Utilizada para montar o sexto item de classificação(06 - Modalidade/Termo/Campos Específicos/Nome Responsável. Caso a empresa não possua campos específicos cadastrados, então o sistema deverá apresentar a classificação da seguinte forma :Modalidade/Termo/NomeResponsável.) 
lg-exc-prog-benef - Utilizada para marcar a exclusão programada
lg-selecao-aleatoria – Utilizada para marcar a seleção aletatoria
Tabela de entrada tmp-mc0510m-parametros – somente utilizada para o ponto "ANTES-RENOVA"
def temp-table tmp-cpc-mc0510m-parametros no-undo
field in-tipo-layout as int
field nr-linhas-cart as int
field lg-plano-nacional as log
field in-tipo-impressao as int
field lg-emite-etiqueta as log
field in-quant-copia as int
field lg-tipo-impressao as log
field in-quant-linha as int
field lg-pre-gerado as log
field nm-arq-carteiras as char
field lg-não-inadimplentes as log
field lg-inadimplentes as log
field nr-dias as int
field lg-pea as log
field lg-dt-parecer as log
field lg-proximo-mes as log
field lg-empresa-gp as log
field lg-exc-prog-benef as log
field lg-benef-suspenso as log
field in-suspensos as int
field lg-inc-prog as log
field lg-exc-prog as log
field in-uniplan as int
field lg-quebra as log
field lg-cobranca-cart as log
field lg-imprime-cart-rel as log
field lg-troca-car as log
field dt-mes-renov as int
field dt-ano-renov as int
field in-cancela-mes as int
field lg-dt-renovacao as log
field lg-lista-carteira as log
field mostra-classifini as char
field mostra-classif as char
field cd-empresa-ini as int
field cd-estabel-ini as int
field cd-estabel-fim as int
field cd-modalidade-ini as int
field cd-modalidade-fim as int
field cd-plano-ini as int
field cd-plano-fim as int
field cd-tipo-plano-ini as int
field cd-tipo-plano-fim as int
field cd-und-propost-ini as int
field cd-und-propost-fim as int
field cd-convenio-ini as int
field cd-convenio-fim as int
field nr-termo-ini as int
field nr-termo-fim as int
field cd-contratante-ini as int
field cd-contratante-fim as int.
 
Definição campo a campo da tabela tmp-mc0510m-parametros
in-tipo-layout – 1-Carteira, 2-Cartão magético;
nr-linhas-cart – numero de linhas do formulário;
lg-plano-nacional – indica se é plano nacional;
in-tipo-impressao – 1-Emissão/Reemissão, 2-Renovação, 3-Nova via;
lg-emite-etiqueta – indica se deve emitir etiquetas;
in-quant-copia – quantidade de cópias das etiquetas;
lg-tipo-impressao – Condensada ou Normal;
in-quant-linha – quantidade de linhas da etiqueta;
lg-pre-gerado – indica se imprime arquivo gerado;
nm-arq-carteiras – nome do arquivo gerado;
lg-não-inadimplentes – indica se renova não inadimplentes;
lg-inadimplentes – indica se renova inadimplentes;
nr-dias – numero de dias de inadimplencia para permitir renovar;
lg-pea – se renova proposta seguro assistencial;
lg-dt-parecer – se renova propostas com vencimento do tipo data parecer;
lg-proximo-mês – se renova propostas com vencimento do tipo próximo mês;
lg-empresa-gp – se renova termos de contratantes que utilizam GP;
lg-exc-prog-benef – se renova beneficiarios com exclusão programada;
lg-benef-suspenso – se renova beneficiários suspensos;
in-suspensos – 1-renova todos os suspensos, 2-permite selecionar o motivo da suspensão (os motivos selecionados são listados na temp tmp-mc0510m-motcange);
lg-inc-prog – se considera modulos com inclusão programada;
lg-exc-prog - se considera modulos com exclusão programada;
in-uniplan – 1-Sistema, 2-origem;
lg-quebra – quebra de página;
lg-cobranca-cart – se atualiza indicador de cobrança nova via para o beneficiário;
lg-imprime-cart-rel – se lista carteira com parametros impressão unidade destino;
lg-troca-car – se troca carteira para cartão;
dt-mes-renov – mês de vencimento para renovar;
dt-ano-renov – ano de vencimento para renovar;
in-cancela-mes – 1-corrente, 2-validade;
lg-dt-renovacao – se trata suspensos antes da renovação;
lg-lista-carteira – se lista carteira;
mostra-classifini – 1-Modalidade/Termo Adesão; 2-Código Contratante; 3-Nome Contratante; 3-Cod. Contratante / Modalidade / Termo; 5-Nome Contratante / Modalidade / Termo;
mostra-classif – 1-Cod. Responsável; 2-Nome Responsável; 3-Cod. Funcionário; 4-Unidade Destino/Cod. Responsável; 5-Unidade Destino/Nome Responsável;
 Os campos abaixo referem-se à seleção que o usuário informou:
cd-empresa-ini - empresa
cd-estabel-ini - estabelecimento
cd-estabel-fim
cd-modalidade-ini - modalidade
cd-modalidade-fim
cd-plano-ini - plano
cd-plano-fim
cd-tipo-plano-ini – tipo de plano
cd-tipo-plano-fim
cd-und-propost-ini - proposta
cd-und-propost-fim
cd-convenio-ini - convenio
cd-convenio-fim
nr-termo-ini – número do termo de adesão
nr-termo-fim
cd-contratante-ini – código do contratante
cd-contratante-fim
 
Tabela de entrada tmp-cpc-mc0510m-motcange – somente utilizada para o ponto "ANTES-RENOVA"
def temp-table tmp-cpc-mc0510M-motcange no-undo
field cd-motivo like motcange.cd-motivo
field ds-motivo like motcange.ds-motivo.
Definição campo a campo da tabela cpc-mc0510m-motcange – somente quando cpc-mc0510m-parametros in-suspensos tiver valor 2:
cd-motivo – código do motivo de suspensão do beneficiário
ds-motivo – descrição do motivo de suspensão do beneficiário
 
Tabela de saída tmp-cpc-mc0510m-saida
def temp-table tmp-cpc-mc0510m-saida no-undo
field lg-undo-retry as log
field ds-mensagem as char
field lg-continua as log initial yes
field cd-chave-esp as char
field cd-chave-esp-aux as char format "X(20)" extent 4
field ds-chave-esp-aux as char format "X(20)" extent 4
field lg-endereco-termo as log
field en-cep like contrat.en-rua
field en-rua like contrat.en-bairro
field en-cidade like contrat.en-cep
field en-bairro like contrat.en-uf
field en-uf like dzcidade.nm-cidade
field en-pais like dzestado.nm-pais
field lg-quebra-rel-campo-esp as log.
 
Definição campo a campo da tabela de saída
lg-undo-retry – Variável que controla se erros aconteceram dentro da CPC deve retornar SIM se erros aconteceram e NÃO se o processo foi concluído por completo.
ds-mensagem – descrição da mensagem de erro caso ocorra, dentro na cpc.
lg-continua – Log que informa se continua o processo ou não, conforme tratativa na cpc.
Cd-chave-esp – Conteúdo do campo especifico da da tabela USUARIO.
Lg-endereco-termo – Campo que indica se o endereço dos cartões deverá ser alterado;
En-cep – Campo que indica o CEP no endereço dos cartões;
En-rua – Campo que indica a Rua no endereço dos cartões;
En-cidade – Campo que indica a Cidade no endereço dos cartões;
En-bairro – Campo que indica o Bairro no endereço dos cartões;
En-uf – Campo que indida a UF no endereço dos cartões;
En-pais – Campo que indica o Pais no endereço dos cartões;
Lg-quebra-rel-campo-esp – Indicador para efetuar a quebra do relatório pela campo cd-chave-esp retornado. É importante frisar que está indicação de quebra para o relatório, somente será considerada caso no programa MC0510M o usuário informar que deseja efetuar a quebra do relatório, caso contrário este parâmetro será desconsiderado.