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
 

 

Cobol copybook query

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> Compuware & Other Tools
View previous topic :: :: View next topic  
Author Message
Vidya Kajale

New User


Joined: 01 Jun 2010
Posts: 43
Location: India

PostPosted: Wed Jun 22, 2011 4:45 pm    Post subject: Cobol copybook query
Reply with quote

Hi,

In code there is copy book. These copybook has more than one layout defined at 01 level. And i want to map the data in file with 3rd layout defined at 01 level in file aid. How shall i do it.
Back to top
View user's profile Send private message

Dsingh29

Active User


Joined: 16 Dec 2008
Posts: 132
Location: IBM

PostPosted: Wed Jun 22, 2011 4:48 pm    Post subject:
Reply with quote

I would make a test copybook with the required layout and then do the mapping.
Back to top
View user's profile Send private message
Vidya Kajale

New User


Joined: 01 Jun 2010
Posts: 43
Location: India

PostPosted: Wed Jun 22, 2011 4:50 pm    Post subject: cobol copybook query
Reply with quote

i did the same... but i need to know the diiferent procedure instead of going for test copybook.
Back to top
View user's profile Send private message
Dsingh29

Active User


Joined: 16 Dec 2008
Posts: 132
Location: IBM

PostPosted: Wed Jun 22, 2011 5:00 pm    Post subject:
Reply with quote

XREF in File aid might solve your purpose.
the link to a competitor forum was deleted, reread the forum rules!
http://ibmmainframes.com/about7153.html
Back to top
View user's profile Send private message
Bill Woodger

DFSORT Moderator


Joined: 09 Mar 2011
Posts: 7223

PostPosted: Wed Jun 22, 2011 5:02 pm    Post subject: Reply to: cobol copybook query
Reply with quote

Since this isn't a Cobol question, it should have gone in the forum with other FileAid questions.

Does FileAid have a help key? Do you have access to a manual? Have you searched forums/internet?

I agree with how you have gone about it (got stuck, found a workaround, gone back to find out how to do it properly) so keep up the good work with some more burrowing as well.
Back to top
View user's profile Send private message
Vidya Kajale

New User


Joined: 01 Jun 2010
Posts: 43
Location: India

PostPosted: Wed Jun 22, 2011 5:34 pm    Post subject: cobol copybook query
Reply with quote

i got following error.
Code:

 AHI7 AID --------------  Record Layout Cross Referenc       INVALID ATTRIBUTES
 COMMAND ===>                                                                   
                                                                               
 Specify Cross Reference Dataset to be Created or Edited:                       
    XREF dataset name        ===> 'APPL.CLDC.PROD.UNCNTL.COPYLIB'               
    Member name              ===> RMSMANTF (Blank or pattern for member list)   
                                                                               
 Specify Record Layout Information:                                             
    Record layout dataset    ===> 'APPL.CLDC.PROD.UNCNTL.COPYLIB'               
                                                                               
                                                                               
                                                                               
                                                                               
                                                                               
                                                                               
                                                                               
 -------------------------------------------------------------------------------
 This function creates and maintains existing File-AID Record                   
 Layout Cross References. These XREF's are used to match record layouts to     
 data records in File-AID functions that use formatting.                       
                                                                               
                                                                               
                                                                               
 .  .  .  .  .  .  .  .  .  .  .  .  .  .  .  .  .  .  .  .  .  .  .  .  .  .  .



My memeber is RMSMANTF in APPL.CLDC.PROD.UNCNTL.COPYLIB
Back to top
View user's profile Send private message
Robert Sample

Global Moderator


Joined: 06 Jun 2008
Posts: 7904
Location: Bellevue, IA

PostPosted: Wed Jun 22, 2011 5:56 pm    Post subject:
Reply with quote

And when you hit PF1, did the system tell you which attribute(s) were invalid?
Back to top
View user's profile Send private message
Bill Woodger

DFSORT Moderator


Joined: 09 Mar 2011
Posts: 7223

PostPosted: Wed Jun 22, 2011 6:00 pm    Post subject: Reply to: cobol copybook query
Reply with quote

OK, if you press F1 when you have the error message, it might show you something a bit more (a common facility, always worth a try).

