Ajude o site desativando o bloqueador de anúncio
Cabeçalho

Tabela 2410 TM5

Autor: Eurai Criado: 01/03/2025 Atualizado: 01/03/2025 Protheus
Postagem

Salve salve, blz?

 

 

Tabela TM5. #TM5

 

 

 

 

SX2 - TABELA

X2_CHAVE X2_PATH X2_ARQUIVO X2_NOME X2_NOMESPA X2_NOMEENG X2_ROTINA X2_MODO X2_MODOUN X2_MODOEMP X2_DELET X2_TTS X2_UNICO X2_PYME X2_MODULO X2_DISPLAY X2_SYSOBJ X2_USROBJ X2_POSLGT X2_CLOB X2_AUTREC X2_TAMFIL X2_TAMUN X2_TAMEMP X2_STAMP X2_INSDT
TM5 DATA TM5990 Exames do Funcionário Exámenes del Empleado Employee Exams E E E 0 TM5_FILIAL+TM5_NUMFIC+DTOS(TM5_DTPROG)+TM5_HRPROG+TM5_EXAME N 35 TM5_NUMFIC+TM5_EXAME+TMA5_OBSERV 1 2 2 2 0 0

 

 

 

 

SX3 - CAMPOS

X3_ARQUIVO X3_ORDEM X3_CAMPO X3_TIPO X3_TAMANHO X3_DECIMAL X3_TITULO X3_DESCRIC X3_PICTURE X3_VALID X3_RELACAO X3_F3 X3_NIVEL X3_TRIGGER X3_BROWSE X3_VISUAL X3_CONTEXT X3_OBRIGAT X3_CBOX X3_PICTVAR X3_WHEN X3_INIBRW X3_GRPSXG X3_FOLDER
TM5 01 TM5_FILIAL C 2 0 Filial Filial do Sistema 1 N 033
TM5 02 TM5_NUMFIC C 9 0 Ficha Médica Numero da Ficha Medica 999999999 EXISTCPO("TM0",M->TM5_NUMFIC) TM0 1 S S LENUMFIC
TM5 03 TM5_NOMFIC C 40 0 Nome Nome Paciente @! VSAYMDT("04") 1 S V V MdtNomTM0()
TM5 04 TM5_EXAME C 6 0 Cod. Exame Codigo do Exame Medico @! EXISTCPO("TM4",M->TM5_EXAME) TM4 1 S S 048
TM5 05 TM5_NOMEXA C 40 0 Nome Exame Nome do Exame Medico @! TM4->(VDISP(TM5->TM5_EXAME,"TM4_NOMEXA")) 1 S V V IF(TM4->(DBSEEK(XFILIAL("TM4")+TM5->TM5_EXAME)),TM4->TM4_NOMEXA," ")
TM5 06 TM5_DTPROG D 8 0 Data Exame Data Programacao Exame 99/99/9999 IF(INCLUI,dDataBase,TM5->TM5_DTPROG) 1 S
TM5 07 TM5_FORNEC C 6 0 Fornecedor Codigo da Entidade Extern @! CARRELOJA() NGE 1 S 001
TM5 08 TM5_LOJA C 2 0 Loja Fornec. Loja do Fornecedor @! EXISTCPO("SA2",M->TM5_FORNEC+M->TM5_LOJA) .AND. FORNEXA() 1 S V 002
TM5 09 TM5_FILFUN C 2 0 Filial Func. Filial do Funcionario 1 N V .F. 033
TM5 10 TM5_MAT C 6 0 Matricula Matricula do Funcionario @! ExCpoMDT("SRA",M->TM5_MAT) 1 S V .F. 121
TM5 11 TM5_ORIGEX C 1 0 Origem Exame Origem do Exame @! NUMPCMSO() IF(INCLUI,"1",TM5->TM5_ORIGEX) 1 S S 1=Assistencial;2=Ocupacional
TM5 12 TM5_PCMSO C 6 0 Num.PCMSO Numero do PCMSO @! If(M->TM5_ORIGEX == "2",EXISTCPO("TMW",M->TM5_PCMSO),NUMPCMSO()) TMW 1 S MDT120WHE(1)
TM5 13 TM5_DTRESU D 8 0 Data Result. Data Resultado Exame MDT120VLDR() 1 S
TM5 14 TM5_CODRES C 4 0 Conclusão Cod Conclusao Resultado @! If(Vazio(),.T.,EXISTCPO("TMU",M->TM5_CODRES)) TMU 1 S
TM5 15 TM5_RESULT C 50 0 Descrição Descricao do Resultado @! TMU->(VDISP(TM5->TM5_CODRES,"TMU_RESULT")) 1 S V V IF(TMU->(DBSEEK(XFILIAL("TMU")+TM5->TM5_CODRES)),TMU->TMU_RESULT," ")
TM5 16 TM5_INDRES C 1 0 Ind. Result. Indicador Resultado Exame @! IF(INCLUI,'1',TM5->TM5_INDRES) 1 S 1=Normal;2=Alterado
TM5 17 TM5_NATEXA C 1 0 Natureza Indicador Natureaza Exame @! PERTENCE("123456") IF(INCLUI,'1',TM5->TM5_NATEXA) 1 N 1=Admissional;2=Periódico;3=Mudança de Riscos Ocupacionais;4=Retorno ao Trabalho;5=Demissional;6=Monitoração Pontual M->TM5_ORIGEX = "2"
TM5 18 TM5_OBSERV C 80 0 Obs. Result. Observacao Sobre Result. @! 1 N
TM5 19 TM5_CC C 9 0 Centro Custo Codigo do Centro de Custo @! 1 N V .F. 004
TM5 20 TM5_CODFUN C 5 0 Cod. Funcao Funcao do Funcionario @! 1 N V 160
TM5 21 TM5_CBO C 6 0 C.B.O. C.B.O. 999999 1 N V .F.
TM5 22 TM5_NUMASO C 6 0 Num. ASO Numero do ASO 999999 1 N V
TM5 23 TM5_TNOTRA C 3 0 Turno Trab. Codigo do Turno Trabalho @! 1 N V
TM5 24 TM5_DESRES M 10 0 Det. Resum. Detalhes Resultado Exame @! 1 N
TM5 25 TM5_EXAREF C 1 0 Referencial? Exame Referencial? @! PERTENCE("12") IF(INCLUI,'2',TM5->TM5_EXAREF) 1 N 1=Sim;2=Nao
TM5 26 TM5_INDAGR C 1 0 Agravamento? Agravamento? @! 1 N 1=Sim;2=Nao NG120WNAG()
TM5 27 TM5_ORIAGR C 1 0 Origem Agrav Origem Agravamento @! 1 N 1=Ocupacional;2=Não Ocupacional M->TM5_INDAGR='1'
TM5 28 TM5_HRPROG C 5 0 Hor. Prog. Horario Programacao 99:99 VALHORA(M->TM5_HRPROG) .AND. MDT120PK() 1 S A R
TM5 29 TM5_USERGI C 17 0 Log de Inclu Log de Inclusao 1 N V R
TM5 30 TM5_USERGA C 17 0 Log de Alter Log de Alteracao 1 N V R
TM5 31 TM5_CODDET C 17 0 Laudo Exame Laudo do exame !!999999999 1 S N A R
TM5 32 TM5_USUARI C 12 0 Med. Exam. Médico Examinador @! ExistCPO("TNP",M->TM5_USUARI) TNP 1 S N A R M->TM5_ORIGEX == "1" .And. !Empty( M->TM5_CODDET )
TM5 33 TM5_NOMMED C 80 0 Nome Med. Nome do Médico @! If(INCLUI,"",Posicione("TNP",1,xFilial("TNP")+M->TM5_USUARI,"TNP_NOME")) 1 N V V

 

 

 

 

