LPARAMETERS tcFileName *-- Returns the size of a file. SET COMPATIBLE must be ON for *-- FSIZE() to return the size of a file. Otherwise, it returns *-- the size of a field. LOCAL lcSetCompatible, lnFileSize lcSetCompatible = SET('COMPATIBLE') SET COMPATIBLE ON lnFileSize = FSIZE(tcFileName) SET COMPATIBLE &lcSetCompatible RETURN lnFileSize