1 SCRATCH
 The SCRATCH statement deletes  the  Current  Record  and  all  following
 records in an RMS sequential file.

 Example

 SCRATCH #4%

2 Syntax

     SCRATCH #chnl-exp