SIX - INDICES

INDICE ORDEM CHAVE DESCRICAO DESCSPA DESCENG PROPRI F3 NICKNAME SHOWPESQ IX_VIRTUAL IX_VIRCUST
TM5 1 TM5_FILIAL+TM5_NUMFIC+DTOS(TM5_DTPROG)+TM5_EXAME Ficha Médica + Data Exame + Cod. Exame Ficha Medica + Fecha Examen + Cod. Examen Medical Form + Test Date + Exam Code S S 2 3
TM5 2 TM5_FILIAL+TM5_EXAME+TM5_FORNEC Cod. Exame + Fornecedor Cod. Examen + Proveedor Exam Code + Supplier S S 2 3
TM5 3 TM5_FILIAL+TM5_PCMSO+TM5_NUMFIC+TM5_EXAME+DTOS(TM5_DTPROG) Num.PCMSO + Ficha Médica + Cod. Exame + Data Exame NUM. PCMSO + Ficha Medica + Cod. Examen + Fecha Examen PCMSO Number + Medical Form + Exam Code + Test Date S S 2 3
TM5 4 TM5_FILIAL+TM5_NUMASO Num. ASO NUM. ASO ASO Number S S 2 3
TM5 5 TM5_FILIAL+TM5_CODRES Conclusão Conclusion Conclusion S S 2 3
TM5 6 TM5_FILIAL+TM5_NUMFIC+TM5_EXAME+DTOS(TM5_DTPROG) Ficha Médica + Cod. Exame + Data Exame Ficha Medica + Cod. Examen + Fecha Examen Medical Form + Exam Code + Test Date S S 2 3
TM5 7 TM5_FILIAL+TM5_CC+TM5_EXAME Centro Custo + Cod. Exame Centro Costo + Cod. Examen Cost Center + Exam Code S S 2 3
TM5 8 TM5_FILIAL+TM5_NUMFIC+DTOS(TM5_DTPROG)+TM5_HRPROG+TM5_EXAME Ficha Médica + Data Exame + Hor. Prog. + Cod. Exame Ficha Medica + Fecha Examen + Hor. Prog. + Cod. Examen Medical Form + Test Date + Sched Time + Exam Code S S 2 3

 

 

 

 

