Tabela
TFI LOCACAO DE EQUIPAMENTOS
Campo Tipo Tamanho Decimal Titulo Formato Validacao F3 Contexto Lista Condicao PYME
TFI_FILIAL C 2 0 Filial R S
TFI_COD C 6 0 Codigo @! NaoVazio() .AND. ExistChav('TFI') R S
TFI_LOCAL C 8 0 Local @! ExistCpo('ABS') ABS R S
TFI_ITEM C 2 0 Item @! R S
TFI_PRODUT C 15 0 Produto @! ExistCpo('SB1') .AND. ExistCpo('SB5') .And. At740VldPrd(4, M->TFI_PRODUT) TECPRD R S
TFI_DESCRI C 30 0 Descricao @! V S
TFI_UM C 2 0 Unidade @! Vazio() .OR. ExistCpo('SAH') V S
TFI_TPCOBR C 1 0 Tp. Cobranca @! Pertence("12") R 1=Dias;2=Horimetro S
TFI_QTDVEN N 11 0 Quantidade @E 99,999,999,999 Positivo() R S
TFI_SEPSLD N 11 0 Saldo Separ. @E 99,999,999,999 Positivo() .And. M->TFI_SEPSLD <= FwFldGet("TFI_QTDVEN") R S
TFI_PERINI D 8 0 Per. Inicio R S
TFI_PERFIM D 8 0 Per. Final R At740WhenR() S
TFI_HORAIN C 5 0 Hora Inicio 99:99 AtVldHora(FwFldGet("TFI_HORAIN")) R S
TFI_HORAFI C 5 0 Hora Final 99:99 AtVldHora(FwFldGet("TFI_HORAFI")) R S
TFI_TOTAL N 14 2 Vlr.Total @E 99,999,999,999.99 R S
TFI_DESCON N 5 2 %Desconto @E 99.99 R S
TFI_VALDES N 14 2 Vlr.Desconto @E 99,999,999,999.99 Positivo() R S
TFI_TES C 3 0 Tipo Saida @! ExistCpo("SF4") .AND. M->TFI_TES > "500" SF4 R S
TFI_SEPARA C 1 0 Eq. Separado @! Pertence("12") R 1=Sim;2=Nao S
TFI_CODPAI C 6 0 Loc x Propos @! NaoVazio() .And. ExistCpo("TFL") R S
TFI_CONTRT C 15 0 Nr. Contrato @! R S
TFI_CONREV C 3 0 Revisao @! R S
TFI_RESERV C 6 0 Cod. Reserva @! Vazio() .Or. ExistCpo ("TEW", M->TFI_RESERV, 13) R S
TFI_CODSUB C 6 0 Cod. Subst. @! R S
TFI_OK C 2 0 Ok R S
TFI_CODTGQ C 6 0 Codigo Req. @! Vazio() .or. ExistCpo("TGQ") R S
TFI_ITTGR C 2 0 Item Req. @! R S
TFI_CODATD C 6 0 Atendente @! Vazio() .Or. ExistCpo("AA1") R S
TFI_NOMATD C 30 0 Nome Atenden @! V S
TFI_ENCE C 1 0 Encerrado? @9 Pertence("12") R 1=Sim;2=Nao S
TFI_ENTEQP D 8 0 Agenda. Ent. At740VldAg("TFI_ENTEQP",FwFldGet("TFI_PERINI"),FwFldGet("TFI_PERFIM"),FwFldGet("TFI_ENTEQP"),FwFldGet("TFI_COLEQP")).OR.Vazio() R S
TFI_COLEQP D 8 0 Coleta Equip At740VldAg("TFI_COLEQP",FwFldGet("TFI_PERINI"),FwFldGet("TFI_PERFIM"),FwFldGet("TFI_ENTEQP"),FwFldGet("TFI_COLEQP")).OR.Vazio() R S
TFI_APUMED C 1 0 Tp. Apuracao @9 !Vazio() .And. Pertence("123456") .And. At740ValAM() R #TxcBox("TFI_APUMED") Empty(SuperGetMv("MV_TRVMED",," ")) S
TFI_OSMONT C 1 0 Exige Mont? @9 Pertence("12") R 1=Sim;2=Nao S
TFI_CONENT C 1 0 Confir. Entr @9 Pertence("12") R 1=Sim;2=Nao S
TFI_CONCOL C 1 0 Conf. Coleta @9 Pertence("12") R 1=Sim;2=Nao S
TFI_CHVTWO C 21 0 Chv Facilita @! R S
TFI_DTPFIM D 8 0 Dt. FIm Prev V S
TFI_SRVEXT C 1 0 Serv. Extra? @! R 1=Sim;2=Nao S
TFI_ITCNB C 3 0 Item CNB R S
TFI_CALCMD M 10 0 Mem. de Calc R S
TFI_PLACOD C 6 0 Codigo Plan @! R S
TFI_PLAREV C 3 0 Revisao Plan @999 R S
TFI_TESPED C 3 0 TES Pedido @! ExistCpo("SF4") .And. (FwFldGet("TFI_TESPED") > '500') SF4 R S