Alias name of a work area
FUNCTION Main() USE Test select 0 qOut( IF(DBF()=="","No Name",DBF())) Test->(qOut(DBF()) qOut(Alias(1)) RETURN NIL