IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

Move a variable of a pic clause to dif pic clause


IBM Mainframe Forums -> COBOL Programming
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
hsiva2003

New User


Joined: 22 Feb 2005
Posts: 10
Location: Chennai

PostPosted: Wed Nov 08, 2006 1:07 pm
Reply with quote

I want to comapare x & y of different pic clauses.

x pic 99v9(6) & y pic s9v9(8)comp-3.

If I want to move y value to x without any truncation - ...I don't want to change the x's pic clause...

Need a suggestion
Back to top
View user's profile Send private message
guptae

Moderator


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

PostPosted: Wed Nov 08, 2006 2:02 pm
Reply with quote

Hi There,

U dont want to change pic claue of x & u want the value without truncation
how can it possible?
Back to top
View user's profile Send private message
vijay_bn79

New User


Joined: 20 Nov 2006
Posts: 48
Location: Hyderabad

PostPosted: Fri Nov 24, 2006 5:31 pm
Reply with quote

x pic 99v9(6) & y pic s9v9(8)comp-3.

MOVE VALUES FROM Y TO X LIKE


I mean 1 interger and 6 decimal

Y = 2.666666
if you move Y to X then
X will have the value 02.666666


pls correct me if i am wrong
Back to top
View user's profile Send private message
Arun Raj

Moderator


Joined: 17 Oct 2006
Posts: 2481
Location: @my desk

PostPosted: Fri Nov 24, 2006 5:52 pm
Reply with quote

Hi Siva

It is not possible to do the move operation you specified without truncation.Anyway you will lose precision by 2 decimal points.

Thanks
Arun
Back to top
View user's profile Send private message
William Thompson

Global Moderator


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

PostPosted: Fri Nov 24, 2006 5:58 pm
Reply with quote

You could reduce the degree of truncation by multiplying y by 10 giving x.....only the least significant digit would be lost....
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic View Bookmarks
All times are GMT + 6 Hours
Forum Index -> COBOL Programming

 


Similar Topics
Topic Forum Replies
No new posts Extracting Variable decimal numbers f... DFSORT/ICETOOL 17
No new posts Variable Output file name DFSORT/ICETOOL 8
No new posts COBOL - Move S9(11)v9(7) COMP-3 to -(... COBOL Programming 5
No new posts How to move the first field of each r... DFSORT/ICETOOL 5
No new posts To search DB2 table based on Conditio... DB2 1
Search our Forums:

Back to Top