| 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 |
| TCD | 01 | TCD_FILIAL | C | 2 | 0 | Filial | Filial do Sistema | | | | | 1 | | N | | | | | | | | 033 | |
| TCD | 02 | TCD_CODIGO | C | 6 | 0 | Codigo | Codigo do Monitoramento | @! | ExistChav("TCD") .And. FreeForUse("TCD",M->TCD_CODIGO) | IF(INCLUI,GETSXENUM('TCD','TCD_CODIGO'),TCD->TCD_CODIGO) | | 1 | | S | V | R | | | | | | | |
| TCD | 03 | TCD_DTCAD | D | 8 | 0 | Dt. Cadastro | Data do Cadastro | 99/99/9999 | | If(Inclui,DDATABASE,TCD->TCD_DTCAD) | | 1 | | S | V | R | | | | | | | |
| TCD | 04 | TCD_DESCRI | C | 40 | 0 | Descricao | Desc. do Monitoramento | @! | | | | 1 | | S | A | R | | | | | | | |
| TCD | 05 | TCD_FONTE | C | 6 | 0 | Fonte | Cod. da Fonte de Medicao | @! | ExistCpo("TCB") .And. SG390Vld() | | TCB | 1 | S | S | A | R | | | | M->TCD_STATUS == '1' | | | |
| TCD | 06 | TCD_DESFON | C | 40 | 0 | Descricao | Desc. da Fonte de Medicao | @! | | TCB->(VDISP(TCD->TCD_FONTE,"TCB_DESCRI")) | | 1 | | S | V | V | | | | | IF(TCB->(DBSEEK(XFILIAL("TCB")+TCD->TCD_FONTE)),TCB->TCB_DESCRI,"") | | |
| TCD | 07 | TCD_STATUS | C | 1 | 0 | Status | Status do Monitoramento | @! | Pertence("1234") | "1" | | 1 | | S | V | R | | 1=Iniciado;2=Em Andamento;3=Finalizado;4=Cancelado | | | | | |
| TCD | 08 | TCD_GRUPO | C | 6 | 0 | Grupo | Codigo do Grupo Gerador | @! | ExistCpo("TCA") .And. SG390Vld() | | TCA | 1 | S | S | A | R | | | | M->TCD_STATUS == '1' | | | |
| TCD | 09 | TCD_DESGRP | C | 40 | 0 | Desc. Grupo | Descricao do Grupo | @! | | TCA->(VDISP(TCD->TCD_GRUPO,"TCA_DESCRI")) | | 1 | | S | V | V | | | | | IF(TCA->(DBSEEK(XFILIAL("TCA")+TCD->TCD_GRUPO)),TCA->TCA_DESCRI,"") | | |
| TCD | 10 | TCD_ASPECT | C | 6 | 0 | Aspecto | Codigo do Aspecto | @! | ExistCpo("TA4") | | TA4 | 1 | S | S | A | R | | | | M->TCD_FLAG $ '13' | | | |
| TCD | 11 | TCD_DESASP | C | 40 | 0 | Descricao | Descricao do Aspecto | @! | | TA4->(VDISP(TCD->TCD_ASPECT,"TA4_DESCRI")) | | 1 | | S | V | V | | | | | IF(TA4->(DBSEEK(XFILIAL("TA4")+TCD->TCD_ASPECT)),TA4->TA4_DESCRI,"") | | |
| TCD | 12 | TCD_IMPACT | C | 6 | 0 | Impacto | Codigo do Impacto | @! | ExistCpo("TAE") | | TAE | 1 | S | S | A | R | | | | M->TCD_FLAG $ '13' | | | |
| TCD | 13 | TCD_DESIMP | C | 40 | 0 | Descricao | Descricao do Impacto | @! | | TAE->(VDISP(TCD->TCD_IMPACT,"TAE_DESCRI")) | | 1 | | S | V | V | | | | | IF(TAE->(DBSEEK(XFILIAL("TAE")+TCD->TCD_IMPACT)),TAE->TAE_DESCRI,"") | | |
| TCD | 14 | TCD_OBSERV | M | 10 | 0 | Observacao | Observacao da Medicao | | | | | 1 | | N | A | R | | | | | | | |
| TCD | 15 | TCD_DTINI | D | 8 | 0 | Data Início | Data Início Monint. | 99/99/9999 | | | | 1 | | S | A | R | | | | M->TCD_STATUS == "1" | | | |
| TCD | 16 | TCD_HRINI | C | 5 | 0 | Hora inicio | Hora Inicio Monit. | 99:99 | NGVALHORA(M->TCD_HRINI,.T.) | | | 1 | | S | A | R | | | | M->TCD_STATUS == "1" | | | |
| TCD | 17 | TCD_FLAG | C | 1 | 0 | Módulo | Módulo de Criação | @! | MdtValTip( M->TCD_FLAG , 'TCD' ) | If(nModulo==35,'2',If(nModulo==56,'1','3')) | | 1 | | N | A | R | | 1=SGA;2=MDT;3=Ambos | | | | | |
| TCD | 18 | TCD_TIPO | C | 1 | 0 | Tipo | Tipo Monitoramento | @! | If(!Empty(M->TCD_TIPO),Pertence('1234'),.T.) | If(nModulo == 56,'1','4') | | 1 | | N | A | R | | 1=Ambiental;2=QSMS;3=SMS;4=SSO | | | | | |
| TCD | 19 | TCD_CODPER | C | 6 | 0 | Perigo | Código do Perigo | @! | ExistCpo( 'TG1' , M->TCD_CODPER ) | | TG1 | 1 | S | S | A | R | | | | M->TCD_FLAG $ '23' | | | |
| TCD | 20 | TCD_NOMPER | C | 40 | 0 | Nome Perigo | Nome do Perigo | @S30 | | TG1->( vDisp( TCD->TCD_CODPER , 'TG1_DESCRI' ) ) | | 1 | | N | V | V | | | | | IF( TG1->( dbSeek( xFilial( 'TG1' ) + TCD->TCD_CODPER ) ) , TG1->TG1_DESCRI ,'') | | |
| TCD | 21 | TCD_CODDAN | C | 6 | 0 | Dano | Código do Dano | @! | ExistCpo( 'TG8' , M->TCD_CODDAN ) | | TG8 | 1 | S | N | A | R | | | | | M->TCD_FLAG $ '23' | | |
| TCD | 22 | TCD_DESDAN | C | 40 | 0 | Nome Dano | Nome do Dano | @S30 | | TG8->( vDisp( TCD->TCD_CODDAN , 'TG8_DESCRI' ) ) | | 1 | | N | V | V | | | | | IF( TG8->( dbSeek( xFilial( 'TG8' ) + TCD->TCD_CODDAN ) ) , TG8->TG8_DESCRI ,'') | | |
