There are two differences in the mapping process for an RRDS data set. The first difference is in the VSAM file type field, which must have a value of RRDS or RRDV. This is specified in the "Insert file panel", which is shown in Figure 2.
The second difference concerns the mapping of the key field, as illustrated in Figure 1.
--------------------- CICS VT: List of fields for VIDRRDS ------- Row 1 of 11 Command ===> ________________________________________________ Scroll ===> CSR_ VSAM file type : RRDS Creator : VID + Data set length: 00080 Table name: VID_ITEM + Actions: S Display, U Update, I Insert, D Delete A Field Bytes Start Type DB2 column name Exit Pic Par - -------- ----- ----- ---- ------------------------------ -------- --- --- _ RRDSKEY 00001 00001 X + _ VIDF0001 00006 00001 C ITEM_NUMBER + _ VIDF0002 00012 00007 C ITEM_NAME + _ VIDF0003 00006 00019 C ITEM_COLOUR + _ VIDF0004 00004 00025 C ITEM_WEIGHT + _ VIDF0005 00004 00029 P ITEM_COST + _ VIDF0006 00003 00033 C ITEM_REORDER_NO + _ VIDF0007 00003 00036 C ITEM_SUPP_CODE + _ VIDF0008 00005 00039 P ITEM_DATE_FSHIP + Y _ VIDF0009 00002 00044 C ITEM_SHELF_LIFE + _ VIDF0010 00035 00046 C ITEM_DESCRIPTION +
The first field RRDSKEY does not map to a DB2® column. You must update the RRDSKEY field by selecting action U. This shows the following screen:
----------------------------- CICS VT: Update field ---------------------------- Command ===> ________________________________________________ Scroll ===> CSR_ DIM name : VIDKSDS Creator : VID + Table : VID_ITEM + Data set length: 00080 Field name . . . . . . : RRDSKEY Field length . . . ===> 00001 (In bytes) Field type . . . . ===> X (C,P,U,F,H,B) Column name . . . ===> .............................. + (Look-up available) Starting position ===> 00001 ("1" = Beginning of data set) Picture or FBE . . ===> __________________________ (example HH.XX.SS.NNNNNN) (or MMDDYY) (or EXITx=exit name) Parameters . . . . ===> __________________________ Optional user parameters Special function . ===> KEY ("KEY", "PTH", "BKY", or blank) Mapped from table ===> X ("P"=Prim, "X"=Not mapped) Build order . . . ===> 00001 ("1"=first, "2"=second and so on) Press: Enter=Update PF3=Exit PF1=Help
Specify KEY in the Special function field and X in the Mapped from table field.
When you map an RRDS data set manually, you must specify this field exactly as it is shown in Figure 2.
The mapping of the copybook fields for an RRDS data set is the same as the field mapping for a KSDS data set.