Re: Missing Semi-Colon - Not

[Jerry Adams <jerry@xxxxxxxxxxxxxxx>]

As you might have surmised, "Select" is/was the variable for ExtFile( ) 
on a UsrOpn table.  I thought it was a little odd that I didn't get an 
error on that line, too, once Peter pointed out the cause.  Plus, of 
course, the D-spec definition.


But sometimes reserved words aren't reserved words.  I rarely use the 
Eval in /free unless I need to Eval(h).  But based upon all of the 
comments here, it does seem reasonable (though confusing) that a 
normally reserved word could, also, be used as a variable.  For example, 
in the context in which I had originally coded it, it would be 
reasonable to the editor to assume that this was the beginning of a 
Select-EndSL group and that the semi-colon should come after "Select" 
and that the other stuff was clutter.


I do hate it, as you said earlier Michael, when the error message isn't 
really the error.  I kept looking at the ';' and scratching my head.  
But I can see that the message was correct, just hard to decipher 
because it focused my attention on a specific point.  Sometimes one 
can't see the forest for the trees.  Once Peter pointed out the cause, I 
did a Homer ('Doh!') and stood in the corner for five minutes.



        * Jerry C. Adams
*IBM System i5/iSeries Programmer/Analyst
B&W Wholesale Distributors, Inc.* *
voice
        615.995.7024
fax
        615.995.1201
email
        jerry@xxxxxxxxxxxxxxx <mailto:jerry@xxxxxxxxxxxxxxx>



Michael_Schutte@xxxxxxxxxxxx wrote:
> BTW, in Free  this does work.
>
> eval Select = 'LIBR/NV' + %editc(l$cust : 'X');
>
>
> Michael Schutte
> Admin Professional
> Bob Evans Farms, Inc.
> What's the secret? Find out at your Bob Evans Restaurant on May 17!
>
>
> rpg400-l-bounces@xxxxxxxxxxxx wrote on 06/08/2007 08:18:15 AM:
>
>   
> > Must be, all mine are RPGLE so it must be something to do with the
> > FREE stuff, I shall have to remember that if they ever get converted
> >
> > -----Oorspronkelijk bericht-----
> > Van: rpg400-l-bounces@xxxxxxxxxxxx
> > [mailto:rpg400-l-bounces@xxxxxxxxxxxx]Namens
> > Michael_Schutte@xxxxxxxxxxxx
> > Verzonden: vrijdag 8 juni 2007 14:14
> > Aan: RPG programming on the AS400 / iSeries
> > Onderwerp: RE: Missing Semi-Colon - Not
> >
> >
> > Could it be a problem if the program type is SQLRPGLE?
> >
> >
> > Michael Schutte
> > Admin Professional
> > Bob Evans Farms, Inc.
> > What's the secret? Find out at your Bob Evans Restaurant on May 17!
> >
> >
> > rpg400-l-bounces+michael_schutte=bobevans.com@xxxxxxxxxxxx wrote on
> > 06/08/2007 08:11:28 AM:
> >
> >     
> > > No Thats not right I have many programs with a field called Select
> > > in they work ok
> > >
> > > Steve
> > >
> > > -----Oorspronkelijk bericht-----
> > > Van: rpg400-l-bounces@xxxxxxxxxxxx
> > > [mailto:rpg400-l-bounces@xxxxxxxxxxxx]Namens Peter.Colpaert@xxxxxxxxx
> > > Verzonden: vrijdag 8 juni 2007 13:57
> > > Aan: RPG programming on the AS400 / iSeries
> > > Onderwerp: Re: Missing Semi-Colon - Not
> > >
> > >
> > > Jerry,
> > >
> > > I think (judging from the colour tokenizing) that you can't use Select
> > >       
> as
>   
> > > a field name.
> > >
> > > It's probably a reserved word, thus a big nono.
> > >
> > > HTH,
> > >
> > > Peter Colpaert
> > > Application Developer
> > > PLI - IT - Kontich, Belgium
> > > -----
> > > Yoda of Borg are we.  Futile is resistance, assimilated will you be.
> > > -----
> > >
> > >
> > >
> > > Jerry Adams <jerry@xxxxxxxxxxxxxxx>
> > > Sent by: rpg400-l-bounces@xxxxxxxxxxxx
> > > 08/06/2007 14:52
> > > Please respond to
> > > RPG programming on the AS400 / iSeries <rpg400-l@xxxxxxxxxxxx>
> > >
> > >
> > > To
> > > RPG Midrange <rpg400-l@xxxxxxxxxxxx>
> > > cc
> > >
> > > 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.
> > >
> > >
> > > --
> > >                  * Jerry C. Adams
> > >
> > > --
> > > This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing
> > >       
> > list
> >     
> > > To post a message email: RPG400-L@xxxxxxxxxxxx
> > > To subscribe, unsubscribe, or change list options,
> > > visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
> > > or email: RPG400-L-request@xxxxxxxxxxxx
> > > Before posting, please take a moment to review the archives
> > > at http://archive.midrange.com/rpg400-l.
> > >
> > >
> > > --
> > > This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing
> > >       
> > list
> >     
> > > To post a message email: RPG400-L@xxxxxxxxxxxx
> > > To subscribe, unsubscribe, or change list options,
> > > visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
> > > or email: RPG400-L-request@xxxxxxxxxxxx
> > > Before posting, please take a moment to review the archives
> > > at http://archive.midrange.com/rpg400-l.
> > >
> > >       
> > --
> > This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing
> >     
> list
>   
> > To post a message email: RPG400-L@xxxxxxxxxxxx
> > To subscribe, unsubscribe, or change list options,
> > visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
> > or email: RPG400-L-request@xxxxxxxxxxxx
> > Before posting, please take a moment to review the archives
> > at http://archive.midrange.com/rpg400-l.
> >
> >
> > --
> > This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing
> >     
> list
>   
> > To post a message email: RPG400-L@xxxxxxxxxxxx
> > To subscribe, unsubscribe, or change list options,
> > visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
> > or email: RPG400-L-request@xxxxxxxxxxxx
> > Before posting, please take a moment to review the archives
> > at http://archive.midrange.com/rpg400-l.
> >
> >     
>
>