CPC-FP0610W1.p

• Rotina que passa a tabela temporária de valores por beneficiário para que o cliente possa tratar as informações como desejar. Antigo ponto 3 do fp0610wx.p.
• 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 fp0610w.p, na rotina que retorna a faixa etária do beneficiário. 

Ponto de Utilização

• "EXP-VAL-BENEF"

Include das definições das tabelas temporárias

• cpc-fp0610w1.i

Tabelas de entrada e saída

Tabela de entrada tmp-cpc-fp0610w1-entrada

def temp-table tmp-cpc-fp0610w1-entrada no-undo

field in-evento-programa                           as char format "x(10)"
field nm-ponto-chamada-cpc                    as char format "x(15)".

Definição campo a campo da tabela de entrada tmp-cpc-fp0610w1-entrada

• in-evento-programa – Evento do programa que chama a cpc-fp0610w.p. O valor desse campo pode ser:
• "EXP-VL-BEN".
• nm-ponto-chamada-cpc – Nome do ponto de chamada da cpc dentro do programa que a utiliza. Para o programa fp0610w.i1:
• "EXP-VAL-BENEF"

Tabela de entrada tmp-cpc-valor-beneficiario

def temp-table tmp-cpc-valor-beneficiario

field cd-modalidade                                like modalid.cd-modalidade
field ds-modalidade                                like modalid.ds-modalidade
field cd-contratante                                 like contrat.cd-contratante
field nm-contratante                                like contrat.nm-contratante
field cd-contratante-origem                    like propost.cd-contrat-origem
field nm-contratante-origem-aux           like contrat.nm-contratante
field nr-ter-adesao                                  like ter-ade.nr-ter-adesao
field cd-plano                                          like pla-sau.cd-plano
field nm-plano                                         like pla-sau.nm-plano-reduz
field cd-tipo-plano                                  like ti-pl-sa.cd-tipo-plano
field nm-tipo-plano                                like ti-pl-sa.nm-tipo-plano
field dt-referencia                                  as char format "x(7)"
field nr-titulo                                           as char format "x(9)"
field dt-emissao                                    as date
field dt-vencimento                               as date
field vl-nota                                            like notaserv.vl-total
field cd-titular                                        like usuario.cd-titular
field nm-titular                                       like usuario.nm-usuario
field cd-usuario                                     like usuario.cd-usuario
field nm-usuario                                    like usuario.nm-usuario
field cd-pad-cob                                    like usuario.cd-padrao-cobertura
field cd-unidade                                     like propost.cd-unimed
field ds-unidade                                    as char format "x(19)"
field dt-inclusao                                    like usuario.dt-inclusao-plano
field gr-parentesco                               like gra-par.cd-grau-parentesco
field ds-parentesco                               like gra-par.ds-grau-parentesco
field nr-faixa-etaria                               like pl-gr-pa.nr-faixa-etaria
field ds-faixa                                         as char format "x(9)"
field cd-evento                                      like evenfatu.cd-evento
field cd-modulo                                     like pla-mod.cd-modulo
field qt-evemod                                     like fatueven.qt-evento
field vl-evemod                                     like fatueven.vl-evento
field dt-nascimento                               like usuario.dt-nascimento
field vl-total                                           like notaserv.vl-total
field nr-sequencia                                  like notaserv.nr-sequencia
field in-tipo-nota                                     like notaserv.in-tipo-nota
field mm-referencia                               like fatgrmod.mm-referencia
field aa-referencia                                  like fatgrmod.aa-referencia
field cd-forma-pagto-modu                    like pro-pla.cd-forma-pagto
field cd-carteira-inteira                          like car-ide.cd-carteira-inteira
field in-classe-evento                            like evenfatu.in-classe-evento
field cd-grau-parent-mes-fat                  like usuario.cd-grau-parentesco
field nr-fatura                                          like fatura.nr-fatura
field nr-proposta                                     like propost.nr-proposta
field lg-cred-deb                                     like evenfatu.lg-cred-deb
index tmp-valor-beneficiario-1 cd-modalidade
nr-ter-adesao
nr-sequencia
cd-titular
cd-usuario
cd-pad-cob
cd-evento
cd-modulo
index tmp-valor-beneficiario-2 cd-modalidade
nr-ter-adesao
nr-sequencia
nm-titular
cd-usuario
cd-pad-cob
cd-evento
cd-modulo
index tmp-valor-beneficiario-3 cd-unidade
cd-modalidade
nr-ter-adesao
nr-sequencia
cd-titular
cd-usuario
cd-pad-cob
cd-evento
cd-modulo
index tmp-valor-beneficiario-4 cd-unidade
cd-modalidade
nr-ter-adesao
nr-sequencia
nm-titular
cd-usuario
cd-pad-cob
cd-evento
cd-modulo
index tmp-valor-beneficiario-5 cd-unidade
cd-modalidade
cd-contratante-origem
nr-ter-adesao
nr-sequencia
cd-titular
cd-usuario
cd-pad-cob
cd-evento
cd-modulo
index tmp-valor-beneficiario-6 cd-unidade
cd-modalidade
cd-contratante-origem
nm-titular
nr-ter-adesao
nr-sequencia
cd-usuario
cd-pad-cob
cd-evento
cd-modulo
index tmp-valor-beneficiario-7 cd-modalidade
nr-ter-adesao
mm-referencia
aa-referencia
nr-sequencia
cd-evento
cd-modulo
cd-usuario.

