CICS VSAM Transparency for z/OS, Version 1.2


Editing mapping information

Figure 1 shows the mapping information for the CICS® VT sample file VIDKSDS.

Figure 1. VIDKSDS Mapping
 
 --------------------- CICS VT: Edit columns in VIDKSDS  ------- Row 1 from 11 
Command ===> ________________________________________________ Scroll ===> CSR  
                                                                               
Commands: MAP  SAVE  PREVIEW  SUSPEND/RESUME  CHANGE/UNDO  SHOW                
Actions:  S Display, U Update, D Delete, I Insert            Status message /  
A Pos   Copybook field name / DB2 column name     Type Len   Exit      Pic Par 
- ----- ----+----1----+----2----+----3----+----   ---- ----- ----------------- 
_ 1     ITEM-NUMBER                             +      6                       
        ITEM_NUMBER...................          + CHAR 6                       
_ 7     ITEM-NAME                               +      12                      
        ITEM_NAME.....................          + CHAR 12                      
_ 19    ITEM-COLOUR                             +      6                       
        ITEM_COLOUR...................          + CHAR 6                       
_ 25    ITEM-HEIGHT                             +      4                       
        ITEM_HEIGHT...................          + CHAR 4                       
_ 29    ITEM-COST                               +      4                       
        ITEM_COST.....................          +  DEC 7,2                     
_ 33    ITEM-REORDER-QUANTITY                   +      3                       
        ITEM_REORDER_QUANTITY.........          +  DEC 3,0                     
_ 36    ITEM-SUPPLIER-CODE                      +      3                       
        ITEM_SUPPLIER_CODE............          + CHAR 3                       
_ 39    ITEM-DATE-FIRST-SHIP                    +      5                       
        ITEM_DATE_FIRST_SHIP..........          +  DEC 9,0                     
_ 44    ITEM-SHELF-LIFE                         +      2                       
        ITEM_SHELF_LIFE...............          + CHAR 2                       
_ 46    ITEM-DESCRIPTION                        +      35    Redefined field 1 
        ITEM_DESCRIPTION..............          + CHAR 35                      
_ 46    ITEM-DETAILS-1                          +      35    Redefined field 1 
        ITEM_DETAILS_1................          + CHAR 35                      

The copybook field name, position, and length are displayed. The DB2® column name, type, and length is shown beneath the field name. Overtype the column name if required.

There are a number of possible messages that CICS VT will show in the status field. The conditions that cause these messages to be displayed are as follows:

Table 1. Message display conditions
Status field value Copybook condition
Name shortened The length of a copybook field name exceeds 30 characters.
Name shortened CICS VT adds a numeric suffix to the column name for each element in a field with an OCCURS clause. The length of the resulting column name exceeds 30 characters.
Duplicate name The field name is duplicated within the copybook. This can occur when the same field name is specified in different group fields, or when a name shortened by CICS VT is duplicated.
Redefined field n A field is either within a redefining or redefined area, where n is the redefinition level.
Field split A field that is not the last field in the copybook exceeds 255 characters, which is the longest fixed length character column supported by DB2.
Initial numeric A copybook field starts with a numeral and DB2 does not support column names starting with a numeral. The character # is added as the initial character of the column.
Unsigned binary A COBOL copybook field attribute is unsigned binary. Field values in the VSAM file may exceed the maximum value supported by DB2 for the mapped column data type. See Supported numeric formats for a discussion on numeric field types and the potential implications for unsigned binary fields.
Potential date The COBOL copybook field has the conceptual data item DATE. You may want to update the mapping to use a DATE column data type in DB2.
Floating point The COBOL copybook field has a floating-point picture. (COMP-1 or COMP-2). The auto-mapper maps these field types to CHAR(4)and CHAR(8) DB2 columns respectively. CICS VT does not support DB2 floating-point column data types.
DBCS The COBOL copybook field has a DBCS picture. The auto-mapper maps this field to CHAR DB2 column. CICS VT does not support DB2 DBCS column data.
Assumed varying The VIDMAPIN utility has detected that AVGLRECL is not equal to MAXLRECL in the base cluster. If the last copybook field is character data, the auto-mapper assumes that the file contains varying length records and specifies VARCHAR as the data type for the last column in the table. This status is also displayed if the last group or discrete field is an array with OCCURS DEPENDING ON.

You should note the following about the status field messages:

There are 2 particular situations where manual intervention in the auto-mapping process is especially important:

  1. You must understand how the automated mapping facility handles OCCURS and REDEFINES clauses before you decide what actions to perform. Refer to COBOL REDEFINES clause and PL/I pointer based structures for more information about REDEFINES and OCCURS clauses.
  2. There is no definitive characteristic or attribute to indicate that a VSAM file contains varying length records. Refer to Variable length records in VSAM for more information about files containing varying length records.




Last updated: February 8, 2013 20:42:54