MVSFORUMS.com Forum Index MVSFORUMS.com
A Community of and for MVS Professionals
 
 FAQFAQ   SearchSearch   Quick Manuals   RegisterRegister 
 ProfileProfile   Log in to check your private messagesLog in to check your private messages   Log inLog in 

Conversion from Cobol to PL/I

 
Post new topic   Reply to topic   printer-friendly view    MVSFORUMS.com Forum Index -> Application Programming
View previous topic :: View next topic  
Author Message
karunkallore
Beginner


Joined: 11 Dec 2004
Posts: 103
Topics: 39

PostPosted: Sat Feb 19, 2005 2:16 pm    Post subject: Conversion from Cobol to PL/I Reply with quote

Dear Friends,

can you please tell me the equivalent of S9(4) COMP in PL/I.

Also can can you please tell me where i can get a table of these kind of equivalent conversion.

Thanks
Karun!
Back to top
View user's profile Send private message Send e-mail
Mervyn
Moderator


Joined: 02 Dec 2002
Posts: 415
Topics: 6
Location: Hove, England

PostPosted: Sat Feb 19, 2005 5:56 pm    Post subject: Reply with quote

1. FIXED BIN(15)

2. I don't know about a table, but you can probably glean the information you need from the manuals.
_________________
The day you stop learning the dinosaur becomes extinct
Back to top
View user's profile Send private message
kolusu
Site Admin
Site Admin


Joined: 26 Nov 2002
Posts: 12378
Topics: 75
Location: San Jose

PostPosted: Mon Feb 21, 2005 8:28 am    Post subject: Reply with quote

karunkallore,

Code:

CHAR is equivalent to cobol PIC X(N).

BIN FIXED(p) where p is in the range 1 to 15 is equivalent to cobol s9(4) comp.

BIN FIXED(p) where p is in the range 16 to 31 is equivalent to cobol s9(9) comp.

DEC FIXED(p) or DEC FIXED(p,s) or PICTURE picture-string is equivalent to comp-3 items.

BIN FLOAT(p) p is in the range 1 to 24 is equivalent to cobol COMP-1

BIN FLOAT(p) p is in the range 25 to 53 is equivalent to cobol COMP-2

DEC FLOAT(m) m is in the range 1 to 7 is equivalent to cobol COMP-1

DEC FLOAT(m) m is in the range 8 to 16 is equivalent to cobol COMP-2

Hope this helps...

Cheers

Kolusu
_________________
Kolusu
www.linkedin.com/in/kolusu
Back to top
View user's profile Send private message Send e-mail Visit poster's website
karunkallore
Beginner


Joined: 11 Dec 2004
Posts: 103
Topics: 39

PostPosted: Tue Feb 22, 2005 10:40 am    Post subject: Thanks Reply with quote

Hi Friends,

Thank you very much.

Regards,
Karun.
Back to top
View user's profile Send private message Send e-mail
Display posts from previous:   
Post new topic   Reply to topic   printer-friendly view    MVSFORUMS.com Forum Index -> Application Programming All times are GMT - 5 Hours
Page 1 of 1

 
Jump to:  
You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum


MVSFORUMS
Powered by phpBB © 2001, 2005 phpBB Group