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
 
Handling float values in easytrieve

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> ABENDS & Debugging
Author Message
rarvins

Active User


Joined: 24 Jan 2007
Posts: 51
Location: India

PostPosted: Tue Mar 27, 2007 6:27 pm    Post subject: Handling float values in easytrieve
Reply with quote

In the easytreive program i am comparing two input files downloaded from table, in this some float fields are there, that i have define as P 3.
The difference between these two files, i am writing to a output file. But the problem is the float values are coming in unreadable format like this

000411990?21642?85
000411?0 ?0 ?0 ?0
000411?2 684??12
00041184?7904?7904

So, somebody please tell me how to declare workstorage variable for moving these float values. See these float values we are moving to unix,which accepts data in text format only.So we are declaring every thing as A.
Back to top
View user's profile Send private message
References
William Thompson

Global Moderator


Joined: 18 Nov 2006
Posts: 2977
Location: Tucson AZ

PostPosted: Tue Mar 27, 2007 6:47 pm    Post subject:
Reply with quote

What kind of "float" are you refering to? And why are you defining them as packed decimal?
Can you represent them as hex?
Back to top
View user's profile Send private message
guptae

Moderator


Joined: 14 Oct 2005
Posts: 1024
Location: Bangalore,India

PostPosted: Tue Mar 27, 2007 7:15 pm    Post subject:
Reply with quote

Hi there,

To make it in readable fom u have to move it to mask edit field .
Back to top
View user's profile Send private message
rarvins

Active User


Joined: 24 Jan 2007
Posts: 51
Location: India

PostPosted: Tue Mar 27, 2007 7:33 pm    Post subject:
Reply with quote

William Thompson wrote:
What kind of "float" are you refering to? And why are you defining them as packed decimal?
Can you represent them as hex?


As i am new to mainframes and easytrieve i don;t have much idea. So can u explane clearly
Back to top
View user's profile Send private message
rarvins

Active User


Joined: 24 Jan 2007
Posts: 51
Location: India

PostPosted: Tue Mar 27, 2007 7:41 pm    Post subject:
Reply with quote

guptae can u please send me the syntax of mask, as i am new to mainframes
Back to top
View user's profile Send private message
William Thompson

Global Moderator


Joined: 18 Nov 2006
Posts: 2977
Location: Tucson AZ

PostPosted: Tue Mar 27, 2007 8:13 pm    Post subject:
Reply with quote

rarvins wrote:
William Thompson wrote:
What kind of "float" are you refering to? And why are you defining them as packed decimal?
Can you represent them as hex?


As i am new to mainframes and easytrieve i don;t have much idea. So can u explane clearly
They are your words, "float".....what do you mean by "float"?
Back to top
View user's profile Send private message
rarvins

Active User


Joined: 24 Jan 2007
Posts: 51
Location: India

PostPosted: Tue Mar 27, 2007 8:56 pm    Post subject:
Reply with quote

Ya Thompson float values are
1.8000000000000E+00
2.7640449438202E+00
1.7538461538462E+00

for these i am getting output in unreadable format like

000411?0 ?0 ?0 ?0
000411?2 684??12
00041184?7904?7904
Back to top
View user's profile Send private message
William Thompson

Global Moderator


Joined: 18 Nov 2006
Posts: 2977
Location: Tucson AZ

PostPosted: Tue Mar 27, 2007 10:41 pm    Post subject:
Reply with quote

That's what I thought you meant, I do not think EZT has any support for float, at least I didn't see it in my manual........
What you might do is bring the 18 characters down into 2 contiguous binary fields and re-split according to the standard float format (which I would have to look up myself).
Back to top
View user's profile Send private message
Display posts from previous:   
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> ABENDS & Debugging All times are GMT + 6 Hours
Page 1 of 1