Tabela
TQL INVENTARIO DAS BOMBAS
Campo Tipo Tamanho Decimal Titulo Formato Validacao F3 Contexto Lista Condicao PYME
TQL_FILIAL C 2 0 Filial S
TQL_POSTO C 6 0 Posto Int. @! ExistCpo('TQF',M->TQL_POSTO) .AND. MNT625TAN(M->TQL_POSTO,M->TQL_LOJA) NGN R lPosto S
TQL_LOJA C 2 0 Loja @! IF(VAZIO(),.T.,EXISTCPO('TQF',M->TQL_POSTO+M->TQL_LOJA)) R S
TQL_NOME C 40 0 Nome @S20 V S
TQL_DTCOLE D 8 0 Data Coleta 99/99/9999 VALDT(M->TQL_DTCOLE) R S
TQL_TANQUE C 2 0 Tanque @! ExistCpo('TQI',M->TQL_POSTO+M->TQL_LOJA+M->TQL_TANQUE) .AND. MNT625BOM(M->TQL_POSTO,M->TQL_LOJA,M->TQL_TANQUE) NGM R S
TQL_BOMBA C 3 0 Bomba @! EXISTCPO('TQJ',M->TQL_POSTO+M->TQL_LOJA+M->TQL_TANQUE+M->TQL_BOMBA) TQJ R S
TQL_FUNINI C 6 0 Fun. Inicial @! ExistCpo('SRA',M->TQL_FUNINI) .And. MNA630FM() CAD R S
TQL_FUNNOM C 30 0 Nome @! R S
TQL_HRINIC C 5 0 Hora Inicial 99:99 NGVALHORA(M->TQL_HRINIC,.T.) .AND. MNA630HO(M->TQL_HRINIC,M->TQL_HRFIM,1) R S
TQL_POSINI N 9 2 Posicao Inic @E 999,999.99 MNA630PI(M->TQL_POSINI, M->TQL_DTCOLE, TQJ->TQJ_MOTIVO) R S
TQL_FUNFIM C 6 0 Fun. Final @! ExistCpo('SRA',M->TQL_FUNFIM) .And. MNA630FF() CAD R S
TQL_FUNNOF C 30 0 Nome @! R S
TQL_HRFIM C 5 0 Hora Final @! 99:99 NGVALHORA(M->TQL_HRFIM,.T.) .AND. MNA630HO(M->TQL_HRINIC, M->TQL_HRFIM,2) R S
TQL_POSFIM N 9 2 Posicao Fim @E 999,999.99 MNA630PF(M->TQL_POSINI, M->TQL_POSFIM, TQJ->TQJ_MOTIVO) R S
TQL_CONSUM N 11 2 Consumo @E 99,999,999.99 R S