7.14.3 CLOSE Examples

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)')