using Progess to seach Progress files.

[Irimis]

I was wondering if there is a way to open a progress file in progress as a text file and read line by line. Is there a way to bring each line is as a character string and search for file paths.

Code ____________Code
{file path} ___or__ run (File Path )
Code ____________Code

Can I pull out each line to search for path names? Searching each line is easy, but have not found anything on reading in single lines as input.

I am writing a program that will check all files to point out any file that is not being used anymore to free up space.

 

[jongpau]

Try something like this:

DEF VAR cLine AS CHAR NO-UNDO.
DEF VAR cFile AS CHAR NO-UNDO.

DEF STREAM sFile.

cFile = "abc.p":U.

INPUT STREAM sFile FROM VALUE(cFile) NO-ECHO.
REPEAT:
  SET STREAM sFile cLine.
  /* Your processing goes here */
END.
INPUT STREAM sFile CLOSE.

 

[Irimis]

Thanks alot.