Histórico da Página

...

• "RENOVA-CART"
• "ANTES-RENOVA"
• "ORDEM-CAMPPROP"
• "ENDERECO"
• "APOS-SELECAO"
• "RENOVA-CART-BEN"
• "INI-TRATA-USUA"
• "ANTES-IMPRIME"
• "ATUALIZA-BENEF"
• "SELEC-PROPOST"
• "ANTES-ARQUIVO"
• "EMITE-REEMITE"
• "FIM-PROCESSO"
• "ANT-IMPRI-CART"
• "APOS-SELECAO"

Include das definições das tabelas temporárias

...

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

...

dt-fim                            like ter-ade.dt-fim
    field r-usuario                         as rowid
    field

...

r-

...

propost                        

...

as

...

rowid
    field

...

r-

...

car-

...

ide                    

...

    as rowid
   

...

field rec-usuario                      

...

as &if "{&rowid_ready}" = "yes" &then rowid &else recid &endif
    field mostra-classif                    as

...

handle
    field lg-exc-prog-benef                 as log
    field lg-selecao-aleatoria          

...

   as log                        
    field cd-lote      

...

                    as int            

...

  
    field in-tipo-impressao                 as int
    field in-tipo-layout                    as

...

int
    field lg-plano-nacional                 as log            

...

    field lg-

...

emite-

...

etiqueta                

...

as log
    field in-quant-

...

copia-etiq              

...

as int
    field lg-tipo-

...

impressao-

...

etiq            as log
    field in-quant-linhas-etiq              as int
   

...

field lg-

...

contrat-

...

origem                 as log              

...

    field lg-nao-inadimplentes              as log
    field lg-inadimplentes                  as log
    field nr-dias-inadimplentes             as int            

...

  
    field lg-pea

...

...

 as log
    field lg-data-parecer                   as log
   

...

field lg-proximo-mes                    as log              
   

...

field lg-empresa-gp                     as log
   

...

field lg-considera-cpt                  as log              
   

...

field lg-inc-prog                       as log
   

...

field lg-exc-prog                       as log               
   

...

field in-classifini                     as int
    field in-classificacao          

...

       as int

...

   
    field lg-quebra-aux                    

...

as log
    field nr-linhas-cart                    as int
   

...

field lg-imprime-tit

...

                   as log
    field cd-motivo-

...

suspensao              

...

as char format "x(1000)"
    field lg-benef-suspenso                 as log
   

...

field cd-userid                        

...

as char format "x(12)"
    field cdd-

...

seq                           as dec
    field h-usuarios                      

...

 as handle
    field h-buffer-

...

usuario                

...

 as handle
    field h-t-rel-

...

erros                     as handle
    field lg-card-presso                  

...

 as log
   
    /**CAMPOS DO LAYOUT*/
    field rec-propost                       as &if "{&rowid_ready}" = "yes" &then rowid &else recid &endif
    field rec-pla-sau                       as &if "{&rowid_ready}" = "yes" &then rowid &else recid &endif
    field rec-ti-pl-sa                      as &if "{&rowid_ready}" = "yes" &then rowid &else recid &endif
    field rec-contrat                        as &if "{&rowid_ready}" = "yes" &then rowid &else recid &endif
    field cd-cart-impressao                 as char
    field ct-est-carteiras                  as int
    field nr-cartao                         as char   
    field dt-valid-cartao                   like car-ide.dt-validade 
    field ds-linha-aux                      as char extent 12
   
    /** FIM CAMPOS LAYOUT */

    field h-buffer-tt-param                 as handle
    field nm-arq-carteiras                  as char
    field dt-exclusao-prog                  as date.

Definição campo a campo da tabela de entrada

