Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

How to Read Tables

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> COBOL Programming
View previous topic :: :: View next topic  
Author Message
jaffarhussain

New User


Joined: 26 Nov 2010
Posts: 30
Location: Hyderabad

PostPosted: Thu Feb 03, 2011 10:36 am    Post subject: How to Read Tables
Reply with quote

I have a table with name Table1 which occurs 2 time Indexed by Idx .
I am reading record by record into the table with record length 80.
For Example: 12345abcfdefgsfgggggggsdafsssssssssssssssssssssss
21556asdsffffffffffffffffdghhhhhhhhhhhhhhhhhhhhhhhh
Now if i say
SET Idx to 1.
Display 'Table' Table(Idx)
Then Output will be : 12345abcfdefgsfgggggggsdafsssssssssssssssssssssss

Now if i want to pint only first 5bytes of record in table i.e
Output should be only: 12345
Then what should i do , how to refer bytes inside the table.

Please suggest Thanks in advance.
Back to top
View user's profile Send private message

dick scherrer

Site Director


Joined: 23 Nov 2006
Posts: 19270
Location: Inside the Matrix

PostPosted: Thu Feb 03, 2011 10:42 am    Post subject:
Reply with quote

Hello,

Either redefine the data or use reference modification.
Back to top
View user's profile Send private message
jaffarhussain

New User


Joined: 26 Nov 2010
Posts: 30
Location: Hyderabad

PostPosted: Thu Feb 03, 2011 12:38 pm    Post subject:
Reply with quote

Can you give an example for reference modification using in array.
Back to top
View user's profile Send private message
dbzTHEdinosauer

Global Moderator


Joined: 20 Oct 2006
Posts: 6968
Location: porcelain throne

PostPosted: Thu Feb 03, 2011 2:08 pm    Post subject:
Reply with quote

look at the third example in 1.8.1.10.2 Reference modification examples third example.
Back to top
View user's profile Send private message
jaffarhussain

New User


Joined: 26 Nov 2010
Posts: 30
Location: Hyderabad

PostPosted: Thu Feb 03, 2011 2:46 pm    Post subject:
Reply with quote

Thank you
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> COBOL Programming All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Identify top 30 big tables or indexes... ashek15 DB2 0 Fri Jun 16, 2017 10:01 am
No new posts READ A PACKED "NEGATIVE" FI... jdesouza CA Products 3 Tue May 02, 2017 11:43 pm
No new posts Read of TDQ fails in LENGERR Tracy Hansen CICS 10 Wed Apr 05, 2017 12:10 am
No new posts Data replication from multiple Db2 ta... kishpra DB2 9 Mon Mar 27, 2017 9:58 pm
No new posts SPUFI -- Joining 3 tables – data in... Sysaron DB2 2 Wed Mar 08, 2017 4:18 am


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us