SX7 - GATILHOS

X7_CAMPO X7_SEQUENC X7_REGRA X7_CDOMIN X7_TIPO X7_SEEK X7_ALIAS X7_ORDEM X7_CHAVE X7_CONDIC X7_PROPRI
TM5_CODDET 001 "" TM5_USUARI P N 0 Empty( M->TN5_CODDET ) S
TM5_CODDET 002 "" TM5_NOMMED P N 0 Empty( M->TN5_CODDET ) S
TM5_EXAME 001 TM4->TM4_NOMEXA TM5_NOMEXA P S TM4 1 xFILIAL("TM4")+M->TM5_EXAME S
TM5_NUMFIC 001 TM0->TM0_NOMFIC TM5_NOMFIC P S TM0 1 xFILIAL("TM0")+M->TM5_NUMFIC S
TM5_ORIGEX 001 "" TM5_USUARI P N 0 M->TM5_ORIGEX <> '1' S
TM5_ORIGEX 002 "" TM5_NOMMED P N 0 M->TM5_ORIGEX <> '1' S
TM5_USUARI 001 TNP->TNP_NOME TM5_NOMMED P S TNP 1 xFilial("TNP")+M->TM5_USUARI S

 

 

 

 

SXG - Grupo de Campos

XG_GRUPO XG_DESCRI XG_DESSPA XG_DESENG XG_SIZEMAX XG_SIZEMIN XG_SIZE XG_PICTURE
001 Codigo Cliente/Fornecedor Codigo Cliente/Proveedor Customer/Supplier Code 20 6 6 @!
002 Loja Cliente/Fornecedor Tienda Cliente/Proveedor Customer/Supplier Unit 4 2 2 @!
004 Centro de Custo Centro de Costo Cost Center 20 9 9 @!
033 Tamanho da Filial Tamano de la Sucursal Branch Size 12 2 2
048 Exame Examen Examination 10 6 6 @!
121 Matrícula do Funcionário Matrícula del empleado Employee Registration 15 6 6 @!
160 Código de Função Código de Función Role Code 9 5 5 @!

 

 

 

 

 

 

 

 

 

 

Gostou? Compartilhe com seus amigos e deixe um comentário! ??

Um abraço, e até a próxima  

 

 

 

 

 

ASSINE A NEWSLETTER

Cadastrando...

PIX uDesenv

PIX QR Code para depósito

Clique para doar

Parceiros

Tudo em ADVPL - Blog parceiro

Blog ADVPL