| Tabela |
| GBH |
Dados Adicionais de Pacientes |
| Campo |
Tipo |
Tamanho |
Decimal |
Titulo |
Formato |
Validacao |
F3 |
Contexto |
Lista |
Condicao |
PYME |
| GBH_FILIAL |
C |
2 |
0 |
Filial |
|
|
|
|
|
|
N |
| GBH_CODPAC |
C |
6 |
0 |
Cod Paciente |
|
existchav("GBH",M->GBH_CODPAC) |
|
|
|
|
N |
| GBH_SEXO |
C |
1 |
0 |
Sexo |
@! |
Pertence("0/1") |
|
|
0=Masculino;1=Feminino |
|
N |
| GBH_NOME |
C |
45 |
0 |
Paciente |
@! |
NaoVazio() .And. HS_VerDigi(M->GBH_NOME).AND. HS_VERBTS(2,M->GBH_NOME) |
|
R |
|
|
N |
| GBH_DTNASC |
D |
8 |
0 |
Data Nascto |
|
Hs_VldA58() |
|
|
|
|
N |
| GBH_NOMMAE |
C |
45 |
0 |
Nome da Mae |
@! |
|
|
|
|
|
N |
| GBH_RG |
C |
15 |
0 |
R.G. |
|
|
|
|
|
|
N |
| GBH_ORGEMI |
C |
3 |
0 |
Org. Emissor |
@! |
HS_VldA58() |
64 |
R |
|
|
N |
| GBH_UFEMIS |
C |
2 |
0 |
UF Emissor |
@! |
HS_VldA58() |
12 |
R |
|
|
N |
| GBH_CPF |
C |
11 |
0 |
C.P.F. |
@R 999.999.999-99 |
Vazio() .or. HS_VldA58() |
|
R |
|
|
S |
| GBH_NOMPAI |
C |
45 |
0 |
Nome do Pai |
@! |
|
|
R |
|
|
N |
| GBH_IDADE |
C |
10 |
0 |
Idade |
|
|
|
V |
|
|
N |
| GBH_ESTCIV |
C |
1 |
0 |
Estado Civil |
@! |
Pertence("0/1/2/3/4") |
|
R |
0=Casado;1=Solteiro;2=Divorciado;3=Amasiado;4=Viuvo |
|
N |
| GBH_NOMCJG |
C |
40 |
0 |
Nome Conjuge |
@! |
|
|
R |
|
|
N |
| GBH_CEP |
C |
8 |
0 |
CEP |
@R 99999-999 |
FS_RetCpos("GBH") .And. HS_VldA58() |
GAM001 |
|
|
|
N |
| GBH_MUN |
C |
20 |
0 |
Municipio |
|
HS_VldA58() |
|
R |
|
|
N |
| GBH_EST |
C |
2 |
0 |
U.F. |
@! |
ExistCpo("SX5","12"+M->GBH_EST) .And. HS_VldA58() |
12 |
|
|
|
N |
| GBH_END |
C |
40 |
0 |
Endereco |
@! |
HS_VldA58() |
|
|
|
|
N |
| GBH_NUM |
C |
4 |
0 |
Numero |
9999 |
HS_VldA58() |
|
|
|
|
N |
| GBH_BAIRRO |
C |
30 |
0 |
Bairro |
|
HS_VldA58() |
|
|
|
|
N |
| GBH_COMPLE |
C |
15 |
0 |
Complemento |
@! |
HS_VLDA58() |
|
R |
|
|
S |
| GBH_CEPCOM |
C |
8 |
0 |
CEP Comercia |
@R 99999-999 |
FS_RetCpos('GBH') .And. HS_VldA58() |
GAM001 |
R |
|
|
N |
| GBH_MUNCOM |
C |
20 |
0 |
Munic. Comer |
@! |
|
|
R |
|
|
N |
| GBH_ESTCOM |
C |
2 |
0 |
U.F. Comerci |
@! |
HS_VldA58() |
12 |
R |
|
|
N |
| GBH_ENDCOM |
C |
40 |
0 |
End. Comerci |
@! |
|
|
R |
|
|
N |
| GBH_NUMCOM |
C |
4 |
0 |
Num. Comerci |
9999 |
|
|
R |
|
|
N |
| GBH_BAICOM |
C |
30 |
0 |
Bairro Comer |
@! |
|
|
R |
|
|
N |
| GBH_COMPCO |
C |
8 |
0 |
Compl. Comer |
@! |
|
|
R |
|
|
N |
| GBH_TELCOM |
C |
13 |
0 |
Tel. Comerci |
@! |
HS_VldA58() |
|
R |
|
|
N |
| GBH_PROFIS |
C |
6 |
0 |
Cod. Profiss |
@! |
HS_VldA58() |
GH1001 |
R |
|
|
N |
| GBH_DSPROF |
C |
50 |
0 |
Desc. Prof. |
@! |
|
|
V |
|
|
N |
| GBH_NATURA |
C |
20 |
0 |
Naturalidade |
@! |
|
|
|
|
|
N |
| GBH_CODNAC |
C |
6 |
0 |
Nacionalidad |
@! |
HS_VldA58() |
34 |
R |
|
|
N |
| GBH_DESNAC |
C |
55 |
0 |
Descricao |
@! |
|
|
V |
|
|
N |
| GBH_CORPEL |
C |
1 |
0 |
Cor da Pele |
@! |
Pertence("0123") |
|
R |
0=Branca;1=Negra;2=Morena;3=Parda |
|
N |
| GBH_ESCOLA |
C |
1 |
0 |
Escolaridade |
@! |
Pertence("1/2/3/4") |
|
R |
1=1o Grau;2=2o Grau;3=Superior;4=Sem Instrucao |
|
N |
| GBH_RELIGI |
C |
20 |
0 |
Religiao |
@! |
|
|
R |
|
|
N |
| GBH_PACENV |
C |
1 |
0 |
P.Envelopado |
@! |
|
|
|
|
|
N |
| GBH_TEL |
C |
13 |
0 |
Telefone |
@R (99)99999-9999 |
HS_VldA58() |
|
R |
|
|
N |
| GBH_CDFORE |
C |
6 |
0 |
Forma Recrut |
@! |
|
GGT001 |
R |
|
|
N |
| GBH_DSFORE |
C |
50 |
0 |
Descricao |
@! |
|
|
V |
|
|
N |
| GBH_TPSANG |
C |
3 |
0 |
Tp. Sangue |
@! |
|
|
R |
0=A;1=B;2=AB;3=O |
|
N |
| GBH_FATORH |
C |
3 |
0 |
Fator Rh |
@! |
|
|
R |
0=Rh+;1=Rh- |
|
N |
| GBH_CODEMP |
C |
6 |
0 |
Cod. Empresa |
@! |
HS_VldA58() |
GAE |
R |
|
|
N |
| GBH_DESEMP |
C |
30 |
0 |
Nome Empresa |
@! |
|
|
V |
|
|
S |
| GBH_DATCAD |
D |
8 |
0 |
Dt.Cad. |
|
|
|
R |
|
|
S |
| GBH_HORCAD |
C |
5 |
0 |
Hr.Cad. |
99:99 |
|
|
R |
|
|
S |
| GBH_CODCLI |
C |
6 |
0 |
Cod. Cliente |
@! |
|
|
R |
|
!INCLUI |
N |
| GBH_LOJA |
C |
2 |
0 |
Loja |
@! |
|
|
R |
|
!INCLUI |
N |
| GBH_USRCAD |
C |
25 |
0 |
Usuar.Cad |
@! |
|
|
R |
|
|
S |
| GBH_CODLOC |
C |
2 |
0 |
Setor Cad. |
99 |
HS_VldA58() |
GCS |
R |
|
lEdtCodLoc |
S |
| GBH_NUMCP |
C |
7 |
0 |
Cart.Profis. |
@R 999.999 |
|
|
R |
|
|
S |
| GBH_NOMLOC |
C |
30 |
0 |
Nome |
@! |
|
|
V |
|
|
S |
| GBH_IDPATE |
C |
1 |
0 |
Pac. Atend. |
@! |
Pertence("01") |
|
R |
|
|
N |
| GBH_LOGARQ |
C |
50 |
0 |
LOG |
|
|
|
R |
|
|
N |
| GBH_BITMAP |
C |
8 |
0 |
Foto |
|
|
|
R |
|
|
N |
| GBH_EMAIL |
C |
45 |
0 |
E-Mail |
@! |
|
|
R |
|
|
N |
| GBH_CDINAP |
C |
6 |
0 |
Cd. Inaptida |
@! |
HS_SeekRet('GGN','M->GBH_CDINAP',1,.f.,'GBH_DSINAP','GGN_DSINAP') |
GGN001 |
R |
|
|
N |
| GBH_DSINAP |
C |
30 |
0 |
Descricao |
@! |
|
|
V |
|
|
N |
| GBH_ANTPES |
C |
6 |
0 |
Antec. Pes. |
|
|
|
R |
|
|
N |
| GBH_ANTFAM |
C |
6 |
0 |
Antec. Fam. |
|
|
|
R |
|
|
N |
| GBH_ANTOBS |
C |
6 |
0 |
Antec. OBS. |
|
|
|
R |
|
|
N |
| GBH_NUMCNS |
C |
15 |
0 |
Numero CNS |
@! |
|
|
R |
|
|
N |
| GBH_TIPLOG |
C |
3 |
0 |
Tipo Lograd. |
@! |
HS_VldA58() |
|
R |
|
|
N |
| GBH_PACSUS |
C |
1 |
0 |
Paciente SUS |
@! |
Pertence('01') |
|
R |
0=Nao;1=Sim |
|
N |
| GBH_CODFOR |
C |
6 |
0 |
Cod Fornec |
@! |
|
|
R |
|
|
N |
| GBH_CLIORI |
C |
6 |
0 |
Cod. Cliente |
@! |
|
|
R |
|
!INCLUI |
N |
| GBH_MATVID |
C |
8 |
0 |
Codig. Vida |
@! |
|
|
R |
|
|
S |
| GBH_JUSCNS |
C |
50 |
0 |
Just. CNS |
!@ |
|
|
R |
|
|
S |
| GBH_USUARI |
C |
17 |
0 |
Carteirinha |
@! |
|
|
R |
|
|
S |
