Tabela
TMK Usuarios de Medic e Segur
Campo Tipo Tamanho Decimal Titulo Formato Validacao F3 Contexto Lista Condicao PYME
TMK_FILIAL C 2 0 Filial S
TMK_CODUSU C 12 0 Usuario @! EXISTCHAV("TMK",M->TMK_CODUSU) S
TMK_NOMUSU C 80 0 Nome @! NAOVAZIO() S
TMK_ENTCLA C 8 0 Ent. Classe @! A640TESTOK() S
TMK_NUMENT C 12 0 Num.Ent.Cl. @! MDT070VENT() S
TMK_DTINIC D 8 0 Data Inicio S
TMK_DTTERM D 8 0 Data Term. IF (!EMPTY(M->TMK_DTTERM), VALDATA(M->TMK_DTINIC, M->TMK_DTTERM, "DATAINVALI"), .T.) S
TMK_REGMTB C 12 0 Registro MTb @! S
TMK_SESMT C 1 0 Compoe SESMT @! PERTENCE("12") 1=Sim;2=Nao S
TMK_INDFUN C 1 0 Funcao @! ExistCpo('SX5', 'P1' + M->TMK_INDFUN, 1) P1 S
TMK_DESFUN C 30 0 Descricao @! V S
TMK_ENDUSU C 30 0 Endereco @! S
TMK_UF C 2 0 UF Ent. @! If(!Empty(M->TMK_UF),EXISTCPO('SX5','12'+M->TMK_UF),.T.) 12 R S
TMK_TELUSU C 15 0 Telefone @! S
TMK_NIT C 11 0 NIT @! S
TMK_CC C 9 0 Centro Custo @! IF(VAZIO(),.T.,CTB105CC()) CTT R N
TMK_NOMECC C 20 0 Nome C.C. @! V N
TMK_MONBIO C 1 0 Monit.Biolog @! Pertence('12') R 1=Sim;2=Nao S
TMK_EMAIL C 50 0 E-mail R N
TMK_CIC C 11 0 C.P.F. @R 999.999.999-99 If(Empty(M->TMK_CIC),.T.,ChkCPF(M->TMK_CIC)) R N
TMK_CALEND C 3 0 Calendario @! If( Empty(M->TMK_CALEND),.T.,ExistCpo('SH7',M->TMK_CALEND) ) SH7 R MDT70WHEN("TMK_CALEND") N
TMK_DESCAL C 30 0 Descricao @! V N
TMK_USUARI C 25 0 Login MDT070VUS() QUS R MDT70WHEN('TMK_USUARI') N
TMK_ESOC C 6 0 Cod. eSocial @! MDTeSocVal('CM7', 'TMK', 2, 5, M->TMK_ESOC) MDTCM7 R S
TMK_RESAMB C 1 0 Resp. Amb. @! R 1=Sim;2=Nao S
TMK_QTDHRS C 5 0 Quant. Horas 99:99 NGVALHORA(M->TMK_QTDHRS,,.T.) .And. MDT160VHR(M->TMK_QTDHRS) R S