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
 

 

IS there a Picture clause for Indexed Items

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

New User


Joined: 26 Jun 2006
Posts: 7

PostPosted: Mon Jun 26, 2006 7:16 pm    Post subject: IS there a Picture clause for Indexed Items
Reply with quote

IS there a Picture clause for Indexed Items?
Back to top
View user's profile Send private message

calspach

New User


Joined: 05 May 2006
Posts: 32
Location: USA

PostPosted: Mon Jun 26, 2006 11:03 pm    Post subject:
Reply with quote

05 WH-100-1115-ENRL-CNT-TBL
OCCURS 25 TIMES
DESCENDING KEY IS WH-100-1115-ENRL-PROV-NUM
INDEXED BY WH-100-1115-ENRL-INDX.


You mean like that?

Not specifically, but I think if I remember right it's a pic s9(4) comp internally.
Back to top
View user's profile Send private message
creator.abhishek

New User


Joined: 07 May 2006
Posts: 32
Location: Pune

PostPosted: Tue Jun 27, 2006 11:22 am    Post subject:
Reply with quote

rt calspack
Back to top
View user's profile Send private message
Annie P

New User


Joined: 26 Jun 2006
Posts: 7

PostPosted: Tue Jun 27, 2006 1:08 pm    Post subject:
Reply with quote

OK.
Do we explicity declare it as,

01 IndexItem USAGE IS INDEX.
Back to top
View user's profile Send private message
guptae

Moderator


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

PostPosted: Tue Jun 27, 2006 2:56 pm    Post subject:
Reply with quote

No
Back to top
View user's profile Send private message
IQofaGerbil

Active User


Joined: 05 May 2006
Posts: 183
Location: Scotland

PostPosted: Tue Jun 27, 2006 3:22 pm    Post subject: Re: IS there a Picture clause for Indexed Items
Reply with quote

The INDEX phrase defines an item as an index data item. An index data
item is a 4-byte elementary item which can be used to store index name
values. It is not necessarily associated with any particular table.
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 INREC PARSING and dictionary items migusd SYNCSORT 6 Fri Jun 02, 2017 8:02 pm
This topic is locked: you cannot edit posts or make replies. How to move a long alphanumeric data ... lind sh COBOL Programming 8 Mon Dec 05, 2016 7:51 pm
No new posts Need help on SQL Dynamic WHERE Clause subratarec DB2 12 Sat Jul 16, 2016 3:11 pm
No new posts [SQL0029] INTO clause missing from em... HABBIE DB2 2 Fri Sep 04, 2015 3:54 pm
No new posts 3-D Table with nested DEPENDING ON Cl... VivekKhanna COBOL Programming 5 Sat Aug 08, 2015 11:18 pm


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