Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations gkittelson on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Copy book mapping

Status
Not open for further replies.

Guest_imported

New member
Jan 1, 1970
0
Hi !

Is there any tool available or a utility or way exists on IBM Mainframe that let me see the positioning of fields in the copy book from the beginning of the file(cumulative position ) rather than my self manually counting and adding the lengths of all fields.

Let say in the emp-record as mentioned below

01 emp-record.
05 emp-id pic x(11).
05 emp-name pic x(50).
05 emp-qual pic x(4).
05 emp-grade pic x(3).
.
.
.
.
.
05 emp-salary pic s9(9)v99.

If i want to know at what postion emp-salary field exists do i have to count all the fields from the beginning or is there a tool or utility exists which gives me summary like


01 emp-record.
05 emp-id pic x(11). 1-11
05 emp-name pic x(50). 12-61
05 emp-qual pic x(4). 62-65
05 emp-grade pic x(3). 66-68
.


So that i can look in the file directly at 62-65 position for emp-qual and 12-61 position for name.

I appreciate any guidance...


[sig][/sig]
 
Compuware Fileaid will give you many useful ways to looks at your data,
mapped or unmapped, and will also give you offsets. This is a very commonly
used and widespread tool. [sig][/sig]
 
Hi Dhecht !

Thanks! i will try it !!

Regards,
Akondeti [sig][/sig]
 
If you do not have Fileaid, you might just try using the data mapping option of the COBOL compiler itself. It will give you the starting position of the record and the starting position of the fields within the record. One simple subtraction would provide you with the field addresses with this information.

Betty Scherber
Brainbench MVP for COBOL II
[sig][/sig]
 
There is a free utility on Compuserve for COBOL which counts all the records in a COBOL source. Search for COBOL and you will find it. [sig][/sig]
 
Hi Guys !

Thanks for your guidance ! I will try your suggestions.

Regards,
Akondeti [sig][/sig]
 
Status
Not open for further replies.

Part and Inventory Search

Sponsor

Back
Top