Darn, Jerry! I guess I'm late to the party.
I've been working since 5:30 AM on something and didn't see that you already had
a response. I gotta stop using that Apple/Mac crap so early--it takes me away
from responding quickly. <tic>
-Bob
-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx [
mailto:rpg400-l-bounces@xxxxxxxxxxxx] On
Behalf Of Bob Cozzi
Sent: Friday, June 08, 2007 9:25 AM
To: 'RPG programming on the AS400 / iSeries'
Subject: RE: Missing Semi-Colon - Not
Jerry,
Any field with an opcode name, must not be used in an ambiguous manner.
Select = A + B;
Chain = D / C;
Have to be:
EVAL select = A + B;
EVAL chain = D / C;
Have fun!
-Bob
-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx [
mailto:rpg400-l-bounces@xxxxxxxxxxxx] On
Behalf Of Jerry Adams
Sent: Friday, June 08, 2007 7:53 AM
To: RPG Midrange
Subject: Missing Semi-Colon - Not
I am definitely losing it. Perhaps because it's early in the morning.
I am getting the following error while entering the following line.
While this snippet is from WDSc, I get the same error in SEU so this is
not a WDSc issue.
Select = 'LIBR/NV' + %editc(l$cust : 'X');
RNF5507E A semi-colon is not specified at the end of a free-format
specification.
This is odd because, as you can see, there is a semi-colon at the end of
the line. Odd, too, is that the examples in the ILE RPG Reference
manual are in fixed format, while nearly every other %bif is in /free
format.
midrange.com
