(no subject)

I'm working on a service program on R510 that has the following defined in
it:

D EndedBadly      s               n

Now that we're using r510 on all the boxes, and Code/400 has the cool option
to convert it to /free I figure Why not?"

Well TIME to a 12 digit RESULT field is one reason, but...

anyway after conversion an attempt to compile generates a couple of the
following:

214800   If pa_BALANCE <> TestBalance;

214900     EndedBadly = *On;

======>       aaaaaaa

*RNF5247 20 a      214900  The scope delimiter of the ENDyy operation is not
valid.
215000   Else;

215100     EndedBadly = *Off;

======>       aaaaaaa

*RNF5247 20 a      215100  The scope delimiter of the ENDyy operation is not
valid.
215200   EndIF;

*RNF5247 20      4 The scope delimiter of the ENDyy operation is not valid.

Is EndedBadly some sort of IBM Reserved Word now?  :-)

Is this a bug or is it now impermissible to have field names that begin with
"end"?