UNSTRING DELIMITED BY IDENTIFIER

UNSTRING DELIMITED BY IDENTIFIER The following COBOL program depicts the use of  UNSTRING DELIMITED BY IDENTIFIER        01 WS-DATE       PIC X(10) VALUE ‘2011-01-15’.           05 WS-YYYY PIC 9999 VALUE ZEROES.           05 WS-MM   PIC 99   VALUE ZEROES.           05 WS-DD   PIC 99   VALUE ZEROES.        01 WS-DELIM   PIC X    VALUE ‘-‘.              UNSTRING WS-DATE  DELIMITED BY ALL WS-DELIM              DISPLAY ‘RESULT OF UNSTRING COMMAND :-‘ WS-DATE-FORMATTED. The output of the program is  RESULT OF UNSTRING COMMAND :-20110115