#41 add COBOL 2002: VALUE clause for table and report-section

[Simon Sobisch]

These two formats for the value clause are currently missing

Format 2 (table --> OCCURS):

(VALUE [IS] | VALUES [ARE] ) { { literal-1 } ... FROM ( { subscript-1 } ... ) [ TO ( { subscript-2 } ... ) ] } ...

sample:

::cobolfree
01 town-record.
   03 town-name PIC X(20) OCCURS FROM 1 TO 6
      VALUES ARE "Leeds", "Bordeaux", "Pisa" FROM (1) TO (3)
                 "London", "Paris",   "Rome" FROM (4) TO (6).

Format 4 (report-section, instead of OCCURS):

(VALUE [IS] | VALUES [ARE] ) { { literal-1 } ... 

sample:

::cobolfree
03 LINES 2, 3.
   05 COLS ARE 13, 35, 56
      VALUES ARE "THIS" "NEXT" "SOME" "YEAR" "YEAR" "DAY".

I've assigned this to Ron in the hope he finds time to get this in.

Simon