I don't think the syntax checker knows or cares what the field type is. You assigned something to a field, OK that's allowed. The compiler knows what the field type really is, so it gets to say no, that doesn't work.
-----Original Message-----
From: RPG400-L [mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Marvin Radding
Sent: Monday, July 10, 2017 4:12 PM
To: RPG programming on the IBM i (AS/400 and iSeries) <rpg400-l@xxxxxxxxxxxx>
Subject: RE: figurative constants *YES & *NO?
But *ON & *OFF should work. Does it?
Thanks,
Marvin
No trees were killed in the sending of this message, but a large number of electrons were terribly inconvenienced, traumatized, triggered, and crying for their safe spaces.
-----Original Message-----
From: RPG400-L [mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Alan Campin
Sent: Monday, July 10, 2017 1:42 PM
To: RPG programming on the IBM i (AS/400 and iSeries) <rpg400-l@xxxxxxxxxxxx>
Subject: Re: figurative constants *YES & *NO?
*YES shouldn't work. It is not True/False. *TRUE or *FALSE should work but don't.
On Mon, Jul 10, 2017 at 1:33 PM, Dan <dan27649@xxxxxxxxx> wrote:
I inadvertently typed *YES where I intended to type *ON when assigning
a value to an indicator field, and I was surprised when the syntax
checker allowed it. Nothing on this was found in the updated v7r1 RPG
reference, so I tried to compile it. But it failed on RNF7416: "The
types of the right and left hand side do not match in the EVAL
operation." So, the compiler seems to recognize *YES as a valid token
of some type. I tried defining Confirm as char and int, same error.
Dcl-S Confirm ind;
...
Confirm = *YES;
On v7r1, latest/last TR and latest PTF groups.
- Dan
--
This is the RPG programming on the IBM i (AS/400 and iSeries)
(RPG400-L) mailing list To post a message email: RPG400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit:
https://urldefense.proofpoint.com/v2/url?u=http-3A__lists.midrange.com
_mailman_listinfo_rpg400-2Dl&d=DwICAg&c=S6jE3hMA0s16gx2_CUBBn4vjc1odLu
nI6MSvd_AfdV8&r=Ub_YbVSedaHB7-0yGANN94iTrfkU2nCKT1D5-5Jv01Y&m=mGe2MoDy
9RZKoSn2IPY9SDAeFMBp9vfsZPFM8T2tCvY&s=kfErR9u60PrlwxJmGLl3GsVyrQzJCtLH
ab12JH3I8Ag&e= or email: RPG400-L-request@xxxxxxxxxxxx Before posting,
please take a moment to review the archives at
https://urldefense.proofpoint.com/v2/url?u=http-3A__archive.midrange.com_rpg400-2Dl&d=DwICAg&c=S6jE3hMA0s16gx2_CUBBn4vjc1odLunI6MSvd_AfdV8&r=Ub_YbVSedaHB7-0yGANN94iTrfkU2nCKT1D5-5Jv01Y&m=mGe2MoDy9RZKoSn2IPY9SDAeFMBp9vfsZPFM8T2tCvY&s=jIqUL54yShCSD8zG8g37TbQ0dWECK-7OSjDoI5ZfJug&e= .
Please contact support@xxxxxxxxxxxx for any subscription related
questions.
Help support midrange.com by shopping at amazon.com with our affiliate
link:
https://urldefense.proofpoint.com/v2/url?u=http-3A__amzn.to_2dEadiD&d=
DwICAg&c=S6jE3hMA0s16gx2_CUBBn4vjc1odLunI6MSvd_AfdV8&r=Ub_YbVSedaHB7-0
yGANN94iTrfkU2nCKT1D5-5Jv01Y&m=mGe2MoDy9RZKoSn2IPY9SDAeFMBp9vfsZPFM8T2
tCvY&s=Jgl0_iQRO6rrt2yDSMgwJXi8B4Vv4IOJe51c4TR5l7s&e=
--
This is the RPG programming on the IBM i (AS/400 and iSeries) (RPG400-L) mailing list To post a message email: RPG400-L@xxxxxxxxxxxx To subscribe, unsubscribe, or change list options,
visit:
https://urldefense.proofpoint.com/v2/url?u=http-3A__lists.midrange.com_mailman_listinfo_rpg400-2Dl&d=DwICAg&c=S6jE3hMA0s16gx2_CUBBn4vjc1odLunI6MSvd_AfdV8&r=Ub_YbVSedaHB7-0yGANN94iTrfkU2nCKT1D5-5Jv01Y&m=mGe2MoDy9RZKoSn2IPY9SDAeFMBp9vfsZPFM8T2tCvY&s=kfErR9u60PrlwxJmGLl3GsVyrQzJCtLHab12JH3I8Ag&e=
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives at
https://urldefense.proofpoint.com/v2/url?u=http-3A__archive.midrange.com_rpg400-2Dl&d=DwICAg&c=S6jE3hMA0s16gx2_CUBBn4vjc1odLunI6MSvd_AfdV8&r=Ub_YbVSedaHB7-0yGANN94iTrfkU2nCKT1D5-5Jv01Y&m=mGe2MoDy9RZKoSn2IPY9SDAeFMBp9vfsZPFM8T2tCvY&s=jIqUL54yShCSD8zG8g37TbQ0dWECK-7OSjDoI5ZfJug&e= .
Please contact support@xxxxxxxxxxxx for any subscription related questions.
Help support midrange.com by shopping at amazon.com with our affiliate link:
https://urldefense.proofpoint.com/v2/url?u=http-3A__amzn.to_2dEadiD&d=DwICAg&c=S6jE3hMA0s16gx2_CUBBn4vjc1odLunI6MSvd_AfdV8&r=Ub_YbVSedaHB7-0yGANN94iTrfkU2nCKT1D5-5Jv01Y&m=mGe2MoDy9RZKoSn2IPY9SDAeFMBp9vfsZPFM8T2tCvY&s=Jgl0_iQRO6rrt2yDSMgwJXi8B4Vv4IOJe51c4TR5l7s&e=
Notice: This e-mail transmission may contain information that is proprietary, privileged and/or confidential and is intended exclusively for the person(s) to whom it is addressed. This message may also contain Protected Health Information (PHI) and must be treated confidentially and handled in accordance with HIPAA and other federal and state privacy laws. Any use, copying, retention or disclosure by any person other than the intended recipient or the intended recipient's designees is strictly prohibited. If you are not the intended recipient or their designee, please notify the sender immediately and delete this e-mail (and any accompanying attachments).
--
This is the RPG programming on the IBM i (AS/400 and iSeries) (RPG400-L) mailing list To post a message email: RPG400-L@xxxxxxxxxxxx To subscribe, unsubscribe, or change list options,
visit:
https://urldefense.proofpoint.com/v2/url?u=http-3A__lists.midrange.com_mailman_listinfo_rpg400-2Dl&d=DwICAg&c=S6jE3hMA0s16gx2_CUBBn4vjc1odLunI6MSvd_AfdV8&r=Ub_YbVSedaHB7-0yGANN94iTrfkU2nCKT1D5-5Jv01Y&m=mGe2MoDy9RZKoSn2IPY9SDAeFMBp9vfsZPFM8T2tCvY&s=kfErR9u60PrlwxJmGLl3GsVyrQzJCtLHab12JH3I8Ag&e=
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives at
https://urldefense.proofpoint.com/v2/url?u=http-3A__archive.midrange.com_rpg400-2Dl&d=DwICAg&c=S6jE3hMA0s16gx2_CUBBn4vjc1odLunI6MSvd_AfdV8&r=Ub_YbVSedaHB7-0yGANN94iTrfkU2nCKT1D5-5Jv01Y&m=mGe2MoDy9RZKoSn2IPY9SDAeFMBp9vfsZPFM8T2tCvY&s=jIqUL54yShCSD8zG8g37TbQ0dWECK-7OSjDoI5ZfJug&e= .
Please contact support@xxxxxxxxxxxx for any subscription related questions.
Help support midrange.com by shopping at amazon.com with our affiliate link:
https://urldefense.proofpoint.com/v2/url?u=http-3A__amzn.to_2dEadiD&d=DwICAg&c=S6jE3hMA0s16gx2_CUBBn4vjc1odLunI6MSvd_AfdV8&r=Ub_YbVSedaHB7-0yGANN94iTrfkU2nCKT1D5-5Jv01Y&m=mGe2MoDy9RZKoSn2IPY9SDAeFMBp9vfsZPFM8T2tCvY&s=Jgl0_iQRO6rrt2yDSMgwJXi8B4Vv4IOJe51c4TR5l7s&e=
midrange.com
