Example 1: Close the customer master file CUSTMST.
CLOSE FILE(CUSTMST)
Example 2: Close all files which are active at this time.
CLOSE
Example 3: A temporary work file must be closed in order to clear the data.
CLOSE FILE(WORKFILE.QTEMP)
EXEC_CPF COMMAND('CLRPFM FILE(QTEMP/WORKFILE)')