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
 

 

open the file-aid copybook with different 01 level items

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

New User


Joined: 28 Jan 2010
Posts: 47
Location: India

PostPosted: Tue Mar 12, 2013 12:36 pm    Post subject: open the file-aid copybook with different 01 level items
Reply with quote

Hi,

I have a file-aid copybook with multiple 01 items (for e.g. each 01 item for header, detail and trailer record type). Sample copybook is show below.

Code:


 01  WS-HEADER-REC.                                 
     05 H-RECORD-CDE                      PIC X(02).
     05 H-FILE-DATE                       PIC X(10).
     05 FILLER                            PIC X(88)
 01  WS-DETAIL-REC.                                 
     05 D-RECORD-CDE                      PIC X(02).
     05 D-XXX                             PIC 9(16).
     05 D-YYY                             PIC X(40).
     05 FILLER                            PIC X(42).
 01  WS-TRAILER-REC.                               
     05 T-RECORD-CDE                      PIC X(02).
     05 T-RECORD-CNT                      PIC 9(09).
     05 FILLER                            PIC X(89).



If I try to open the file using the file-aid, it opens with the first 01 level item (WS-HEADER-REC). I had used a command in the past to switch to any 01 level item in the copybook. However, I had forgot the command now. Please share the command to toggle betweem multiple 01 items.

Thanks.

Could anyone help me to
Back to top
View user's profile Send private message

Anuj Dhawan

Senior Member


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

PostPosted: Tue Mar 12, 2013 8:02 pm    Post subject:
Reply with quote

I don't have File-Aid at this current shop but as far as I can recall, possibly you needed XREF. Possibly search the File-Aid manuals on this word and you might just get it.
Back to top
View user's profile Send private message
maki_psg

New User


Joined: 28 Jan 2010
Posts: 47
Location: India

PostPosted: Wed Mar 13, 2013 10:44 am    Post subject:
Reply with quote

Anuj Dhawan wrote:
I don't have File-Aid at this current shop but as far as I can recall, possibly you needed XREF. Possibly search the File-Aid manuals on this word and you might just get it.


Thanks, Anuj.

We can use XREF and view the file on a specific layout.

I found the command to view the file on different 01 level's without using XREF. If we type the command - 'USE' in VFMT/FMT mode, we can choose the required layout from 'List of AVailable Record Layouts' screen.

Code:


File-AID ---- LIST OF AVAILABLE RECORD LAYOUTS -------------    REQUEST CANCELLED
COMMAND ===>                                                        SCROLL ===>    CSR 
            Member                                                             
  S    Nbr  name       01-level Name                  Status                   
 ---   --- --------  ------------------------------   ------------------------
                  1 TESTCPY1  WS-HEADER-REC                    CURRENT MAP             
                  2 TESTCPY1  WS-DETAIL-REC                                             
                  3 TESTCPY1  WS-TRAILER-REC                                           

Back to top
View user's profile Send private message
Anuj Dhawan

Senior Member


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

PostPosted: Wed Mar 13, 2013 12:59 pm    Post subject:
Reply with quote

Glad, that you got what serves the purpose and thanks for posting what worked for you... icon_smile.gif
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. Fetching data from BAI File arunsoods JCL & VSAM 1 Wed Jul 19, 2017 4:28 pm
No new posts Write out NODUPS but just from one file Jay Villaverde DFSORT/ICETOOL 8 Fri Jul 14, 2017 12:44 am
No new posts How to add header with Date(YYMMDD) i... Rajan Moorthy DFSORT/ICETOOL 2 Thu Jul 06, 2017 11:44 pm
No new posts How to generate a new unique Input fi... for1ranjith CLIST & REXX 11 Sat Jul 01, 2017 12:09 pm
No new posts Writing a file using online program grvtomar PL/I & Assembler 3 Fri Jun 30, 2017 1:06 pm


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