strtest.i

    begin
      string (255) s,a,b,c
      a = "UNDEFa"; b = "UNDEFb"; c = "UNDEFc"
      s = "text0text1text2text3text4text5text6"
      if s-> a.("text1").b.("text3").c.("text9") then start
        printstring("So it does ignore text before and after...")
        newline
      finish else start
        printstring("resolve must match start & end"); newline
        printstring("s-> """.a.""".(""text1"").""".b.""".(""text3"").""".c.""""); newline
      finish
    endofprogram