DTR> DECLARE WOMBAT PIC X(25).
       DTR> WOMBAT = "Wombats have sharp claws."
       DTR> PRINT FN$STR_EXTRACT (WOMBAT,9,4)

                  FN$STR
                  EXTRACT

       have

       DTR>