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

HIGH and LOW values in Natural


IBM Mainframe Forums -> Java & MQSeries
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
monasu1998

Active User


Joined: 23 Dec 2005
Posts: 176
Location: India

PostPosted: Wed Aug 06, 2008 6:00 pm
Reply with quote

Hi,

How can I move HIGH values and LOW values in Natural?

Thanks,
Back to top
View user's profile Send private message
ofer71

Global Moderator


Joined: 27 Dec 2005
Posts: 2358
Location: Israel

PostPosted: Wed Aug 06, 2008 11:53 pm
Reply with quote

Try something like this:
Code:
DEFINE DATA LOCAL
1 #HIGH-VAL (A3)
1 #LOW-VAL  (A3)
END-DEFINE
*
MOVE H'FFFFFF' TO #HIGH-VAL
MOVE H'000000' TO #LOW-VAL
*
END


O.
Back to top
View user's profile Send private message
monasu1998

Active User


Joined: 23 Dec 2005
Posts: 176
Location: India

PostPosted: Thu Aug 07, 2008 9:33 am
Reply with quote

Hey Ofer,

Thank you for your response.
Could you please tell me to which data types we can move HIGH/LOW values?

Thanks
Back to top
View user's profile Send private message
ofer71

Global Moderator


Joined: 27 Dec 2005
Posts: 2358
Location: Israel

PostPosted: Thu Aug 07, 2008 10:54 am
Reply with quote

There is no such thing as LOW/HIGH VALUES in NATURAL. In my example, I simply moved a hexadecimal string to a variable. The values of these strings are equivalent to COBOL's LOW/HIGH VALUES.

O.
Back to top
View user's profile Send private message
monasu1998

Active User


Joined: 23 Dec 2005
Posts: 176
Location: India

PostPosted: Fri Aug 08, 2008 6:48 pm
Reply with quote

Fine.
But the destination variable can be of any data type or that has to be of Alphanumeric data type.

2ndly what does it mean by H'0D'?

Thanks
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 -> Java & MQSeries

 


Similar Topics
Topic Forum Replies
No new posts INCLUDE OMIT COND for Multiple values... DFSORT/ICETOOL 5
No new posts Replace Multiple Field values to Othe... DFSORT/ICETOOL 12
No new posts Null values are considered in Total c... DFSORT/ICETOOL 6
No new posts ISRSUPC search utility - using high l... TSO/ISPF 2
No new posts Converting ASCII values to COMP-3 (ZD... JCL & VSAM 2
Search our Forums:

Back to Top