Re: Clear *INxx --> Compilation Error in Free Format

I think maybe that this difference in behavior might be due to one difference in the compiler's default treatment of unused variables. Any variable that is not used is not defined, so I guess a CLEAR does not count as being used as such, until it's defined anyway.

Maybe a D-spec setting up an array with name *IN, type "N" (indicator) elem(99)? I've used that as a subfield array in a data structure to overlay it with named indicators for function keys. (using INZ on the data structure level spec).

Alan

On 2/22/2011 10:43 AM, Birgitta Hauser wrote:

Hi guys,

Bug or feature?

Someone already encountered this:

An old RPG (written in fixed format RPG) with display file was converted
into Free-Format (with WDSC/RSE/RDi).
Instead of specifying MOVE *OFF *INxx (or EVAL *INxx = *OFF) the Opcode
CLEAR was used.
Before changing to free format, the program was compiled and could be run
without problems.

But after conversion to free format, we got compile errors, because only
indicators that are set (with EVAL or MOVE) can be cleared.
Indicators that are only cleared but never moved *ON or *OFF cause an
RNF7030 Error.

Shall we open an PMR?
(Our test machine is Release V5R4!)

Mit freundlichen Grüßen / Best regards

Birgitta Hauser

"Shoot for the moon, even if you miss, you'll land among the stars." (Les
Brown)
"If you think education is expensive, try ignorance." (Derek Bok)
"What is worse than training your staff and losing them? Not training them
and keeping them!"