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 rec-propost as recid
field rec-pla-sau as recid
field rec-ti-pl-sa as recid
field rec-contrat as recid
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
field h-buffer-tt-param as handle.

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  

...

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
field cd-lote as int
field cdd-seq as dec
field lg-nao-pede-arq as logfield lg-card-presso 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.
• cd-lote – Número do lote
• cdd-seq – Número sequencial de beneficiários
• lg-nao-pede-arq – Indicador para solicitar nome do arquivolg-card-presso - Indicador de cartão