A program may open with any number of CTL-OPT statements; their keywords
accumulate into one control specification. Splitting them one per concern is
ordinary style:
**FREE
CTL-OPT DFTACTGRP(*NO);
CTL-OPT DECEDIT('0.');
CTL-OPT TEXT('Order entry');
Where the same keyword appears more than once - whether across statements or twice within one - the first occurrence wins and the later one is discarded. So in
CTL-OPT DECEDIT('0.');
CTL-OPT DECEDIT('.');
the program runs with DECEDIT('0.'): the repeat is reported and the later
value ignored, as warning
TRN0017
against the discarded occurrence - the line named is the one that had no
effect. It is a warning, not an error, so the program still compiles.
The same applies to fixed-format H-specs, which accumulate across lines under the identical first-wins rule:
H DFTACTGRP(*NO)
H DECEDIT('0.')