VALUELISTFROM attribute

The VALUELISTFROM attribute specifies an unsubscripted structure reference whose elements all have the VALUE attribute and which should be used to define a VALUELIST for the current declaration.

   
  dcl 1 a, 2 b fixed bin value(31), 2 c fixed bin value(28), 2 d fixed bin value(31);
  dcl x fixed bin valuelistfrom a;