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

where exactly we use LOW-VALUES.(FIGARATIVE const)


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

New User


Joined: 29 Jul 2005
Posts: 23

PostPosted: Thu Sep 01, 2005 2:28 pm
Reply with quote

HI,

here i need inf where we exactly use LOW-VALUES(FIGARATIVE CONST) concept.
and also where exactly REDIFINES we use.
where exactly we use INDEX?
Back to top
View user's profile Send private message
nrsmca

New User


Joined: 25 May 2005
Posts: 14

PostPosted: Thu Sep 01, 2005 3:34 pm
Reply with quote

1.If u want to move zeros in numeric identifiers , spaces in alphanumeric identifiers and group identifier otherwise u can use initialize.

2.If u want to share the same memory location and corresponding values u can use redefine.

3.First u should declare the usage is Index(like that) and it points to address of the table's subscript. We can change the value of index using SET...
Back to top
View user's profile Send private message
mainframesguru

New User


Joined: 24 Jun 2005
Posts: 36
Location: Hyderabad

PostPosted: Thu Sep 01, 2005 5:45 pm
Reply with quote

Hi


Little Correction for 3rd Answer

While using Index, you are not supposed to Declare it.It is internally
declared.


Thanks
Vamshi
ICC-ISH
Back to top
View user's profile Send private message
mmwife

Super Moderator


Joined: 30 May 2003
Posts: 1592

PostPosted: Sat Sep 03, 2005 11:28 pm
Reply with quote

A further correction to 3:

It is declared in the table declaration itself and it contains the offset into the table of the entry being referenced in the PD stmt.
Back to top
View user's profile Send private message
tatonka

New User


Joined: 08 Sep 2005
Posts: 1
Location: ohio

PostPosted: Thu Sep 08, 2005 8:42 pm
Reply with quote

LOW-VALUES moves hex '00' to everybyte, conversely HIGH-VALUES moves hex'FF' . It does not make numerics equal to zeros, hex'F0' or alphanumerics equal to spaces , hex '40' , although it might look that way on some displays because LOW-VALUES is non printable, same with HIGH-VALUES. So on some displays it looks like spaces but its not. Back in the day of 1/2 meg mainframes, it was important to move LOW-VALUES to everything because the CPU would compress them in storage and thus save memory bytes. Now a days you use it mainly for key manipulation, ie move LOW-VALUES to a key and do a start not less than and a read next and you will get the first record. Conversely move HIGH-VALUES to a key do a start not greater than and a read backward and you get the last record. You can also move LOW-VALUES to the 01 level of a table initially, then index thru until you hit LOW-VALUES and you know your done, stuff like that.
Back to top
View user's profile Send private message
krishnaiahc

New User


Joined: 31 Aug 2005
Posts: 21

PostPosted: Mon Oct 03, 2005 3:29 am
Reply with quote

HI,

Can you please provide me the documents related to LOW-VALUES & HIGH-VALUES.

Thanks,
Krishna.
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 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 Converting ASCII values to COMP-3 (ZD... JCL & VSAM 2
No new posts Generate output lines (SYSIN card for... DFSORT/ICETOOL 4
Search our Forums:

Back to Top