900-DELETE-RNG

900-DELETE-RNG-CMT-<FileName> deletes a range of comments from the file. Use 900-DELETE-RNG-CMT-<FileName> rather than 900-DELETE-CMT-<FileName> if you want to delete a comment and then find the next comment.

Programming Example

The following example uses the L form action to allow users to delete a range of comments. 

          PERFORM 900-FIND-BEGRNG-CMT-COMPANY
          IF (KB01F4-FC = "L")
               PERFORM 900-DELETE-RNG-CMT-COMPANY
          END-IF