I have had a limited amount of success with this:
RENAME name.DOC TO name.TXT
STORE FOPEN('name.TXT',12) TO file_handle
STORE FSEEK(file_handle, 1, 2) TO lcrow
STORE FSEEK(file_handle, 0) TO ifp_top
lcLetter = FREAD(file_handle, lcrow)
t_string = ""
FOR t_loop = 1 TO LEN(LCLETTER)
IF...