RE: First Free Format

[Joel Fritz <JFritz@xxxxxxxxxxxxxxxx>]

This message is in MIME format. Since your mail reader does not understand
this format, some or all of this message may not be legible.
--
[ Picked text/plain from multipart/alternative ]
'Course the dirty secret about switch in C is that it can only do a
comparison on an integer, which includes character, value and you have to
use the "break" keyword, kind of like "leave," to make the thing stop
executing comparisons.

I love SELECT. <g>

> -----Original Message-----
> From: Bob Cozzi [mailto:cozzi@rpgiv.com]
> Sent: Tuesday, July 30, 2002 2:52 PM
> To: rpg400-l@midrange.com
> Subject: RE: First Free Format
>
>
> The Select/When is a fine choice, and with the new elseif using IF and
> ELSEIF together are just a cool, I think.
>
> But what I wish the SELECT/WHEN did, was to allow a C-language-like
> SWITCH/CASE compatibility, like this:
>
>   SELECT  ErrorFlag
>   When    0
>   ...do this...
>   When    1
>   ...do that...
>   When    3
>   ...do the other thing..
>   endSel
>
> Oh, yeah, and I wish the ENDSL was spelled ENDSEL.
>
> Bob
>
> > -----Original Message-----
> > From: rpg400-l-admin@midrange.com
> > [mailto:rpg400-l-admin@midrange.com] On Behalf Of rob@dekko.com
> > Sent: Tuesday, July 30, 2002 4:26 PM
> > To: rpg400-l@midrange.com
> > Subject: RE: First Free Format
> >
> >
> > This is a multipart message in MIME format.
> > --
> > [ Picked text/plain from multipart/alternative ]
> > I am kind of curious too.  It's gotten to the point where I
> > avoid the IF statement and use a SELECT.  Even for a simple
> > one option.
> >
> > It really makes you think.
> >
> > For example, all of you people who use system().  Instead of
> > using if ErrorFlag<>0;
> >
> > you instead
> > Select
> > When ErrorFlag=0;
> > ...
> > When ErrorCPF=CPF....;
> > ...
> > Other;
> > EndSl;
> >
> > It just make you try to cover your bases better.
> >
> > Rob Berendt
> > --
> > "They that can give up essential liberty to obtain a little
> > temporary safety deserve neither liberty nor safety."
> > Benjamin Franklin
> >
> >
> >
> >
> > Scott Mildenberger <Smildenber@Washcorp.com>
> > Sent by: rpg400-l-admin@midrange.com
> > 07/30/2002 03:47 PM
> > Please respond to rpg400-l
> >
> >
> >         To:     "'rpg400-l@midrange.com'" <rpg400-l@midrange.com>
> >         cc:
> >         Fax to:
> >         Subject:        RE: First Free Format
> >
> >
> > Jeff,
> >
> > One question, why would you change the SELECT/WHEN to
> > IF/ELSEIF?  In my mind, the select makes it more obvious that
> > a choice is being made between mulitiple options.
> >
> > Just curious,
> >
> > Scott Mildenberger
> >
> > > -----Original Message-----
> > > From: Jeff Crosby [mailto:jlcrosby@DILGARDFOODS.COM]
> > > Sent: Tuesday, July 30, 2002 2:46 PM
> > > To: RPG400-L@midrange.com
> > > Subject: First Free Format
> > >
> > >
> > > The only problem I had was, when converting the few fixed-format
> > > statements left or changing SELECT/WHEN groups to IF/ELSEIF, was
> > > putting the semicolon at the end of each line.  But the
> > compiler let
> > > me know about that right off. <g>
> > _______________________________________________
> > This is the RPG programming on the AS400 / iSeries (RPG400-L)
> > mailing list To post a message email: RPG400-L@midrange.com
> > To subscribe, unsubscribe, or change list options,
> > visit: http://lists.midrange.com/cgi-bin/listinfo/rpg400-l
> > or email: RPG400-L-request@midrange.com
> > 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@midrange.com
> > To subscribe, unsubscribe, or change list options,
> > visit: http://lists.midrange.com/cgi-bin/listinfo/rpg400-l
> > or email: RPG400-L-request@midrange.com
> > 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@midrange.com
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/cgi-bin/listinfo/rpg400-l
> or email: RPG400-L-request@midrange.com
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/rpg400-l.
>
NOTICE:
All e-mail sent to or from this e-mail address will be received or otherwise
recorded by The Sharper Image corporate e-mail system and is subject to
archival, monitoring, review by and/or disclosure to Sharper Image security
and other management. This message is intended only for the use of the
addressee and may contain information that is privileged and confidential.
If you are not the intended recipient, dissemination of this communication
is prohibited.