Histórico da Página

FUNCTIONuser function Exampletest()
  Local cT1 := "T1"

  TCLink()
  
  DBCreate('T1', {{"FIELD_NAME", "C", 10, 0}, ;
                  {"FIELD_TYPE"   , "C", 10, 0}}, 'TOPCONN')
  
  DBUseArea(.F., 'TOPCONN', cT1, (cT1), .F., .F.)
  
  (cT1)->(DBCreateIndex('T1_IND', 'FIELD_NAME', { || 'FIELD_NAME' }))
  
  (cT1)->(DBSetIndex('T1_IND'))
  
  // TODO:
  
  // Limpa todos os indices
  (cT1)->(DBClearIndex())
  
  // TODO:
 
  DBCloseArea()
  
  TCUnlink()
RETURNreturn