Redefines / Range Specifications panel

Panel and field definitions

  Process   Options   Help
 s ┌───────────── SHIRE Redefines / Range Specifications ──────────────┐ ──────
 F │                                                                   │
   │ Redefines to New Layout:                                          │
 T │    Level . . . . . . .          Change all matching levels to 01  │
   │    Field name  . . . .                                            │
   │    Set offset  . . . .          (Enter "/" to select)             │
 C │    COBOL level change.          (Enter "/" to select)             │
 * │                                                                   │
 X │ Source Range:                                                     │
   │    From statement  . .                                            │
   │    To   statement  . .                                            │
 * │                                                                   │
   │    From string . . . .                                            │
   │    To   string . . . .                                            │
   │                                                                   │
   │ Command ===>                                                      │
   │  F1=Help      F2=Split     F3=Exit      F7=Backward  F8=Forward   │
   │  F9=Swap     F12=Cancel                                           │
   └───────────────────────────────────────────────────────────────────┘


 Command ===>                                                       Scroll CSR
  F1=Help      F2=Split     F3=Exit      F4=CRetriev  F6=LibList   F7=Up
  F8=Down      F9=Swap     F12=Cancel

Redefines to New Layout

Use the following fields to direct FM/IMS to generate multiple record layouts for a source that contains many record definitions within one level-1 structure:

Level

Source level value used to identify REDEFINES or UNION-level clauses that are to generate new record layouts. This value is used when you have a structure that has defined multiple layouts using COBOL REDEFINES or PL/I unions. FM/IMS creates a separate record layout for each REDEFINES clause at the given level. After the first matching REDEFINES is found, FM/IMS creates new layouts for the latter and subsequent REDEFINES clauses for the same level and start location. Header and trailing data items are included in each record layout.

Change all matching levels to 01

As an alternative to specifying the source level (Level), you can select this option by typing a "/" to change all matching levels to 01. This changes the source before compile so that all matching levels are changed to 01. This is a COBOL only option and should be used with care as it can alter a structure from its intended programmable form.

Field name

Specifies the target field name of a REDEFINES clause or the field name with a UNION clause that is used to identify the REDEFINES or UNION statements that are to be used to direct FM/IMS to create new layouts. This is an alternative way of identifying REDEFINES and UNION statements that require new layouts to be generated. If you specify both Level and Field Name values, FM/IMS checks both when generating new layouts.

Set offset

When selected (by typing a "/"), FM/IMS adjusts the offset value for each layout so that the starting location is the REDEFINES or UNION field start location. Use this option when your record layouts do not include the header data items in the structure. You can only specify this option in conjunction with the previous fields.

COBOL level change

Source Range

Specify the following fields to direct FM/IMS to extract a subset of the copybook to be compiled into the template:

From statement

Start source line number. This tells FM/IMS the starting statement for extract. If not specified, the default start location is statement 1.

To statement

End source line number. This tells FM/IMS the ending statement for extract. If not specified, the default end location is the last source statement.

From string

FM/IMS searches each source statement for the specified string and the first statement with a matching string starts the extract process. If you specify a "from statement", then the first statement that matches either the From statement value or contains the From string value begins the extract.

To string

FM/IMS searches each source statement for the specified string and the first statement with a matching string ends the extract process. If you specify a "to statement", then the first statement that matches either the To statement value or contains the To string value ends the extract.