Histórico da Página

STATIC FUNCTION CreateTable()
  TCDelFile("T1VIEW1")
  TCDelFile("T1VIEWT1")
  
  DBCreate("T1", {{"FIELD_NAME", "C", 10, 0}, ;
                  {"FIELD_TYPE", "C", 10, 0}}, "TOPCONN")
RETURN

FUNCTION u_TCIsView()
  TCLink()
  
  CreateTable()
  
  IF TCViewOne("T1VIEWVIEW1", "T1") == .F.
    UserException("TCViewOne falhou")
  ENDIF
  
  IIF(TCIsView("T1VIEWVIEW1"), CONOUT('TRUE'), CONOUT('FALSE'))  // retorna .T., ou seja, T1VIEWVIEW1 é uma view
  IIF(TCIsView("T1"),     CONOUT('TRUE'), CONOUT('FALSE'))  // retorna .F., pois, T1 é uma tabela
  
  TCUnlink()
RETURN