Difference between pic 9(4)v99 and pic s9(4)v99 comp-3

shivani97 · New User Joined: 01 Aug 2009 Posts: 1 Location: bangalore

Hi I have some question on comp-3.plz answer me.
1) what is difference between pic 9(4)v99 and pic s9(4)v99 comp-3.
2) what are valid moves to pic s9(4)v99 comp-3 variable.
for example: 1)if A is containing 4578.99,then MOVE A TO B.Is is correct or give error where B is pic s9(4)v99 comp-3.
2)Also MOVE 4578.99 TO B will give what value(same value or incorrect)
3)What will be answers of above if B is pic 9(4)v99.
I will be thankful if you answer my question.
SHIVANI

Binop B · Posted: Tue Aug 04, 2009 10:16 am

Hi Sivani,

What did the Manuals tell you... Did you have a look ??

Terry Heinze · Posted: Tue Aug 04, 2009 10:24 am

As Binop suggests, see the COBOL Language Reference Manual.

Escapa · Posted: Tue Aug 04, 2009 10:59 am

Check below links...
publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/handheld/Connected/BOOKS/IGY3LR10/5.3.16.1?SHELF=&DT=20020920180651&CASE=

publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/handheld/Connected/BOOKS/IGY3PG20/1.3.4.7?SHELF=&DT=20040220035836&CASE=

rexzone1 · Posted: Tue Dec 15, 2009 12:26 am

Hi Shivani,

Please find below the answers to your questions if you are not sure after reading the manuals above.

1) The difference between PIC 9(4)v99 and PIC S9(4)v99 comp-3 is only the memory occupied by both the fields. Your first field occupies 6 bytes where as the second field occupies 4 bytes.

2) You can move a normal decimal field PIC 9(4)V99 to COMP-3 field as well as PIC 9(4)V99 COMP to the COMP-3 field. You will get same value if you move 4578.99 to 9(4)V99 field.

Akatsukami · Posted: Tue Dec 15, 2009 1:47 am

Terry Heinze · Posted: Tue Dec 15, 2009 2:24 am

Hint: The COBOL Language Reference Manual has the answer.