Produto: | Gestão de Planos de Saúde |
Módulo: | Todos |
Versão: | 12.x.x |
Assuntos: | cpc-bosaudemographic.p |
Observação: Esta CPC somente é utilizada no Gestão de Planos 2.00.
Localização
Ponto de Utilização
Include das definições das tabelas temporárias
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
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
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