I'm attempting to read a file using the code below.  Could someone
please tell me why the fileSize& keeps returning 0?  Thanks.

local
dim fileName$,refNum%,fileSize&
local fn GetFile
fileName$=files$(_fOpen,,,refNum%)
open "I",#1,fileName$
fileSize&=lof(1,1)
print fileSize&
End fn

fn GetFile