RE: Parameters passed to RPG

["RAJEEV ASTHANA" <rajeevasthana@xxxxxxxxxxx>]

Hi Everybody,

Thanks a lot. I got what I wanted.

Thanks again ans Happy new year.

Rajeev.



From: Joe Teff <jteff19@idt.net>
To: "MIDRANGE-L@midrange.com" <MIDRANGE-L@midrange.com>
Subject: RE: Parameters passed to RPG
Date: Wed, 30 Dec 1998 22:31:04 -0600
Reply-To: MIDRANGE-L@midrange.com

>> X'19' needs to be X'019F'
>> X'981024' needs to be X'0981024F'

> But why I need to expand it to 4 or to 8 digits when it's already an 
> even no. of digits.

The right most 4-bits is the sigh (i.e. the F). This is required for a
packed decimal field. '19' is an even number, but it has to be '19F'.
That makes it odd, so we add a zero to the front to get it even. The
number would actually take up 2 bytes (8 bits per byte).

              0      1            9       F
           0000 0001      1001 1111
           -1st byte -        - 2nd byte -

+---
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to MIDRANGE-L@midrange.com.
| To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com.
| To unsubscribe from this list send email to 
MIDRANGE-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: 
david@midrange.com
+---



______________________________________________________
Get Your Private, Free Email at http://www.hotmail.com
+---
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to MIDRANGE-L@midrange.com.
| To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com.
| To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---