Too many files open

In a long "working ok" process, I am receiving this error now:
 
  2800 - CPYTOSTMF FROMMBR('/QSYS.LIB/QTEMP.LIB/EDI214.FILE/EDI214.MBR')

  TOSTMF('/TMP/EDI856.TXT') STMFOPT(*REPLACE) DBFCCSID(37)

  STMFCODPAG(*PCASCII)

Too many open files for process.

 
                         Additional Message Information

 

 Message ID . . . . . . :   CPFA0A4       Severity . . . . . . . :   40

 Message type . . . . . :   Diagnostic

 Date sent  . . . . . . :   08/05/04      Time sent  . . . . . . :
05:05:25   
 

 Message . . . . :   Too many open files for process.

 Cause . . . . . :   The process maximum number of open files has been
reached. 
    No additional files can be opened.

 Recovery  . . . :   Close some of the open files or wait until some
files have 
   been closed and then retry the operation.

 
 
I added a RCLRSC before the CPYTOSTMF, but that didn't help things.
 
This CLP copies files to the IFS (lots of them), then uses Brad Stones
GETURI to transmit them to a web service.
 
Any ideas?

 
Art Tostaine, Jr.
CCA, Inc.
Jackson, NJ 08527