Definição campo a campo da tabela de entrada tmp-cpc-valor-beneficiario

• cd-modalidade – Modalidade do termo da nota de serviço;
• ds-modalidade – Descrição da modalidade do termo da nota de serviço;
• cd-contratante – Código do contratante da nota de serviço;
• nm-contratante – Nome do contratante da nota de serviço;
• cd-contratante-origem – Código do contratante origem da nota de serviço;
• nm-contratante-origem-aux – Nome do contratante origem da nota de serviço;
• nr-ter-adesao – Número do termo de adesão da nota de serviço;
• cd-plano – Código do plano do termo da nota de serviço;
• nm-plano – Descrição do plano do termo da nota de serviço;
• cd-tipo-plano – Código do tipo de plano do termo da nota de serviço;
• nm-tipo-plano – Descrição do tipo de plano do termo da nota de serviço;
• dt-referencia - Mês e ano de referência da nota de serviço;
• nr-titulo – Número do título gerado;
• dt-emissao – Data de emissão da nota de serviço;
• dt-vencimento - Data de vencimento da nota de serviço;
• vl-nota – Valor total da nota de serviço;
• cd-titular – Código do titular do beneficiário;
• nm-titular – Nome do titular do beneficiário;
• cd-usuario – Código do beneficiário;
• nm-usuario – Nome do beneficiário;
• cd-pad-cob – Padrão de cobertura do beneficiário;
• cd-unidade – Código da unidade da proposta;
• ds-unidade – Descrição da unidade da proposta;
• dt-inclusao – Data de inclusão do beneficiário no termo;
• gr-parentesco – Grau de parentesco do beneficiário;
• ds-parentesco – Descrição do grau de parentesco do beneficiário;
• nr-faixa-etaria – Número da faixa etária do beneficiário;
• ds-faixa – Descrição da faixa etária do beneficiário;
• cd-evento – Código do evento da nota;
• cd-modulo – Código do módulo da nota;
• qt-evemod – Quantidade do evento para o beneficiário (sempre igual a 1);
• vl-evemod – Valor do evento e módulo do beneficiário;
• dt-nascimento – Data de nascimento do beneficiário;
• vl-total – Valor acumulado do beneficiário por evento;
• nr-sequencia – Número da seqüência da nota;
• in-tipo-nota – Tipo da nota;
• mm-referencia – Mês de referência da nota;
• aa-referencia – Ano de referência da nota;
• cd-forma-pagto-modu – Código da forma de pagamento do módulo;
• cd-carteira-inteira – Código da carteirinha do beneficiário;
• in-classe-evento – Classe do evento da nota;
• cd-grau-parent-mes-fat – Grau de Parentesco do usuário da nota de serviço.
• nr-fatura – número da fatura.
• nr-proposta – número da proposta.l
• g-cred-deb – Log que indica se o evento é de debito ou crédito.

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

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

field lg-undo-retry                                      as logical
field ds-mensagem-relatorio                     as char format "x(75)".

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 mensagem de erro ou qualquer outro tipo de mensagem.