STATIC FUNCTION CreateTable()
TCDelFile("VIEW1")
TCDelFile("T1")
DBCreate("T1", {{"FIELD_NAME", "C", 10, 0}, ;
{"FIELD_TYPE", "C", 10, 0}}, "TOPCONN")
RETURN
FUNCTION u_TCViewOne()
TCLink()
CreateTable()
IIF(TCViewOne("VIEW1", "T1"), CONOUT('TRUE'), CONOUT('FALSE')) // retorna .T., ou seja, criou a view VIEW1
IIF(TCViewOne("VIEW1", "T1"), CONOUT('TRUE'), CONOUT('FALSE')) // retorna .F., pois, VIEW1 já foi criada acima
IIF(TCViewOne("VIEW2", "T3"), CONOUT('TRUE'), CONOUT('FALSE')) // retorna .F., pois, a tabela T3 não existe no SGBD
IIF(TCViewOne("VIEW2", "VIEW1"), CONOUT('TRUE'), CONOUT('FALSE')) // retorna .F., pois, não é possível criar uma view a partir de outra view
TCUnlink()
RETURN