900-FIND-NXTRNG-CMT

900-FIND-NXTRNG-CMT-<FileName> finds the next comment for a record.

The order of the comments (by name, date, or time) is specified by the value of the CMT<Prefix>-CMT-ORDER variable.

Programming Example

The following example finds the next comment attachment, then displays the comment.

        PERFORM 900-FIND-NXTRNG-CMT-COMPANY.
        PERFORM 600-MOVE-TO-SCREEN
             THRU 600-END.