Re: Weirdness with * character

I agree - but so far reproducing it "on demand" is proving difficult. It is for sure though not limited to the internal emulator as my partner Susan had the same issue on her Mac and the Mac version of RDi doesn't support anything but the external ACS.


Jon Paris

www.partner400.com
www.SystemiDeveloper.com

On Jul 30, 2019, at 5:25 PM, Mark Murphy <jmarkmurphy@xxxxxxxxx> wrote:

Yep, works exactly how one would expect. But I am using Standalone iACS to
run it.

Did you say that they were using the terminal built into RDi? Maybe
something is getting corrupted there? Maybe shutdown RDi, reopen, and try
again? I don't use that component, but this so smells like a CCSID issue
and with RDi's less than perfectly stable reputation, maybe something is
getting horked up there.

On Tue, Jul 30, 2019 at 4:30 PM Jon Paris <jon.paris@xxxxxxxxxxxxxx> wrote:

Absolutely - this is one that exhibited the issue.

And please remember it is a teaching exercise - they hadn't learnt SELECT
or ELSEIF when they wrote this~!

dcl-s a int(10);
dcl-s b int(5) inz(100);
dcl-s c int(5) inz(50);
dcl-s Operator Char(1);

Dsply 'Select Operator (+ - * /):' ' ' Operator;

If Operator = '+';
a = b + c;
EndIf;

If Operator = '-';
a = b - c;
EndIf;

If Operator = '*';
a = b * c;
EndIf;

If Operator = '/';
a = b / c;
EndIf;

Dsply a;

*inlr = *on;


Jon Paris

www.partner400.com
www.SystemiDeveloper.com

On Jul 30, 2019, at 2:24 PM, Mark Murphy <jmarkmurphy@xxxxxxxxx> wrote:

That is very odd. Are the programs simple enough to share?

On Tue, Jul 30, 2019 at 2:15 PM Jon Paris <jon.paris@xxxxxxxxxxxxxx>

wrote:

None of the above Mark.

Sequence was.

Write program, compile it, run it - * works
Write second version of program adding additional logic. * doesn't work.
Tried first program again * doesn't work.

Same RDi session, same 5250 session, same user - and it all happened
within 30 minutes!


Jon Paris

www.partner400.com
www.SystemiDeveloper.com

On Jul 30, 2019, at 1:25 PM, Mark Murphy <jmarkmurphy@xxxxxxxxx>

wrote:

Was the failing program compiled by a different workstation using a
different CCSID? When constants are compiled, are they converted to the
run-time CCSID, or do they stay in the CCSID from the compile? I

suspect

the latter.

On Tue, Jul 30, 2019 at 12:45 PM Jon Paris <jon.paris@xxxxxxxxxxxxxx>

wrote:

That was my first thought David but the same 520 session produced
different results over a period of 30 minutes. No sign off/on - still

the

same session.


Jon Paris

www.partner400.com
www.SystemiDeveloper.com

On Jul 30, 2019, at 12:43 PM, David Gibbs via MIDRANGE-L <

midrange-l@xxxxxxxxxxxxxxxxxx> wrote:

On Tue, Jul 30, 2019 at 11:40 AM Jon Paris <jon.paris@xxxxxxxxxxxxxx

wrote:

Shouldn't be. This is a tiny partition that we only use for

training.

It has had the same set up since first created.

One of the people who experienced the problem had a 5250 session

running and didn't sign off/on or change anything between runs and

still

experieinced the problem.

Are all the workstations using the same code page?

I once had a problem where a '$' was being interpreted by the system
as a cents sign because the host was running with CCSID 37 but the
workstation was running in a non US-English code page.

david

--
IBM i on Power Systems: For when you can't afford to be out of

business!

I'm riding 65 miles in the American Diabetes Association's Tour de
Cure to raise money for diabetes research, education, advocacy, and
awareness. You can make a tax-deductible donation to my ride by
visiting https://mideml.diabetessucks.net.

You can see where my donations come from by visiting my interactive
donation map ... https://mideml.diabetessucks.net/map (it's a geeky
thing).

I may have diabetes, but diabetes doesn't have me!
--
This is the Midrange Systems Technical Discussion (MIDRANGE-L)

mailing

list

To post a message email: MIDRANGE-L@xxxxxxxxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: https://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxxxxxxxx
Before posting, please take a moment to review the archives
at https://archive.midrange.com/midrange-l.

Please contact support@xxxxxxxxxxxx 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 Midrange Systems Technical Discussion (MIDRANGE-L) mailing

list

To post a message email: MIDRANGE-L@xxxxxxxxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: https://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxxxxxxxx
Before posting, please take a moment to review the archives
at https://archive.midrange.com/midrange-l.

Please contact support@xxxxxxxxxxxx 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 Midrange Systems Technical Discussion (MIDRANGE-L) mailing

list

To post a message email: MIDRANGE-L@xxxxxxxxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: https://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxxxxxxxx
Before posting, please take a moment to review the archives
at https://archive.midrange.com/midrange-l.

Please contact support@xxxxxxxxxxxx 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 Midrange Systems Technical Discussion (MIDRANGE-L) mailing

list

To post a message email: MIDRANGE-L@xxxxxxxxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: https://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxxxxxxxx
Before posting, please take a moment to review the archives
at https://archive.midrange.com/midrange-l.

Please contact support@xxxxxxxxxxxx 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 Midrange Systems Technical Discussion (MIDRANGE-L) mailing

list

To post a message email: MIDRANGE-L@xxxxxxxxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: https://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxxxxxxxx
Before posting, please take a moment to review the archives
at https://archive.midrange.com/midrange-l.

Please contact support@xxxxxxxxxxxx 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 Midrange Systems Technical Discussion (MIDRANGE-L) mailing list
To post a message email: MIDRANGE-L@xxxxxxxxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: https://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxxxxxxxx
Before posting, please take a moment to review the archives
at https://archive.midrange.com/midrange-l.

Please contact support@xxxxxxxxxxxx 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 Midrange Systems Technical Discussion (MIDRANGE-L) mailing list
To post a message email: MIDRANGE-L@xxxxxxxxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: https://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxxxxxxxx
Before posting, please take a moment to review the archives
at https://archive.midrange.com/midrange-l.

Please contact support@xxxxxxxxxxxx for any subscription related questions.

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