Did you read what I wrote? The code you wrote has nothing to do with the 
expression I gave.  How about

DECLARE (I, J) FIXED DECIMAL (15);
I = 4; J = 3;
PUT ((I/J*J));


--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3


________________________________________
From: IBM Mainframe Discussion List <IBM-MAIN@LISTSERV.UA.EDU> on behalf of 
Robin Vowels <robi...@dodo.com.au>
Sent: Monday, September 7, 2020 5:49 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: PL/I integers (was: Constant Identifiers)

On 2020-09-07 16:13, Seymour J Metz wrote:
> PL/I has never had integers.

You are still wrong.

Recently you have made numerous erroneous claims about PL/I.

4 is an integer in PL/I.
3 is an integer in PL/I.

> The arithmetic rules for scaled fixed
> point are different from those for integers.

Scaled, with a scale factor other than zero and with
a fractional part, yes, because they are not then integers.
However, with scale factor of zero, they are integers.

> In integer arithmetic,
> (4/3)*6 is 6 That's not the result you get in PL/I.

With the following declarations, you'll get the same
result in PL/I, namely, 6:
DECLARE (I, J) FIXED DECIMAL (15);
I = 4; J = 3;
PUT (I/J);
will print 6

> ________________________________________
> From: IBM Mainframe Discussion List <IBM-MAIN@LISTSERV.UA.EDU> on
> behalf of Robin Vowels <robi...@dodo.com.au>
> Sent: Sunday, September 6, 2020 7:06 PM
> Subject: Re: Constant Identifiers
>
> ----- Original Message -----
> From: "Seymour J Metz" <sme...@gmu.edu>
> To: <IBM-MAIN@LISTSERV.UA.EDU>
> Sent: Monday, September 07, 2020 5:33 AM
>
>
>> PL/I doesn't have integers.
>
> PL/I has always had integers.
>
>> The ratiio 4/3 is FIXED BIN,
>
> No it not.  It is FIXED DECIMAL -- as I said a few days ago.
> And it hasn't changed since.
>
>> with some number of bits after the binary point.
>
> DECIMAL digits after the decimal point, because the result
> is FIXED DECIMAL, not binary.

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Reply via email to