*------------------------* V + ->->---COMPUTE identifier-1--*----------*---------------------> *-ROUNDED--* ->---- = arithmetic-expression------------------------------> ->---*--------------------------------------------*----------> *-*----*--SIZE ERROR imperative-statement-1--* *-ON-* ->---*-------------------------------------------------*-----> *--NOT-*----*--SIZE ERROR imperative-statement-2--* *-ON-* ->---*---------------*---------------------------------------><- *--END-COMPUTE--*
(C) Copyright IBM Corporation 1992, 2006. All Rights Reserved.