IBM Mainframe Forum

Hi,
I would like to know if PIC 9(003) is represented/same as PIC S9(3)

Thanks in advance.

Regards,
Rishi.

riship wrote:I would like to know if PIC 9(003) is represented/same as PIC S9(3)

Almost, the 'S' forces COBOL to deal with each just a little differentl.
If I recall correctly, when data is moved into the field without the sign, COBOL will insure the last byte (where the sign is stored) has a positive sign.

Hello,

COBOL will insure the last byte (where the sign is stored) has a positive sign.

If the field is S9(3), cobol will generate a "C" sign. If the field is 9(3), cobol should generate an "F" sign. Both C and F are positive. A "D" sign is negative.

hi ,
they both vil take 3 bytes.u knw the sign is store in 'sign trailing ' format it is by default.
lik d no. is -321 so it stores lik 32(-1) tat vil become 32J.
according to zoned decimal form +1=A
+2=B nd so on......
nd -1 =J
-2 =K
girish kanswa
FCIL INDIA