Re: single Line If stateement

Niels, did you find the link? I was looking for this earlier, didn't
have the right search.

Vern

On 9/6/2020 3:54 PM, Niels Liisberg wrote:

There is an RFE out there for ternary if in RPG. Go and vote for it if

you

like it

søn. 6. sep. 2020 kl. 18.36 skrev Maria Lucia Stoppa <mlstoppa@xxxxxxxxx
:

I regularly use it the way John suggested, otherwise I write the whole

if.

Il dom 6 set 2020, 16:28 Chris Holko <christopherholko@xxxxxxxxx> ha

scritto:

I always wanted and IIF function so usually just write one myself

On Sep 6, 2020, at 10:16 AM, John Yeung <gallium.arsenide@xxxxxxxxx>

wrote:

On Sun, Sep 6, 2020 at 9:27 AM Alan Campin <alan0307d@xxxxxxxxx>

wrote:

Years ago, a boss of mine did something like this
If Identity = Yes:'Y':'N';
which doesn't compile.

If the variable being assigned was an indicator, then perhaps you are
thinking of something of the form
my_ind = (test > threshold);
No IF at all, but it's one line, which folks who don't know (or don't
like) that idiom would do like this:
if test > threshold;
my_ind = *on;
else;
my_ind = *off;
endif;
But if you really are thinking of a character variable, taking on
possibly 'Y' or 'N', then the custom subprocedure (function) approach
is the nicest I can think of. (Maybe some would say "use embedded SQL
instead".)
John Y.
--
This is the RPG programming on IBM i (RPG400-L) mailing list
To post a message email: RPG400-L@xxxxxxxxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: https://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxxxxxxxx
Before posting, please take a moment to review the archives
at https://archive.midrange.com/rpg400-l.
Please contact support@xxxxxxxxxxxxxxxxxxxx for any subscription

related questions.

Help support midrange.com by shopping at amazon.com with our

affiliate

link: https://amazon.midrange.com
--
This is the RPG programming on IBM i (RPG400-L) mailing list
To post a message email: RPG400-L@xxxxxxxxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: https://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxxxxxxxx
Before posting, please take a moment to review the archives
at https://archive.midrange.com/rpg400-l.
Please contact support@xxxxxxxxxxxxxxxxxxxx for any subscription

related

questions.
Help support midrange.com by shopping at amazon.com with our affiliate
link: https://amazon.midrange.com

--

This is the RPG programming on IBM i (RPG400-L) mailing list

To post a message email: RPG400-L@xxxxxxxxxxxxxxxxxx

To subscribe, unsubscribe, or change list options,

visit: https://lists.midrange.com/mailman/listinfo/rpg400-l

or email: RPG400-L-request@xxxxxxxxxxxxxxxxxx

Before posting, please take a moment to review the archives

at https://archive.midrange.com/rpg400-l.



Please contact support@xxxxxxxxxxxxxxxxxxxx for any subscription

related

questions.



Help support midrange.com by shopping at amazon.com with our affiliate
link: https://amazon.midrange.com

--
This is the RPG programming on IBM i (RPG400-L) mailing list
To post a message email: RPG400-L@xxxxxxxxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: https://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxxxxxxxx
Before posting, please take a moment to review the archives
at https://archive.midrange.com/rpg400-l.

Please contact support@xxxxxxxxxxxxxxxxxxxx for any subscription related
questions.

Help support midrange.com by shopping at amazon.com with our affiliate
link: https://amazon.midrange.com