Re: how to create unsigned hexadecimal initial value

["Leif Svalgaard" <leif@xxxxxxxx>]

> From: <rjd@us.ibm.com>
> To: <MI400@midrange.com>
> Sent: Friday, August 25, 2000 9:50 AM
> Subject: Re: how to create unsigned hexadecimal initial value
>
>
> > Leif and others,
> >
> > Here's (my) better definition for H literals, which I think explains the
> > results seen in all of the examples brought forward so far.  I honestly
> > don't know if the PRM actually implements this definition, but it seems
to.
>

DCL DD NN BIN(2) INIT(H'8000')
Diagnostics
Initial value for data object too large.

DCL DD NN BIN(2) INIT(H'FFFF')
Diagnostics
Initial value for data object too large.

both are wrong, of course. This is closer to Gene's bug,
but different from the other bug I just reported.
Lesson:  H literals are buggy beasts, avoid them if possible.



+---
| This is the MI Programmers Mailing List!
| To submit a new message, send your mail to MI400@midrange.com.
| To subscribe to this list send email to MI400-SUB@midrange.com.
| To unsubscribe from this list send email to MI400-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: dr2@cssas400.com
+---