The UNSTRING statement separates contiguous data in a sending field and
  stores it in one or more receiving fields.

  Format -

   UNSTRING src-string

       [ DELIMITED BY [ALL] delim [ OR [ALL] delim ] ... ]

       INTO { dest-string [DELIMITER IN delim-dest] [COUNT IN countr] } ...

       [ WITH POINTER pointr ]

       [ TALLYING IN tally-ctr ]

       [ ON OVERFLOW stment ] [ NOT ON OVERFLOW stment ]

       [ END-UNSTRING ]