CPC-BOSAUDEMOGRAPHIC.p

Observação: Esta CPC somente é utilizada no Gestão de Planos 2.00.

• Rotina para validar dados da pessoa-fisica antes de aplicar uma atualização na base de dados. É possível atualizar valores e retornar mensagens, conforme a necessidade do cliente.
• 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 da bosaudemographic.p.

Ponto de Utilização

• "CONSIST-PFISICA"
• "ANTES-AUDIT"
• "ANTES-EMAIL"

Include das definições das tabelas temporárias

• cpc-bosaudemographic.i

Tabelas de entrada e saída

Tabela de entrada: tmp-cpc-bosaudemographic-entrada

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

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

Definição campo a campo da tabela de entrada

• • nm-ponto-chamada-cpc – Nome do ponto de chamada da cpc dentro do programa que a utiliza. Para o programa BOSAUDEMOGRAPHIC.P o valor possível é "CONSIST-PFISICA";
  • in-evento-programa – Evento do programa que chama CPC-BOSAUDEMOGRAPHIC.P. O valor desse campo deve ser "VALIDA";

Tabela de entrada/saída com os dados da pessoa física: tmp-cpc-bosaudemographic-dados

def temp-table tmp-cpc-bosaudemographic-dados no-undo

field id-pessoa                                      like pessoa-fisica.id-pessoa
field nm-pessoa                                    like pessoa-fisica.nm-pessoa
field cd-cpf                                            like pessoa-fisica.cd-cpf
field dt-nascimento                               like pessoa-fisica.dt-nascimento
field in-estado-civil                               like pessoa-fisica.in-estado-civil
field cd-cbo                                           like pessoa-fisica.cd-cbo
field lg-sexo                                          like pessoa-fisica.lg-sexo
field nr-identidade                                 like pessoa-fisica.nr-identidade
field uf-emissor-ident                           like pessoa-fisica.uf-emissor-ident
field nm-cartao                                     like pessoa-fisica.nm-cartao
field nm-internacional                          like pessoa-fisica.nm-internacional
field ds-nacionalidade                          like pessoa-fisica.ds-nacionalidade
field ds-natureza-doc                           like pessoa-fisica.ds-natureza-doc
field nr-pis-pasep                                 like pessoa-fisica.nr-pis-pasep
field nm-mae                                        like pessoa-fisica.nm-mae
field nm-pai                                          like pessoa-fisica.nm-pai
field nm-conjuge                                  like pessoa-fisica.nm-conjuge
field ds-orgao-emissor-ident               like pessoa-fisica.ds-orgao-emissor-ident
field nm-pais-emissor-ident                like pessoa-fisica.nm-pais-emissor-ident
field dt-emissao-ident                          like pessoa-fisica.dt-emissao-ident
field nr-cei                                            like pessoa-fisica.nr-cei
field cd-cartao-nacional-saude            like pessoa-fisica.cd-cartao-nacional-saude.

Definição campo a campo da tabela tmp-cpc-bosaudemographic-dados

• • id-pessoa – código identificador da pessoa física no sistema
  • nm-pessoa – nome da pessoa
  • cd-cpf – CPF da pessoa
  • dt-nascimento – data de nascimento da pessoa
  • in-estado-civil - estado civil da pessoa: 1-solteiro, 2-casado, 3-viuvo, 4-divorciado, 5-outros
  • cd-cbo – código brasileiro de ocupações
  • lg-sexo – sexo: yes-masculino, no-feminino
  • nr-identidade – número da identidade
  • uf-emissor-ident – UF emissor da identidade
  • nm-cartao – nome da pessoa para o cartão magnético
  • nm-internacional – nome internacional da pessoa
  • ds-nacionalidade – nacionalidade
  • ds-natureza-doc – natureza da identidade
  • nr-pis-pasep – número do pis/pasep
  • nm-mae – nome da mãe
  • nm-pai – nome do pai
  • nm-conjuge – nome do conjuge
  • ds-orgao-emissor-ident – orgão de emissão da identidade
  • nm-pais-emissor-ident – país de emissão da identidade
  • dt-emissao-ident – data de emissão da identidade
  • nr-cei – número do CEI da pessoa
  • cd-cartao-nacional-saude – número do cartão nacional de sáude

Tabela de entrada com os dados dos contatos: tmp-cpc-bosaudemographic-contato

def temp-table tmp-cpc-bosaudemographic-contato no-undo like contato-pessoa.

Tabela de saída: tmp-cpc-bosaudemographic-saida

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

field lg-erro                                           as logical
field ds-mensagem                              as char format "x(75)"
field lg-retorna                                     as logical.

Definição campo a campo da tabela de saída

• • lg-erro – Variável que controla os erros que podem ocorrer na CPC.
  • ds-mensagem – Variável que recebe a descrição dos erros que ocorreram na CPC.
  • lg-retorna – indica se deve retornar ou se deve continuar o processo normal do produto.