GETFILE( ) Function Example

CLOSE DATABASES
SELECT 0

gcTable = GETFILE('DBF', 'Browse or Create a .DBF:', 'Browse', 1;
   'Browse or Create')
DO CASE
   CASE 'Untitled' $ gcTable
      CREATE (gcTable)
   CASE EMPTY(gcTable)
      RETURN
   OTHERWISE
      USE (gcTable)
      BROWSE
ENDCASE