CPC-MC0510Q.P

• Rotina utilizada na importação batch da movimentação de beneficiários da contratante.
• Rotina utilizada para permitir ao usuário aprovar ou reprovar individualmente as alterações do nome e data de nascimento do beneficiário. Para isso as informações são mostradas num browse.
• Rotina utilizada após confirmação dos parâmetros de importaçã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 mc0510q.p, após localizar o contratante.
• Dentro do mc0510q.p, após receber o contratante e número do lote de importação.
• Dentro do mc0510q.p, após confirmar os parâmetros no processo de importação
• Dentro do mc0510q, após a carga ou importação de registros.

Ponto de Utilização

• "VER-CONTRAT"
• "ALTERA-VALOR"
• "DT-RECEB-ARQ"
• "IMPRIME-REL"
• "FIM-IMPORTA"
• "LISTA-BENEF"

Include das definições das tabelas temporárias

• cpc-mc0510q.i

Tabelas de entrada, saída e movimentos

Tabela de entrada tmp-cpc-mc0510q-entrada

def temp-table tmp-cpc-mc0510q-entrada           no-undo
         field in-evento-programa                as char format "x(06)"
         field nm-ponto-chamada-cpc              as char format "x(20)"          
         field cd-contratante                    like contrat.cd-contratante
         field nr-lote                           like ltimprep.nr-lote-imp
         field cd-modalidade                     like modalid.cd-modalidade         
         field nr-proposta                       like propost.nr-proposta           
         field nr-ter-adesao                     like propost.nr-ter-adesao         
         field cd-usuario                        like usuario.cd-usuario
         field nm-diretorio-war                  as char format "x(15)"
         field nm-diretorio                      as char format "x(15)"
         field lg-separa-avisos                  as log
         field h-temp-erros                      as handle
         field ds-chamador                   as char.
Definição campo a campo da tabela de entrada

• in-evento-programa – Evento do programa que chama a cpc-mc0510q.p. Valores possíveis: "CONSISTE", "CARGA", "IMPORTA", "REL-ACOMP", "LISTA".
• nm-ponto-chamada-cpc – Nome do ponto de chamada da cpc dentro do programa que a utiliza. 
• cd-contratante – Código do Contratante.
• nr-lote – Número do lote de importação.
• cd-modalidade - Código da modalidade.
• nr-proposta - Número da proposta.
• nr-ter-adesao - Número do termo de adesão.
• cd-usuario - Código do usuário.
• nm-diretorio-war – nome do diretório para impressão dos avisos. 
• nm-diretório – nome do diretório para impressão. 
• lg-separa-avisos – extensão do arquivo gerado. 
• h-temp-erros - Handle referente à temporária de erros.
• ds-chamador - Informa se o processo é rpw ou mcp.

Tabela de saída tmp-cpc-mc0510q–saida

def temp-table tmp-cpc-mc0510q-saida no-undo

field lg-undo-retry                                 as logical
field ds-mensagem-relatorio               as char format "x(75)"
field nm-contratante                              like contrat.nm-contratante
field nm-diretorio-arq-recebido           like pimpcont.nm-diretorio-arq-recebido
field dt-receb-arquivo                           as date.

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 acontecerem e NÃO se o processo foi concluído por completo.
• ds-mensagem-relatorio – Deve conter mensagens de erro caso ocorram.
• nm-contratante – Retorna o nome do contratante.
• nm-diretorio-arq-recebido – Retorna o caminho de onde está o arquivo para ser importado.
• dt-receb-arquivo – retorna a data que será considerada como inclusão e exclusão dos beneficiários oriundos do arquivo

Tabela de movimentos tmp-cpc-mc0510q–movtos

def temp-table tmp-cpc-mc0510q-movtos no-undo

field cd-mensagem                           like mensiste.cd-mensagem
field ds-mensagem                           like mensiste.ds-mensagem-sistema
field ds-complemento                       like mensiste.ds-mensagem-sistema
field in-tipo-mensagem                     like mensiste.in-tipo-mensagem
field ds-chave                                    as char format "x(50)"
field ds-chave-usuario                      as char format "x(60)"
field in-tipo-movimento                     as char format "x(1)"
field cd-modalidade                          like modalid.cd-modalidade
field nr-proposta                                like propost.nr-proposta
field nr-ter-adesao                             like ter-ade.nr-ter-adesao
field cd-usuario                                 like usuario.cd-usuario
field nm-usuario                                like usuario.nm-usuario
field lg-responsavel                          as log
field cd-responsavel                         like usuario.cd-titular
field cd-funcionario                           like usuario.cd-funcionario
field cd-grau-parentesco                  like usuario.cd-grau-parentesco
field dt-nascimento                           like usuario.dt-nascimento
index tmp-movtos1                                                           
              is primary cd-mensagem
index tmp-movtos2
              in-tipo-movimento.   

Definição campo a campo da tabela de movimentos

• cd-mensagem – Código de identificação da mensagem.
• ds-mensagem – Descrição da mensagem.
• ds-complemento– Complemento da mensagem.
• in-tipo-mensagem – Tipo da mensagem, Erro(E) ou Alerta(A).
• ds-chave – chave do registro que gerou a mensagem
• ds-chave-usuario – Informações do registro do usuário que gerou a mensagem
• in-tipo-movimento – Tipo de movimentação que gerou a mensagem
• cd-modalidade – Código da modalidade
• nr-proposta – Número da proposta
• nr-ter-adesao – Número do termo de adesão
• cd-usuario – Código do usuário
• nm-usuario – Nome do usuário
• lg-responsavel – Indica se o beneficiario é o responsável
• cd-responsavel – Código do beneficiário responsável
• cd-funcionario – Código do funcionário
• cd-grau-parentesco – Código do grau de parentesco
• dt-nascimento – Data de nascimento