MVSFORUMS.com

vjkumk · Beginner Joined: 28 Sep 2005 Posts: 98 Topics: 33

I am a beginner in mainframes.There are many dataformat for numeric like ZD,PD,BI,FI,etc.I am not sure which one to use for numeric(integer,fixed decimal).I also checked with the IBM manuals , but unable to get a clear idea.Please give a clear explanation on this.I see many people are not aware of this basic .Your help is appreciated.

thanks,
jai

kolusu · Posted: Sat Aug 26, 2006 7:49 pm Post subject:

vjkumk,

Check this link which answers your question

http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/ICE1CA10/C.3?DT=20050222160456

Hope this helps...

Cheers

Kolusu
_________________
Kolusu
www.linkedin.com/in/kolusu

vjkumk · Beginner Joined: 28 Sep 2005 Posts: 98 Topics: 33

Kolusu,

Thanks for your response.In IBM manuals, it is just given the equvalent cobol data types , but they haven't explained about the data types ZD,FD... in details.After a long search i found the following website ,which gives those datatypes in details and it is really worth to check it.It will be better if you put this information in a common section.

http://www.simotime.com/spsnum01.htm

If any body has more information on this data type formats,please post the information. Very Happy

cheers,
jai Smile

Frank Yaeger · Posted: Sun Aug 27, 2006 9:39 am Post subject:

vjkumk · Beginner Joined: 28 Sep 2005 Posts: 98 Topics: 33

Frank,

Thanks for posting the additional information.

I think the second link has more information compared to the first one.

cheers,
jai

vjkumk · Beginner Joined: 28 Sep 2005 Posts: 98 Topics: 33

HI,

can i know the corresponding PL1 equavalent data types of DFSORT.

thanks,
VJ

vjkumk · Beginner Joined: 28 Sep 2005 Posts: 98 Topics: 33

after searching the net , i got this information ,Correct me if i am wrong.

Pl1 attributes: Ibm data format:

fixed decimal====> Packed Decimal(two digits per byte)
fixed binary=====> Fixed point(halfword or fullword)(halfword - 2bytes)
float decimal,float binary ====>floating-point(fullword,doubleworld)
picture====>Zoned decimal(one digit per byte)
character or picture=====>character(one byte)
Bit =====>Bit(one byte)

cheers,
VJ

vjkumk · Beginner Joined: 28 Sep 2005 Posts: 98 Topics: 33

I think this will be useful for members

Supported data types between cobol and pl1:

COBOL: PL1:

PIC S9(4) USAGE IS BINARY---->REAL FIXED BINARY(15,0)
PIC S9(9) USAGE IS BINARY ---->REAL FIXED BINARY(31,0)
COMP-1 ----> REAL FLOAT DECIMAL(6)
COMP-2 ----->REAL FLOAT DECIMAL(16)
PIC S9(N) PACKED- DECIMAL ---->FIXED DECIMAL(n)
PIC S9(N) COMP-3 ------->FIXED DECIMAL(N)
PIC X(N) USAGE IS DISPLAY ----->CHARACTERS(N)

Cobol: PL1:
01 PLISTRING. PLISTRING CHAR(N) VARYING.
02 LEN PIC 9(4) BINARY .
02 CHAR PIC X OCCURS 1 TO N
DEPENDING ON LEN

I will be glad if any body post equvalent data type between DB2 ,COBOL & PL1 Very Happy

Cheers,
jai