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

open the file-aid copybook with different 01 level items


IBM Mainframe Forums -> Compuware & Other Tools
Post new topic   Reply to topic
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
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

Superior Member


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

PostPosted: Tue Mar 12, 2013 8:02 pm
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
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

Superior Member


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

PostPosted: Wed Mar 13, 2013 12:59 pm
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 View Bookmarks
All times are GMT + 6 Hours
Forum Index -> Compuware & Other Tools

 


Similar Topics
Topic Forum Replies
No new posts Unable to interpret a hex value to De... COBOL Programming 4
No new posts Replacing FILLER with FILLER<SeqNu... DFSORT/ICETOOL 2
No new posts MF professionals open positions Mainframe Jobs 0
No new posts how to eliminate null indicator value... DB2 7
No new posts Format Binary file to EBCDIC JCL & VSAM 4
Search our Forums:

Back to Top