LPARAMETERS tnOutFileHandle, tcTextFileName =FCLOSE(tnOutFileHandle) *-- We assume the database is open COPY PROCEDURES TO (tcTextFileName) ADDITIVE tnFileHandle = FOPEN(tcTextFileName) RETURN