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

        FN$STR
         LOC

                20

       DTR>