Find offset of first/last found substring

DATA: TEXT TYPE STRING VALUE 'RO_LL_OVER BEET_HOVEN',

      MOFF TYPE I VALUE '-1'.

FIND FIRST OCCURRENCE OF '_' IN TEXT IN CHARACTER MODE IGNORING CASE MATCH OFFSET MOFF.

WRITE:/ MOFF.

CLEAR MOFF.

MOFF = '-1'.

FIND ALL OCCURRENCES OF '_' IN TEXT IN CHARACTER MODE IGNORING CASE MATCH OFFSET MOFF.

WRITE:/ MOFF.