Love Arexx and women too :) why there all different but still attractive
OPTIONS RESULTS


IF OPEN(input,"Ram:bar.bat", R) THEN DO

DO UNTIL EOF(input)

line=READLN(input)
SAY line
SAY SUBSTR(line,11,26)
SAY SUBSTR(line,11,24)'txt'
infile=SUBSTR(line,11,26)
outfile=SUBSTR(line,11,24)'txt'
SAY infile
SAY outfile
IF OPEN(input1,infile, R) THEN DO
IF ~OPEN(output,outfile,W) THEN CALL ERROR

DO UNTIL EOF(input1)
line1=READLN( input1)
IF POS('(',line1) =1 THEN WRITELN(output, line1) /* line begins with '(' at POS 1 */
END


CLOSE(input1)
CLOSE(output)



END

EXIT

ERROR:
SAY "ERROR"

EXIT
The script only returns one output file..the first one...i am not initializing the first loop correctly?