Also, just F1 from the start-up might lead you towards an index/tutorial.
Back to top
View user's profile Send private message
Dsingh29

Active User


Joined: 16 Dec 2008
Posts: 132
Location: IBM

PostPosted: Thu Jun 23, 2011 9:13 am    Post subject:
Reply with quote

Vidya,

You should enter the dataset name of your XREF library and a member name for the XREF you want to create. This MUST be a PDS.

On the same screen, enter the name of your record layout dataset (usually a copybook library). Then press enter.

On the next screen, enter a description for this XREF (this is optional). Then, on the bottom half of the screen, enter member names of members in the layout dataset which you want to use. When you press enter, File-AID automatically gets the 01 level record definitions from the layout members.
Back to top
View user's profile Send private message
Bill Woodger

DFSORT Moderator


Joined: 09 Mar 2011
Posts: 7223

PostPosted: Thu Jun 23, 2011 1:23 pm    Post subject:
Reply with quote

Dsingh,

I think the problem TS has is that there are three 01 levels in the copybook, they'd like to map the third of these and are unable to do so, but can map the data by making a copy of the copybook only including the 01 level they want, as a workaround.
Back to top
View user's profile Send private message
Anuj Dhawan

Senior Member


Joined: 22 Apr 2006
Posts: 6258
Location: Mumbai, India

PostPosted: Thu Jun 23, 2011 2:06 pm    Post subject: Re: cobol copybook query
Reply with quote

Vidya Kajale wrote:
In code there is copy book. These copybook has more than one layout defined at 01 level. And i want to map the data in file with 3rd layout defined at 01 level in file aid. How shall i do it.
Well, if you already have more than one "01" levels in the same copy book just use "T"(emporary) selection criteria, shown in red-text below. Then select whichever "01" you want to go with.

Quote:
File-AID -------------- Browse - Dataset Specification ----------------------
COMMAND ===>

Browse Mode ===> V (F=Fmt; C=Char; V=Vfmt; U=Unfmt)

Specify Browse Information:
Dataset name or HFS path ===> 'XXXX.SLQ.XXX'
Member name ===> (Blank or pattern for member list)
Volume serial ===> (If dataset is not cataloged)


Specify Record Layout and XREF Information:
Record layout usage ===> S (S = Single; X = XREF; N = None)
Record layout dataset ===> 'XXXX.SOME.COPYLIB'
Member name ===> COPYBOOK (Blank or pattern for member list)
XREF dataset name ===>
Member name ===> (Blank or pattern for member list)

Specify Selection Criteria Information: (E = Existing; T = Temporary;
Selection criteria usage ===> T M = Modify; Q = Quick; N = None)
Selection dataset name ===>
Member name ===> (Blank or pattern for member list)

Back to top
View user's profile Send private message
Dsingh29

Active User


Joined: 16 Dec 2008
Posts: 132
Location: IBM

PostPosted: Thu Jun 23, 2011 2:08 pm    Post subject:
Reply with quote

Yeps Bill you are right !!!

Vidya-

Here is what you need do.
1. Create 3 copybooks with 01 level.
2. use them in XREF screens
3. give conditions/values from dataset to map correctly with each layout. 3rd in your case.

For any more help, visit following link for manual:

the link to copyrighted material was deleted, reread the forum rules!
if Compuware had wanted to make manuals freely available they would have been posted on the Compuware web site ( A la IBM )
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 -> Compuware & Other Tools All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
This topic is locked: you cannot edit posts or make replies. Db2 SQL query to convert rows into co... subratarec DB2 5 Thu Nov 17, 2016 4:51 pm
This topic is locked: you cannot edit posts or make replies. RANDOM Function in COBOL swapnil781 COBOL Programming 2 Tue Nov 15, 2016 6:17 pm
No new posts Regarding COBOL Stored Procedure opti... selvamsrinivasan85 DB2 4 Fri Nov 04, 2016 8:57 pm
No new posts Two Selects in a single select query Rohit Umarjikar DB2 1 Fri Nov 04, 2016 8:46 pm
No new posts COBOL Version 6.1 Virendra Shambharkar COBOL Programming 5 Tue Nov 01, 2016 11:24 am


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