Tabela
TNY Atestados Medicos
Campo Tipo Tamanho Decimal Titulo Formato Validacao F3 Contexto Lista Condicao PYME
TNY_FILIAL C 2 0 Filial N
TNY_NUMFIC C 9 0 Ficha Medica @! MDT685FicV(M->TNY_NUMFIC) .And. MDT685SEQ(2) TM0 IsInCallStack('MDTA685') .and. !IsInCallStack('MDT685CONT') N
TNY_NOMFIC C 40 0 Nome @! V N
TNY_DTINIC D 8 0 Inic. Afast. MDT685VLDT(1) N
TNY_HRINIC C 5 0 Hora Inic. 99:99 NGVALHORA(M->TNY_HRINIC,,.T.) N
TNY_DTFIM D 8 0 Fim Afast. MDT685VLDT(2) N
TNY_HRFIM C 5 0 Hora Fim 99:99 IF(VAZIO(),.T.,NGVALHORA(M->TNY_HRFIM) .And. MDT685VLDT(,.T.)) N
TNY_GRPCID C 3 0 Grupo C.I.D. @! MDT685F3CID() TLG S
TNY_DESGRP C 220 0 Descricao @! V N
TNY_CID C 8 0 CID Princip. @! MDT685CIDP() TMR WhenTNYCID() N
TNY_DOENCA C 220 0 Descricao @! V N
TNY_EMITEN C 12 0 Emit. Atest. @! EXISTCPO("TNP",M->TNY_EMITEN) TNP N
TNY_NOMUSU C 20 0 Nome @! V N
TNY_TIPAFA C 1 0 Tipo Afasta. @! IF(VAZIO(),.T.,EXISTCPO("SX5","30"+M->TNY_TIPAFA)) .AND. MDT685SDT(M->TNY_DTINIC) 30 MT685DTINI() N
TNY_CODAFA C 3 0 Cod.Ausencia @! If(!Empty(M->TNY_CODAFA),ExistCPO( 'RCM', M->TNY_CODAFA, 1 ), .T.) .And. MDT685CODA() MDTRCM R S
TNY_TIPATE C 1 0 Tipo Atest. A=Autorizacao de Saida;D=Direto;I=Indireto N
TNY_OBSERV C 80 0 Observacao @! N
TNY_NATEST C 10 0 Num. Atest. @! R S
TNY_DTCONS D 8 0 Data Cons. MDT685DtAf( 9 ) R S
TNY_HRCONS C 5 0 Hora Cons. 99:99 IF(AllTrim(M->TNY_HRCONS)==':',.T.,NGVALHORA(M->TNY_HRCONS)) R S
TNY_ENDERE C 30 0 End. Emit. @! R S
TNY_CODESP C 2 0 Cod. Espec. @! TOG R S
TNY_ESPDES C 30 0 Descricao @! V S
TNY_CODABO C 3 0 Cod. Abono @! SP6001 R S
TNY_ABODES C 25 0 Descricao @! V S
TNY_DESCAD C 30 0 Descricao @! V S
TNY_QTDIAS N 4 0 Dias Afast. 9999 R S
TNY_DTSAID D 8 0 Dt.Saida A.D MDT685DtAf( 3 ) R ( !Empty(M->TNY_TIPAFA) .Or. !Empty(M->TNY_CODAFA) ) S
TNY_DTALTA D 8 0 Dt.Alta A.D MDT685DtAf( 4 ) R ( !Empty(M->TNY_TIPAFA) .Or. !Empty(M->TNY_CODAFA) ) S
TNY_DTSAI2 D 8 0 Dt.Saida A.D MDT685DtAf( 5 ) R ( !Empty(M->TNY_TIPAFA) .Or. !Empty(M->TNY_CODAFA) ) S
TNY_DTALT2 D 8 0 Dt.Alta A.D MDT685DtAf( 6 ) R ( !Empty(M->TNY_TIPAFA) .Or. !Empty(M->TNY_CODAFA) ) S
TNY_DTSAI3 D 8 0 Dt.Saida A.D MDT685DtAf( 7 ) R ( !Empty(M->TNY_TIPAFA) .Or. !Empty(M->TNY_CODAFA) ) S
TNY_DTALT3 D 8 0 Dt.Alta A.D MDT685DtAf( 8 ) R ( !Empty(M->TNY_TIPAFA) .Or. !Empty(M->TNY_CODAFA) ) S
TNY_INDMED C 1 0 Ind. Medico @! R 1=Interno;2=Externo;3=Empresa;4=SUS;5=Particular;6=Convenio S
TNY_OCORRE C 1 0 Ind. Atend. @! MT685VLDOC() R 1=Atend. Clinico;2=Doenca do Trabalho;3=Acidente Tipico;4=Acidente Trajeto;5=Outros Atedimentos;6=Avaliacao NR7 N
TNY_ACIDEN C 6 0 Acidente IF(VAZIO(),.T.,EXISTCPO("TNC",M->TNY_ACIDEN)) .AND. MDT685ACI() TNCFIC R M->TNY_OCORRE$"234" N
TNY_DESACI C 80 0 Descricao @! V N
TNY_AFRAIS C 2 0 Afast. RAIS 99 R #fBoxRAIS() N
TNY_QTDTRA C 4 0 Dias Trat. @ 9999 R S
TNY_ATEANT C 10 0 Atest. Ant. @! R N
TNY_USERGI C 17 0 Log de Inclu R N
TNY_TPEFD C 2 0 Mot. Afast. @! Vazio() .Or. ValidRCC('S048',M->TNY_TPEFD,1,2) S48 R N