Tabela: TM0 - Ficha Médica


Arquivos atualizado em 08/12/2020, com pacotes até 04/12/2020


Tabela(SX2)
X2_NOMEX2_UNICOX2_SYSOBJ
Ficha MédicaTM0_FILIAL+TM0_NUMFIC




Indices(SIX)
OrdemChaveDescriçãoNickName
1TM0_FILIAL+TM0_NUMFICFicha Médica
2TM0_FILIAL+TM0_NOMFICNome
3TM0_FILFUN+TM0_MAT+TM0_NUMDEPFilial Func. + Matrícula + Dependente
4TM0_FILIAL+TM0_FICANTFicha Anter.
5TM0_FILIAL+TM0_CANDIDCandidato
6TM0_FILIAL+TM0_RGR.G.
7TM0_FILIAL+TM0_CC+TM0_NUMFICCentro Custo + Ficha Médica
8TM0_FILIAL+TM0_CLIENT+TM0_LOJA+TM0_NUMFICCliente + Loja + Ficha Médica
9TM0_FILIAL+TM0_CODFUN+TM0_NUMFICFunção + Ficha Médica
ATM0_FILIAL+TM0_CPFCPF
BTM0_FILIAL+TM0_MATMatrícula







Campos(SX3)
X3_CAMPO X3_TITULO X3_DESCRIC HELP Campo X3_TIPO X3_TAMANHO X3_DECIMAL X3_PICTURE X3_VALID X3_RELACAO X3_F3 X3_TRIGGER X3_BROWSE X3_VISUAL X3_CONTEXT X3_CBOX X3_WHEN X3_INIBRW X3_GRPSXG X3_FOLDER X3_CONDSQL X3_CHKSQL X3_AGRUP X3_POSLGT X3_MODAL
TM0_FILIAL FILIAL FILIAL DO SISTEMA Código da filial da empresa. Campo alimentado automaticamente pelo módulo de Medicina e Segurança do Trabalho com base no campo filial. C 2 0 Nao Altera Virtual 033 1 2
TM0_NUMFIC Ficha Médica Numero da Ficha Medica Número da Ficha Médica utilizado para criar relacionamento com as demais tabelas do sistema. Se for dependente poderá utilizar a matrícula do pai mais o número sequencial do dependente. Campo alimentado automaticamente pelo módulo de Medicina e Segurança do Trabalho com base no campo número da Ficha Médica. C 9 0 999999999 EXISTCHAV("TM0",M->TM0_NUMFIC) GETSXENUM("TM0","TM0_NUMFIC") Sim Vizualiza Virtual 1 1
TM0_CANDID Candidato Candidato a Emprego Número do candidato no arquivo de candidatos. C 6 0 @! VERCANDID() Sim Altera Virtual 1 2
TM0_FILFUN Filial Func. Filial do Funcionario Número da filial do Funcionário. Campo alimentado automaticamente pelo módulo de Medicina e Segurança do Trabalho com base no campo filial do funcionário. C 2 0 Sim Vizualiza Virtual 033 1 2
TM0_MAT Matrícula Matricula do Funcionario Matrícula do Funcionário. Pressione as teclas [Enter]+[F3] para selecionar um Funcionário. C 6 0 @! MDT005MAVD(M->TM0_MAT) SRA Sim Altera Virtual 121 1 2
TM0_NUMDEP Dependente Numero do Dependente Número do dependente do Funcionário. Pressione as teclas [Enter]+[F3] para selecionar um dependente do Funcionário. C 2 0 @! CHECKDEP() NGC Sim Altera Virtual 1 2
TM0_NOMFIC Nome Nome Proprietario Ficha Nome do paciente, que poderá ser: funcionário, dependente de funcionário, ou terceiros. C 40 0 @! MDT005VALC(TM0->TM0_NOMFIC, M->TM0_NOMFIC) Sim Altera Virtual Type('lChamTKD') == 'U' 1 1
TM0_DTIMPL Data Impl. Data Implantacao Ficha Data em que foi criada a Ficha Médica. D 8 0 MDT005DT(M->TM0_DTIMPL) Sim Altera Virtual 1 1
TM0_DOADOR Doador Doador de Sangue Indica se o funcionário é doador ou não. C 1 0 @! IF(INCLUI,"2",TM0->TM0_DOADOR) Sim Altera Virtual 1=Sim;2=Nao 1 2
TM0_DTDOAC Data Doação Data Ultima Doacao Data da última doação de sangue. D 8 0 MDT005DT(M->TM0_DTDOAC) Sim Altera Virtual 1 2
TM0_SANGUE Tipo Sangue Tipo de Sangue Tipo Sanguíneo. 1=A; 2=B; 3=AB; 4=O; 5=NI. C 1 0 @! IF(INCLUI,"5",TM0->TM0_SANGUE) Sim Altera Virtual 1=A;2=B;3=AB;4=O;5=NI 1 2
TM0_FATORH Fator RH Fator RH do Sangue Fator RH. 1=Positivo; 2=Negativo. C 1 0 @! IF(INCLUI,"1",TM0->TM0_FATORH) Sim Altera Virtual 1=Positivo;2=Negativo 1 2
TM0_FICANT Ficha Anter. Ficha Anterior Número da Ficha Médica anterior. C 12 0 @! Sim Altera Virtual 1 2
TM0_DTNASC Data Nasc. Data Nascimento Data de nascimento do proprietário da Ficha Médica. D 8 0 NAOVAZIO() .And. ChkDtNa(dDataBase,M->TM0_DTNASC) Sim Altera Virtual MDT005WHEN(2) 1 1
TM0_SEXO Sexo Sexo Proprietario Ficha Sexo. 1=Masculino; 2=Feminino. C 1 0 @! IF(INCLUI,"1",TM0->TM0_SEXO) Sim Altera Virtual 1=Masculino;2=Feminino MDT005WHEN(2) 1 2
TM0_PESO Peso Peso da Pessoa em Kg. Peso da pessoa em Kg. N 7 3 @E 999.999 NG005IMC() Sim Altera Virtual 1 2
TM0_ALTURA Altura Altura da Pessoa Altura da pessoa em metros. N 4 2 @E 9.99 NG005IMC() Sim Altera Virtual 1 2
TM0_MASSA Massa Corp. Massa Corporea Índice de massa corpórea do funcionário. C 20 0 @! If(!INCLUI,NG005IMC()," ") Nao Vizualiza Real 1 2
TM0_ALTOLH Altura Olhos Altura dos Olhos Altura dos olhos. N 4 2 @E 9.99 Nao Altera Virtual 1 2
TM0_LMAMIL Lin. Mamilar Linha Mamilar Linha mamilar. N 4 2 @E 9.99 Nao Altera Virtual 1 2
TM0_ALTPUB Altura Púbis Altura do Pubis Altura do pubis. N 4 2 @E 9.99 Nao Altera Virtual 1 2
TM0_ALTJOE Alt. Joelho Altura do Joelho Altura do joelho. N 4 2 @E 9.99 Nao Altera Virtual 1 2
TM0_ALTCOT Alt.Cotovelo Altura do Cotovelo Altura do cotovelo. N 4 2 @E 9.99 Nao Altera Virtual 1 2
TM0_TAMBRA Tam. Braço Tamanho do Braco Tamanho do braço. N 4 2 @E 9.99 Nao Altera Virtual 1 2
TM0_TAMANT Tam. Ante-B. Tamanho do Ante-Braco Tamanho do ante-braço. N 4 2 @E 9.99 Nao Altera Virtual 1 2
TM0_TAMMAO Tamanho mão Tamanho da Mao Tamanho da mão. N 4 2 @E 9.99 Nao Altera Virtual 1 2
TM0_COMPPE Comprim. Pé Comprimento do Pe Comprimento do pé. N 4 2 @E 9.99 Nao Altera Virtual 1 2
TM0_NUMCAL Num. Calçado Numero do Calcado Número do calçado. N 2 0 99 Nao Altera Virtual 1 2
TM0_TIPFIS Tipo Físico Tipo Fisico da Pessoa Biotipo da pessoa. Características do tipo físico. C 20 0 @! Sim Altera Virtual 1 2
TM0_FUMA Fuma Indicador de Fumante Indica se o Funcionário é fumante ou não. C 1 0 @! IF(INCLUI,"2",TM0->TM0_FUMA) Sim Altera Virtual 1=Sim;2=Nao 1 2
TM0_QTCIG Quant. Cig. Qtde Cigarro por Dia Quantidade de cigarros por dia. N 3 0 @E 999 Sim Altera Virtual If(M->TM0_FUMA =='2',.F.,.T.) 1 2
TM0_QTTEMP Quantos Anos Qtde Tempo em Anos (Fuma) A quantos anos que a pessoa fuma. N 2 0 99 Sim Altera Virtual If(M->TM0_FUMA =='2',.F.,.T.) 1 2
TM0_RG R.G. RG - Registro Geral Número da Carteira de Identidade ou Registro do Paciente. C 15 0 @! Sim Altera Virtual 1 2
TM0_LOCFIC Local Ficha Localizacao da Ficha Local físico onde se encontra a Ficha Médica anterior (Papel). Ex. Arquivo de aço, terceira gaveta. Para facilitar a localização dos documentos anexos a Ficha. Etc.. C 30 0 @! Nao Altera Virtual 1 2
TM0_DESCRI Histórico Antecedentes Profis. Descrição dos antecedentes profissionais do funcionário, relacionados a saúde. M 10 0 Nao Altera Virtual 1 2
TM0_CODFUN Função Codigo da Funcao Código da função do funcionário. C 5 0 @! IF(EMPTY(M->TM0_CODFUN),.T.,EXISTCPO("SRJ",M->TM0_CODFUN)) SRJ S Sim Altera Virtual MDT005WHEN(2) 1 2
TM0_DESCFU Descrição Descrição Função Descrição da função. C 20 0 @! NaoVazio() MDT005INIC(2) Nao Vizualiza Virtual 1 2
TM0_CC Centro Custo Codigo do centro de custo Código do Centro de Custo do funcionário. C 9 0 @! IF(VAZIO(),.T.,CTB105CC()) CTT S Sim Altera Virtual MDT005WHEN(2) 004 1 2
TM0_CCDESC Descrição Descrição centro de custo Descrição do centro de custo. C 40 0 @! NaoVazio() MDT005INIC(1) Nao Vizualiza Virtual 1 2
TM0_DEPTO Departamento Codigo Departamento Indica o código do Departamento. C 9 0 @! Empty( M->TM0_DEPTO ) .Or. ExistCPO( 'SQB' , M->TM0_DEPTO, 1 ) MDTSQB Nao Altera Real MDT005WHEN( 1 ) 025 1 2
TM0_DESCDP Descrição Descricao Departamento Indica o dscrição do Departamento. C 30 0 @! MDT005INIC(3) Nao Vizualiza Virtual 1 2
TM0_COROLH Cor Olhos Cor dos Olhos Indica a cor dos olhos do funcionário. Pode ser: 1- Azul; 2- Verde; 3- Castanho; 4- Preto; 5- Outros. C 1 0 @! PERTENCE("12345") S Nao Altera Virtual 1=Azuis;2=Verdes;3=Castanhos;4=Pretos;5=Outros 1 2
TM0_CORCAB Cor Cabelos Cor dos Cabelos Indica a cor dos cabelos do funcionário. Podendo ser: 1- Louro; 2- Castanho; 3- Castanho Médio; 4- Castanho Escuro; 5- Preto; 6- Ruivo; 7- Grisalho; 8- Branco; 9- Outros. C 1 0 @! PERTENCE("123456789") Nao Altera Virtual 1=Louro;2=Castanho Claro;3=Castanho Medio;4=Castanho Escuro;5=Preto;6=Ruivo;7=Grisalho;8=Branco;9=Outros 1 2
TM0_CORPEL Cor Pele Cor da Pele Indica a cor de pele do funcionário. Podendo ser: 1-Branco; 2- Preto; 3- Pardo; 4- Amarelo e 5- Indígena. C 1 0 @! Nao Altera Virtual 1=Branco;2=Preto;3=Pardo;4=Amarelo;5=Indigena 1 2
TM0_NUMCP Num. Cart. Numero Carteira Proficion Número da carteira profissional do funcionário. C 10 0 9999999999 Nao Altera Virtual 1 2
TM0_SERCP Série Cart. Serie da Carteira Prof. Número de série da carteira profissional. C 10 0 9999999999 Nao Altera Virtual 1 2
TM0_UFCP UF Cart. UF da Carteira Prof. Informe a Unidade Federativa da Carteira Profissional do funcionário. C 2 0 @! EXISTCPO("SX5","12"+M->TM0_UFCP) 12 Nao Altera Virtual 010 1 2
TM0_CLIENT Cliente Codigo do Cliente Código do cliente. C 6 0 @! IF(VAZIO(),.T.,EXISTCPO("SA1",M->TM0_CLIENT) .AND. MA005CliNom() ) SA1 S Nao Altera Virtual 001 1 2
TM0_LOJA Loja Loja do Cliente Código da loja do cliente. C 2 0 @! IF(VAZIO(),.T.,EXISTCPO("SA1",M->TM0_CLIENT+M->TM0_LOJA) .AND. MA005LojNom() ) Nao Altera Virtual 002 1 2
TM0_NOMCLI Nome Cliente Nome do Cliente Nome do cliente. C 20 0 @! SA1->(VDISP(TM0->TM0_CLIENT+TM0->TM0_LOJA,"A1_NOME")) Nao Vizualiza Virtual 1 2
TM0_ESTCIV Estado Civil Estado Civil Estado Civil do proprietário da ficha médica. C 1 0 @! ExistCpo("SX5","33"+M->TM0_ESTCIV) 33 Nao Altera Real 1 2
TM0_CPF CPF CPF C.P.F. (Cadastro de Pessoa Física) do funcionário ou candidato. C 11 0 @R 999.999.999-99 (Empty(M->TM0_CPF) .Or. ChkCPF(M->TM0_CPF)) .AND. FHIST() .AND. MDT005VALC(TM0->TM0_CPF, M->TM0_CPF) Sim Altera Real MDT005WHEN(2) 1 2
TM0_BITMAP Foto Foto Foto do funcionário. C 8 0 Nao Altera Virtual 1 2
TM0_CODCID CID Defic. CID da Deficiência CID. Pressione as teclas [Enter]+[F3] para selecionar o CID. C 8 0 @! If(!EMPTY(M->TM0_CODCID),EXISTCPO("TMR",M->TM0_CODCID),.T.) TMR S Nao Altera Real A155WDEFIC("TM0_CODCID") 1 2
TM0_TIPDEF Tipo Defic. Tipo de Deficiência Tipo de Deficiência. 0 = Não é portador de deficiência; 1 = Física; 2 = Auditiva; 3 = Visual; 4 = Mental; 5 = Múltipla; 6 = Reabilitado. C 1 0 @! Pertence("0123456") If(Inclui,"0",TM0->TM0_TIPDEF) Sim Altera Real 0=No portador de deficincia;1=Fsica;2=Auditiva;3=Visual;4=Mental;5=Mltipla;6=Reabilitado 1 2
TM0_DOENCA Descrição Descrição Doença Descrição da Doença. C 150 0 @! TMR->(VDISP(TM0->TM0_CODCID,"TMR_DOENCA")) Nao Vizualiza Virtual 1 2
TM0_INDBIO Biometria Biometria Indica se o funcionário terá cadastro de Biometria. C 1 0 @! Pertence('12') '2' Sim Altera Real 1=Sim;2=No EMPTY(M->TM0_CANDID) 1 2
TM0_CTPCD Cota Def. Cota de Deficiente Selecione se o funcionário preenche a cota de deficientes. C 1 0 @! VAZIO() .Or. Pertence('12') IF(INCLUI,"2",TM0->TM0_CTPCD) Nao Altera Real 1=Sim;2=No 1 2





