MVSFORUMS.com

js01

Hello friends,

I want to find out the exact length of the generated copy book; actually this was generated thru Map compilation.

I can do it manually adding one by one (length of the reach field in data structure). But is there any way that I can get quickly.

Example. What would be the length of the structure?

01 MAP1I.
02 FILLER PIC X(12).
02 SDATEL COMP PIC S9(4).
02 SDATEF PICTURE X.
02 FILLER REDEFINES SDATEF.
03 SDATEA PICTURE X.
02 SDATEI PIC X(8).
02 FILLER PIC X.
02 STIMEL COMP PIC S9(4).
02 STIMEF PICTURE X.
02 FILLER REDEFINES STIMEF.
03 STIMEA PICTURE X.

CraigG · Posted: Mon Jan 07, 2008 12:32 pm Post subject:

What do you need the length for?

js01 · Posted: Mon Jan 07, 2008 1:00 pm Post subject:

i need length of the field MAP1I.

thank you for your responce

CraigG · Posted: Mon Jan 07, 2008 1:18 pm Post subject:

Terry_Heinze · Posted: Mon Jan 07, 2008 11:32 pm Post subject:

If the map is part of the source code, check the displacements and lengths of the 01 level on the right side of the compile listing. At a previous shop, a coworker wrote a REXX program to show the positions and lengths of each field of an 01 structure in ISPF. Ask around. Maybe someone at your shop has already done something like this.
_________________
....Terry

petluri · Posted: Mon Jan 07, 2008 11:56 pm Post subject:

If you have File-Aid, you can use option "8 - View Interpreted Record Layout".