Subj : close file in REXX
To   : Bryan Rubingh
From : Herbert Rosenau
Date : Thu Aug 03 2000 10:36 am

Am 02.08.00 00:00 schrieb Bryan Rubingh

 BR> I've written a REXX program which reads one file, changes a few
 BR> lines as it reads and writes to a second file, doing the above
 BR> one line at a time.  When it reaches the end of the first file, I
 BR> want to copy the second file (the one REXX created) to another
 BR> location.  I've tried just doing: copy file2 file3 but I get an
 BR> OS/2 error when running the program that file2 is in use. Is
 BR> there any way in REXX to close the file so that the OS can copy
 BR> it?

f = 'c:\config.sys'

rc = stream(f, 'C', OPEN READ)
if rc <> 'READY:' then return 1
do while lines(f) > 0
   zeile = linein(f)
   /* do anything with zeile */
end
rc = stream(f, "C", "CLOSE")

--- Sqed/32 1.15/development  387:
 * Origin: Kann den DFUe Suende sein ?! (2:2476/493)

.