Relacionamentos(SX9)
X9_CDOM - Tabela Destino X9_EXPDOM - Expressão Origem X9_EXPCDOM - Expressão Destino
TL9 TM0_NUMFIC TL9_NUMFIC
TM2 TM0_NUMFIC TM2_NUMFIC
TMF TM0_NUMFIC TMF_NUMFIC
TMN TM0_NUMFIC TMN_NUMFIC
TNA TM0_NUMFIC TNA_NUMFIC
TNC TM0_NUMFIC TNC_NUMFIC
TY3 TM0_NUMFIC TY3_NUMFIC
TM9 TM0_NUMFIC TM9_NUMFIC
TL5 TM0_NUMFIC TL5_NUMFIC
TK7 TM0_NUMFIC TK7_NUMFIC
TM6 TM0_NUMFIC TM6_NUMFIC
TMJ TM0_NUMFIC TMJ_NUMFIC
TMT TM0_NUMFIC TMT_NUMFIC
TMY TM0_NUMFIC TMY_NUMFIC
TOF TM0_NUMFIC TOF_NUMFIC
TNY TM0_NUMFIC TNY_NUMFIC
TN4 TM0_NUMFIC TN4_NUMFIC
TM5 TM0_NUMFIC TM5_NUMFIC
TMI TM0_NUMFIC TMI_NUMFIC
TKD TM0_NUMFIC TKD_NUMFIC