Edit record type 1 entries to specify layout information


When you enter an * or *MULT-RTV* in the Member field on the EDIT XREF Segment List screen and select that entry, the EDIT Record Type 1 screen is displayed.

This screen is used to specify segment layout information for segments with multiple formats. For this type of segment there are up to two fields within the segment that contain values that indicate the segment format. In File-AID for IMS/ISPF these values are called record type values. On the Edit Record Type 1 screen, you enter all possible record type values that can appear in the segment’s Record Type Value 1 field.1

Warning

Important

1:For Double-Byte Character Set (DBCS) support, the primary commands DBCS and MIXED are allowed to change the format of the Record Type Value 1 and 2 fields. See Double-Byte Character Support.

Edit Record Type 1 Screen

EDIT Record Type 1 - CW.FISAMP.XREFC(PORDR)------------------------- ENTRY  001
COMMAND ===>                                                   SCROLL ===> CSR  

       Data base: PORDR    Segment: ORDR020    ORDER LINE
       Specify record type 1:
            Position ===> 5
            Length   ===> 2   (1-16)  

"D" - Delete    Record Type       COBOL                Comments
"S" - Select      Value 1         Member    or Starting Dataname (IND = Y)  IND
------------  ----------------  ----------  ------------------------------  ---
              PO                ORDR020     PURCHASE ORDER LAYOUT            N
              SC                ORDR021     SUB-CONTRACT ORDER LAYOUT        N
              WO                *MULT-RTV*                                   N
              *OTHER*           ORDR022     *OTHER RCD TYPE VALUE 1*         N  





To specify RECORD TYPE VALUE 2’s for one of the above entries, enter "*"
in the COBOL MEMBER column and select that entry  

Enter END command to return to the Segment/Layout XREF Segment List screen

Position

Enter the starting position within the segment of the field that identifies the segment format (Record Type Value 1 field).

Length

Enter the length of the Record Type Value 1 field. The length of the Record Type Value 1 field can range from 1 to 16.

Delete/Select

Enter D to delete a record type value 1 entry or S to select a record type value 1 for which you want to specify record type value 2 values. You cannot delete an entry by entering blanks in each field.

Enter S to proceed to the EDIT XREF Record Type 2 Screen to specify the record type value 2 values for a given record type value 1. When you select a record type value 1 for record type 2 processing and then return to the Edit Record Type 1 screen, the entry selected is displayed at the top of the screen body.

Record Type Value 1

Enter one of the following:

  • The specific values that appear in the Record Type Value 1 field.
  • The literal *OTHER* if multiple record type value 1s are associated with one segment layout or have the same Record Type Value 2 field. A pre-formatted *OTHER* entry is automatically inserted as the last record type value 1 if one was not previously specified. This entry is for your convenience only and can be ignored if not needed.

You need not enter record type values in any particular sequence. When you enter the SAVE command or return to the XREF Segment List screen, the values are sorted in ascending sequence (except for the *OTHER* entry which remains last). Each record type value 1 must be unique. You can enter a maximum of 256 record type value 1s for a given segment type.

Member

Enter one of the following:

  • The member name of the layout in the segment layout library that defines the segment format associated with the given record type value 1.
  • An * or *MULT-RTV* if the format of the segment depends on a second field in the segment. Then select that entry and enter the record type value 2 information as described in Edit Record Type 2 Screen .

Comments or Starting Dataname

Enter a 30-character description for each record type value 1 or a starting data-name within the segment layout member. For pre-formatted *OTHER* entries, this field contains a default comment of "*OTHER RCD TYPE VALUE 1*."

If multiple segment layouts are contained within a single segment layout member, you can specify a starting data-name to isolate the appropriate layout. The starting data-name must not contain imbedded blanks, but it is not otherwise validated against the segment layout until you use the segment/layout XREF in another function. File-AID for IMS/ISPF reads the layout from the segment layout member beginning with the starting data-name and stops reading when a data-name item with a numerically equal or lower level number is encountered or when the end of the layout is reached.

IND

Indicate whether you entered a comment or a starting data-name in the Comments or Starting Dataname field. Enter N or leave blank to indicate that the field contains comments. Enter Y to indicate that the field contains a starting data-name. The default is N.

Hexadecimal Format

If you want to enter record type values with non-displayable characters (for example, if the record type field is in packed decimal or binary format) you must use hexadecimal format. To switch between Character and HEX formats, use the HEX command.

HEX ON switches you to HEX format and HEX OFF switches you to Character format. In HEX format the record type values are shown in 3-line HEX format as shown in the following figure. You can type over the Character or the HEX lines.

EDIT Record Type 1 Screen - Hex Format

EDIT Record Type 1 - CW.FISAMP.XREFC(PORDR) ------------------------ ENTRY  001
COMMAND ===>                                                   SCROLL ===> CSR  

       Data base: PORDR    Segment: ORDR020    ORDER LINE
       Specify record type 1:
            Position ===> 5
            Length   ===> 2   (1-16)  

"D" - Delete    Record Type       COBOL                Comments
"S" - Select      Value 1         Member    or Starting Dataname (IND = Y)  IND
------------  ----------------  ----------  ------------------------------  ---
              PO                ORDR020     PURCHASE ORDER LAYOUT            N
              DD
              76  

              SC                ORDR021     SUB-CONTRACT ORDER LAYOUT        N
              EC
              23  

To specify RCD TYPE VALUE 2’s for one of the above entries, enter "*"
in the COBOL Member column and select that entry  
Enter END command to return to the Segment/Layout XREF Segment List screen

Terminating the Screen

Do one of the following to terminate the EDIT Record Type 1 screen:

  • Enter the SAVE command to write the segment/layout XREF information back to the same data set from which it was read. If there is any unspecified segment layout information for segments with multiple formats or logical child or concatenated segments, the save operation returns you to the EDIT XREF Segment List screen and prompts you to enter any unspecified information.
  • Enter the END command to return to the EDIT XREF Segment List screen.
  • Enter the RETURN command to return to the Primary Option Menu. A save operation is performed.
  • Enter the CANCEL command to terminate the XREF member edit session. A save operation is not performed.

 

Tip: For faster searching, add an asterisk to the end of your partial query. Example: cert*

BMC AMI DevX File-AID for IMS 23.01