Tabela
TRH REGISTRO COMUNICADO SINISTRO
Campo Tipo Tamanho Decimal Titulo Formato Validacao F3 Contexto Lista Condicao PYME
TRH_FILIAL C 2 0 Filial S
TRH_NUMSIN C 6 0 Num Sinistro @! R S
TRH_DTACID D 8 0 Dt. Sinistro 99/99/9999 VALDT(M->TRH_DTACID) R S
TRH_HRACID C 5 0 Hr. Acidente 99:99 NGVALHORA(M->TRH_HRACID,.T.) .AND. MNA540HORA() .AND. MNTA570VIA() R S
TRH_EVENTO C 1 0 Evento Sin. @! MNTA540EVE() .AND. PERTENCE('123') R 1=Acidente;2=Roubo;3=Incidente S
TRH_CODBEM C 16 0 Codigo Bem @! MNA545VALB() .AND. IIF(FunName()=='MNTA545',MNTA570VIA(),.T.) NGY R S
TRH_NOMBEM C 30 0 Nome do Bem @! V S
TRH_OCORRE C 4 0 Ocorrencia @! IIF(!Empty(M->TRH_OCORRE),ExistCpo('DT2',M->TRH_OCORRE),.t.) DT2 R S
TRH_DESOCO C 30 0 Des. Ocorre. @! V S
TRH_TIPACI C 2 0 Tipo Evento @! ExistCpo('SX5','AF'+M->TRH_TIPACI) .AND. MNTA540ACI() AF R S
TRH_DESTIP C 20 0 Des. Tp Eve. @! V S
TRH_CAUPRE C 2 0 Causa Preli. @! ExistCpo('SX5','CX'+M->TRH_CAUPRE) CX R M->TRH_EVENTO = '1' S
TRH_DESCAU C 20 0 Des. Causa @! V S
TRH_PLACA C 8 0 Placa do Bem @! MNT545PLACA() .AND. IIF(FunName()=='MNTA545',MNTA570VIA(),.T.) R S
TRH_GRAVID C 1 0 Gravidade @! PERTENCE('1234') R 1=Leve;2=Medio;3=Grave;4=Gravissimo S
TRH_NUMBO C 10 0 Numero do BO @! R S
TRH_NOMDP C 40 0 Nome do DP @! R S
TRH_TEMPO C 1 0 Cond. Tempo @! PERTENCE('1234') R 1=Bom;2=Chuvoso;3=Neblina;4=Nublado S
TRH_VIA C 1 0 Tracado Via @! PERTENCE('1234') R 1=Reta;2=Curva;3=Cruzamento;4=Estrada de Terra S
TRH_PERIOD C 1 0 Periodo Dia @! PERTENCE('1234') R 1=Manha;2=Noite;3=Tarde;4=Madrugada S
TRH_VIADIR C 1 0 Mao Direcao @! PERTENCE('12') R 1=Unica;2=Dupla S
TRH_LOCAL C 60 0 Local Acid. @! R S
TRH_CIDACI C 40 0 Cidade Acid. @! R S
TRH_UFACID C 2 0 UF Acidente @! ExistCpo('SX5','12'+M->TRH_UFACID) 12 R S
TRH_VELOC N 4 0 Veloc. Acid. 9999 R S
TRH_KMACID N 6 0 Km Acidente @E 999,999 POSITIVO() .AND. MNTA570VIA() R S
TRH_VELPER N 4 0 Veloc. Perm. 9999 R S
TRH_INTERR C 1 0 Int. Viagem? @! PERTENCE('12') R 1=Sim;2=Nao S
TRH_GUINCH C 1 0 Nec Guincho? @! PERTENCE('12') .AND. IIF(M->TRH_GUINCH='2',M->TRH_VALGUI:=0,.t.) 1=Sim;2=Nao S
TRH_VALGUI N 14 2 Val. Guincho @E 99,999,999,999.99 M->TRH_GUINCH = '1' S
TRH_VEIROU C 1 0 Veic. Roub.? @! PERTENCE('12') .AND. IIF(M->TRH_VEIROU=='2',M->TRH_RECVEL:='1',.t.) R 1=Sim;2=Nao M->TRH_EVENTO = '2' S
TRH_RECVEL C 1 0 Veic. Recup? @! PERTENCE('12') R 1=Sim;2=Nao M->TRH_EVENTO = '2' .AND. M->TRH_VEIROU = '1' S
TRH_SEQUES C 1 0 Mot Sequest? @! PERTENCE('12') R 1=Sim;2=Nao M->TRH_EVENTO = '2' S
TRH_MOTLIB C 1 0 Mot. Libera? @! PERTENCE('12') R 1=Sim;2=Nao M->TRH_EVENTO = '2' S
TRH_CONDEL C 1 0 Delito Con.? @! PERTENCE('12') R 1=Sim;2=Nao S
TRH_STATUS C 2 0 Status Proc. @! ExistCpo('SX5','SP'+M->TRH_STATUS) SP R lStatus S
TRH_NOMPRO C 40 0 Prop. Animal @! R S
TRH_ENDPRO C 40 0 End. Propr. @! R S
TRH_CIDPRO C 20 0 Cidade Prop. @! R S
TRH_UFPRO C 2 0 Estado Prop. @! ExistCpo('SX5','12'+M->TRH_UFPRO) 12 R S
TRH_TELPRO C 15 0 Tel. Prop. @! R S
TRH_TIPANI C 20 0 Tipo Animal @! R S
TRH_QTDANI N 2 0 Qtd. Animais 99 R S
TRH_VALANI N 14 2 Valor Animal @E 99,999,999,999.99 R S
TRH_DESCRI M 80 0 Desc. Acid. V S
TRH_FLGDAN C 1 0 Danos Frota? @! PERTENCE('12') .AND. MNT545FLG() R 1=Sim;2=Nao S
TRH_VALDAN N 12 2 Valor Danos @E 999,999,999.99 R M->TRH_FLGDAN == '1' S
TRH_DANOS C 40 0 Desc. Danos @! R M->TRH_FLGDAN == '1' S
TRH_DANOS2 M 80 0 Desc. Danos V M->TRH_FLGDAN = '1' N
TRH_TEREVA C 1 0 Ter. Evadiu? @! PERTENCE('12') R 1=Sim;2=Nao S
TRH_FLGCOM C 1 0 Completado? Pertence('12') 1=Nao Complementado;2=Complementado;3=Finalizado S
TRH_DTDIG D 8 0 Dt Digitacao 99/99/9999 R S
TRH_HRDIG C 5 0 Hr Digitacao 99:99 R S
TRH_MMSYP C 6 0 ChaveMM SYP @! R S
TRH_ORDEM C 6 0 Ordem Serv. @! R N
TRH_MMDAN2 C 6 0 ChaveMM SYP @! R N