getfile( ) º¯ÊýʾÀý

close databases
select 0
gctable = getfile('dbf', 'browse or create a .dbf:', 'browse',1)
do case
	case 'untitled' $ gctable
		create (gctable)
	case empty(gctable)
		return
	otherwise
		use (gctable)
		browse
endcase