CPC-MC0510L.P

• Rotina que permitirá realizar algumas consistências no termo de adesão antes de gerar as carteiras/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.
• Rotina que permitirá realizar a manipulação do endereço das etiquetas de cartão.
• 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 mc0510l.p, na leitura do termo de adesão.
• Dentro do programa mc0510l.p, após a identificação do endereço da etiqueta do cartão.

Ponto de Utilização

• "GERACAO"
• "ORDEM-CAMPPROP"
• "ENDERECO"
• "ANTES-IMPRIME"
• "EXCLUSAO-PROG"
• "ATUALIZ-BENEF"
• "SELEC-PROPOST"
• "REEMISSAO"
• "ANTES-ARQUIVO"
• "EMITE-REEMITE"
• "DATA-MOVIMENT"
• "FIM-PROCESSO"
• "INI-TRATA-USUA"
• "APOS-SELECAO"
• "ANT-IMPRI-CART"

Include das definições das tabelas temporárias

• cpc-mc0510l.i

Tabelas de entrada e saída

Tabela de entrada tmp-cpc-mc0510l-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
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 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-frame-selecao-aux           as handle
field ch-ep-codigo                      as char
field dt-moviment-inc                as date
field dt-mov-ini                          as date
field dt-mov-fim                         as date
field nm-prog-chamador           as char
field h-stream-relat                    as handle
field h-buffer-usuario                 as handle
field h-t-rel-erros                       as handle

field r-pla-sau as rowid
field r-ti-pl-sa as rowid
field r-contrat as rowid
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 format "x(60)" extent 12
field h-buffer-tt-param as handle
field lg-card-presso as log.

Definição campo a campo da tabela de entrada

• in-evento-programa – Evento do programa que chama a cpc-mc0510l.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
• 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/Nome Responsável.)
• lg-exc-prog-benef - Indica se o sistema deve ler inclusive os beneficiários que já se encontram excluídos com datas programadas (futuras).
• lg-selecao-aleatoria - Indica se a seleção será por intervalo ou por digitação aleatória de beneficiários.    
• cd-lote - Número do lote    
• in-tipo-impressao - Indica se na impressão do documento de identificação deve deverá constar a unidade do sistema, origem ou destino.           
• in-tipo-layout - Identifica o tipo de layout que deve ser impresso Carteira ou Cartão Magnético                      
• 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 - Quantidade de cópias              
• lg-tipo-impressao-etiq - Indica tipo de impressão Normal ou Condensada         
• in-quant-linhas-etiq - Indica a quantidade de linhas a serem usadas para imprimir o formulário.             
• lg-contrat-origem - Indica se imprime Contratante Origem              
• lg-nao-inadimplentes - Imprime carteira/cartão para os contratantes não inadimplentes.     
• lg-inadimplentes - Imprime 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 - Significa que o sistema deve ler inclusive as propostas dos beneficiários que já estão sob a atuação do seguro assistêncial                     
• lg-data-parecer - Indica quando inicia a validade da proposta data parecer 
• lg-proximo-mes - - Indica quando inicia a validade da proposta próximo mês                   
• lg-empresa-gp - Significa que o sistema deve ler inclusive os beneficiários cuja suas empresas utilizam o modulo GP para gerenciamento das movimentações.
• lg-considera-cpt - Significa que o sistema deve ler inclusive os beneficiários com CPT antes Data Inclusão         
• lg-inc-prog - Significa que o sistema deve ler inclusive os beneficiários cujos módulos ainda não estão disponíveis no momento da execução do processo.
• lg-exc-prog - Significa se o sistema deve ler inclusive os beneficiários cujos módulos já se encontram excluídos com datas programadas (futuras).
• in-classifini - Tipo de classificação do relatório                           
• lg-quebra-aux - Indicador para efetuar a quebra do relatório, significa se o mesmo deve ter salto de página entre suas classificações.                     
• nr-linhas-cart - Numero de linhas do formulário de carteiras                  
• lg-imprime-tit - Indica se deve imprimir titulares                  
• cd-motivo-suspensao - Seleção de motivos de suspensão       
• lg-benef-suspenso - Significa que o sistema deve ler inclusive os beneficiários que já se encontram suspensos podendo ser selecionados todos os tipos de suspensos, ou selecionados por tipo de seleção seleciona, casos esse seja marcado, então será aberto um browse para selecionar os motivos de suspensão.           
• cd-userid - Usuário do sistema.
• cdd-seq - Número sequencial.
• h-usuarios - Tabela de usuários.
• h-frame-selecao-aux - Tabela de seleção.
• ch-ep-codigo  -     
• dt-moviment-inc - Data do movimento de inclusão.
• dt-mov-ini - Seleção inicial de movimento de inclusão.
• dt-mov-fim - Seleção final de movimento de inclusão.
• nm-prog-chamador - Nome do programa chamador.
• h-stream-relat - Tabela de listagem dos campos de seleção do relatório.
• h-buffer-usuario - Handle do buffer tabela usuário.
• h-t-rel-erros - Handle da tabela temporária t-rel-erros.
• r-pla-sau - Rowid da tabela plano de saúde.
• r-ti-pl-sa - Rowid da tabela tipo de plano de saúde.
• r-contrat - Rowid 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
• lg-card-presso - Log 

Tabela de saída tmp-cpc-mc0510l-saida

def temp-table tmp-cpc-mc0510l-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

field lg-mens-arq                        as log
field cd-lote                                as int
field cdd-seq                              as dec
field lg-selecao-aleatoria           as log
field lg-nao-pede-arq                as log
field dt-fim-valid-cart-magn       as date
field dt-ini-movimento               as date
field dt-fim-movimento               as date
field ch-ep-codigo-aux             as char

field h-retorno                         as handle.

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 MC0510L o usuário informar que deseja efetuar a quebra do relatório, caso contrário este parâmetro será desconsiderado.
• lg-mens-arq - Mensagem de retorno   
• cd-lote - Número do lote                            
• cdd-seq - Número sequencial                                 
• lg-selecao-aleatoria - Indica se a seleção será por intervalo ou por digitação aleatória de beneficiários.         
• lg-nao-pede-arq - Indica se deverá ser solicitado nome de arquivo diferente do padrão               
• dt-fim-valid-cart-magn - Data validade do documento de identificação      
• dt-ini-movimento - Seleção inicial de movimento de inclusão              
• dt-fim-movimento - Seleção final de movimento de inclusão            
• ch-ep-codigo-aux -      
• h-retorno  - Tabela temporária de retorno.