Portal | IBM Manuals | Downloads | Products | Refer | Info | Programs | JCLs | Forum Rules*| Site Map | Mainframe CD 
IBMMAINFRAMES.com - IBM Mainframe Support Forums Index
 
Register
 
IBMMAINFRAMES.com - IBM Mainframe Support Forums Index FAQ Search Memberlist Usergroups Profile Log in to check your private messages Log in
 
pli conversion(pic->dec fixed)

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> PL/I & ASSEMBLER
Author Message
julian123

New User


Joined: 14 Aug 2006
Posts: 23

PostPosted: Thu Jun 05, 2008 8:50 am    Post subject: pli conversion(pic->dec fixed)
Reply with quote

i am a rookie in pli programming. now i have a question as following, pls help.

an input file
Code:
ABC00000294169560}    <- DATA
CCCFFFFFFFFFFFFFFD    <- HEX VALUE
123000002941695600    <- HEX VALUE


my qustion is
1. '00000294169560}' = -29416956.00 ?
2. i used PIC'S(12)9V99' to get '00000294169560}' , and moved it to DEC FIXED(15,2), i got '29416956.00', the sing('-') was lost, how to correct it?
Back to top
View user's profile Send private message
References
arunvenu

New User


Joined: 29 May 2008
Posts: 5
Location: Pune, India.

PostPosted: Fri Jun 06, 2008 11:51 am    Post subject: Reply to: pli conversion(pic->dec fixed)
Reply with quote

How did you define the DATA variable? is it a CHAR?? Supply more information!!
Back to top
View user's profile Send private message
dick scherrer

Global Moderator


Joined: 23 Nov 2006
Posts: 8723
Location: 221 B Baker St

PostPosted: Fri Jun 06, 2008 7:33 pm    Post subject:
Reply with quote

Hello,

The "sending" field is zoned-decimal (PIC'S(12)9V99' is a typo, i suspect and should be PIC S9(12)V99). The "receiving" field is DEC FIXED(15,2).

Quote:
Supply more information!
What additional info do you want? I don't speak pli, but i would think the definition of a signed numeric field to be straightforward.
Back to top
View user's profile Send private message
Display posts from previous:   
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> PL/I & ASSEMBLER All times are GMT + 6 Hours
Page 1 of 1