• in-evento-programa – Evento do programa que chama a cpc-mc0510m.p;
• nm-ponto-chamada-cpc – Nome do ponto de chamada da cpc dentro do programa que a utiliza;
• cd-modalidade – Código da modalidade de comercialização;
• cd-plano – Código de identificação do Plano no produto;
• cd-tipo-plano - Código de identificação do Tipo de Plano no produto;
• nr-proposta – Número da proposta;
• nr-ter-adesao- Número do termo de adesão;
• dt-fim - 
• r-usuario – Rowid do Usuário
• r-propost - Rowid da proposta
• r-car-ide - Rowid da car-ide
• 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
• cd-lote – Número do lote
• in-tipo-impressão – Indica se na impressão da carteira deve deverá constar a unidade do sistema, origem ou destino.
• in-tipo-layout – Indica tipo de lay-out (1-Carteira ou 2-Cartao)
• lg-plano-nacional – Indicador para Plano Nacional.
• lg-emite-etiqueta – Indicador para emitir etiquetas aos contratantes automaticamente no momento em que estiverem sendo emitidas as carteiras/cartões.
• in-quant-copia-etiq – Número de etiquetas que serão emitidas
• lg-tipo-impressao-etiq – Indicador de tipo de impressão "Condensada/Normal"
• in-quant-linhas-etiq – Quantidade de linhas
• lg-contrat-origem – Indicador para imprimir Contratante Origem
• lg-nao-inadimplentes –  Indicador para imprimir carteira/cartão para os contratantes não inadimplentes
• lg-inadimplentes –  Indicador para imprimir carteira/cartão para os contratantes inadimplentes
• nr-dias-inadimplentes – Ao se selecionar o campo "Inadimplentes" será permitido selecionar contratantes inadimplentes acrescentando-se a quantidade de dias de inadimplência. Caso seja colocado 9999 como padrão então o sistema manterá a funcionalidade atual. Conforme a quantidade parametrizada o programa selecionará os contratantes baseados na sua inadimplência.
• lg-pea – Indicador para selecionar as propostas dos beneficiários que já estão sob a atuação do seguro assistencial (PEA,PCA etc..).
• lg-data-parecer – Indicador para selecionar proposta pela validade Data Parecer 
• lg-proximo-mes – Indicador para selecionar proposta pela validade Proximo Mes.
• lg-empresa-gp – Indicador para ler os beneficiários cuja suas empresas utilizam o modulo GP para gerenciamento das movimentações.
• lg-considera-cpt – Indicador para Considera CPT antes Dt.Incl.
• lg-inc-prog – Indicador para ler os beneficiários cujos módulos com inclusão programada
• lg-exc-prog – Indicador para ler os beneficiários cujos módulos com exclusão programada
• in-classifini – Indicador das classificações disponíveis para impressão do relatório de conferencia, isto é, qual a ordem que deve ser impresso o relatório.  
• in-classificacao – Indicador das subclassificações disponíveis para impressão do relatório de conferencia, isto é, qual a ordem que deve ser impresso o relatório.   
• lg-quebra-aux – Indicador para ter salto de página entre suas classificações.
• nr-linhas-cart – Indicador da quantidade de linhas a serem usadas para imprimir o formulário. 
• lg-imprime-tit – Indicador para impressão de titulares
• cd-motivo-suspensao – Código do motivo de suspensão dos usuários
• lg-benef-suspenso – Indicador para considerar os beneficiários que já se encontram suspensos.
• cd-userid – Código do usuário corrente que está utilizando o sistema
• cdd-seq – Número sequencial de beneficiários
• h-usuarios – Tabela temporária de usuários
• h-buffer-usuario  – Tabela temporária de usuários
• h-t-rel-erros – Tabela temporária de erros
• lg-card-presso -Indicador de cartão
• rec-propost - Recid da tabela propost

• rec-pla-sau  - Recid da tabela plano de saúde.

• rec-ti-pl-sa - Recid da tabela tipo de plano de saude

• rec-contrat - Recid da tabela de contratantes.

• cd-cart-impressao

• ct-est-carteiras 

• nr-cartao - Número do cartão

• dt-valid-cartao - Data de validade do cartão

• ds-linha-aux - Mensagens do cartão

• h-buffer-tt-param - Handle da tabela temporária de parâmetros

• nm-arq-carteiras - Nome do arquivo dos cartões/carteiras
• dt-exclusao-prog - Data de cancelamento do beneficiário

Tabela de entrada tmp-mc0510m-parametros  

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
• cd-lote
• in-tipo-impressao
• in-tipo-layout
• lg-plano-nacional
• lg-emite-etiqueta
• in-quant-copia-etiq
• lg-tipo-impressao-etiq
• in-quant-linhas-etiq
• lg-contrat-origem
• lg-nao-inadimplentes
• lg-inadimplentes
• nr-dias-inadimplentes
• lg-pea
• lg-data-parecer
• lg-proximo-mes
• lg-empresa-gp
• lg-considera-cpt
• lg-inc-prog
• lg-exc-prog
• in-classifini
• in-classificacao
• lg-quebra-aux
• nr-linhas-cart
• lg-imprime-tit
• cd-motivo-suspensao
• lg-benef-suspenso
• cd-userid
• cdd-seq 
• h-usuarios
• h-buffer-usuario – buffer do registro corrente da tabela usuário
• h-t-rel-erros - handle da temp-table t-rel-erros.

Tabela de entrada tmp-mc0510m-parametros – somente utilizada para o ponto "ANTES-RENOVA"

def temp-table tmp-cpc-mc0510m-parametros no-undo

...

Tabela de entrada tmp-cpc-mc0510m-motcange – somente utilizada para o ponto "ANTES-RENOVA" 

def temp-table tmp-cpc-mc0510M-motcange no-undo

...

• 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 -undo-retry as log
field ds-mensagem                      as as char
field lg-continua                          as 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 -endereco-termo as log
field en-cep                                 like contrat.en-rua
field en-rua                                 like contrat.en-bairro
field en-cidade                            like like contrat.en-cep
field en-bairro                            
field en-bairro like contrat.en-uf
field en-uf                                  like like dzcidade.nm-cidade
field en-pais                               like dzestado.nm-paislike dzestado.nm-pais
field lg-quebra-rel-campo-esp as log
field cd-lote as int
field cdd-seq as dec
field lg-quebranao-rel-campo-esp        as pede-arq 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.
• Cdcd-chave-esp – Conteúdo do campo especifico da da tabela USUARIO.
• Lglg-endereco-termo – Campo que indica se o endereço dos cartões deverá ser alterado;
• Enen-cep – Campo que indica o CEP no endereço dos cartões;
• Enen-rua – Campo que indica a Rua no endereço dos cartões;
• Enen-cidade – Campo que indica a Cidade no endereço dos cartões;
• Enen-bairro – Campo que indica o Bairro no endereço dos cartões;
• Enen-uf – Campo que indida a UF no endereço dos cartões;
• Enen-pais – Campo que indica o Pais no endereço dos cartões;
• Lglg-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.
• cd-lote – Número do lote
• cdd-seq – Número sequencial de beneficiários
• lg-nao-pede-arq – Indicador para solicitar nome do arquivo