VMS Help
COBOL, PROCEDURE_DIVISION, UNSTRING

 *Conan The Librarian

  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 ]

  1 - src-string

  is the identifier of an alphanumeric class data item.  It cannot be
  reference modified. Src-string is the sending field.

  2 - delim

  is a nonumeric literal or the identifier of an alphanumeric data item.
  It is the delimiter for the UNSTRING operation.

  3 - dest-string

  is the identifier of an alphanumeric, alphabetic, or numeric DISPLAY
  data item.  It is the receiving field for the data from src-string.

  4 - delim-dest

  is the identifier of an alphanumeric data item.  It is the receiving
  field for delimiters.

  5 - countr

  is the identifier of an elementary numeric data item described as an
  integer.  It contains the count of characters moved.

  6 - pointr

  is the identifier of an elementary numeric data item described as an
  integer.  It points to the current character position in src-string.

  7 - tally-ctr

  is the identifier of an elementary numeric data item described as an
  integer.  It counts the number of dest-string fields accessed during
  the UNSTRING operation.

  8 - stment

  is an imperative statement.
  Close     Help