Mapping for APPLCTL

Figure 1 shows the field mapping for APPLCTL. The record length of the file is 263 bytes and it has a 17-byte key. The field called FILLER in the mapping corresponds to a 233-byte redefined area. It is managed by the exit MULTFBE.
Figure 1. Field mapping for sample file APPLCTL
 ------------------- CICS VT: List of fields for APPLCTL    -- Row 1 to 7 of 7 
Command ===> ________________________________________________ Scroll ===> CSR  
                                                                               
VSAM file type : KSDS     Creator   : CIRSP                                  + 
Data set length: 00263    Table name: TB_APPLCTL                             + 
                                                                               
Actions: S Display, U Update, I Insert, D Delete                               
                                                                               
A Field    Bytes Start Type DB2 column name                  Exit     Pic Par  
- -------- ----- ----- ---- ------------------------------   -------- --- ---  
_ KY       00017 00001   C                                 +                   
_ OBJECT   00006 00001   C  OBJECT_ID                      +                   
_ RECTYPE  00003 00007   C  REC_TYPE                       +                   
_ USERID   00008 00010   C  USER_ID                        +                   
_ FILLER   00233 00018   C                                 + MULTFBE           
_ ULSTCHG  00008 00251   C  USER_ID_LAST_CHG               +                   
_ CHGDTE   00005 00259   P  LAST_CHG_DATE                  + DATEFBE           
******************************* Bottom of data ********************************

The 17-byte key is split into three fields. The middle field is mapped to the DB2® column REC_TYPE. The value in this field indicates the record type, and therefore the layout of the record.

All four record types have two common fields, and these are mapped to columns USER_ID_LAST_CHG and LAST_CHG_DATE. These columns are in the table CICSVT.TB_APPLCTL. The FBE DATEFBE builds the final field. This exit is detailed in Reformatting a date field.

The table CICSVT.TB_APPLCTL contains only the columns shown in the mapping in Figure 1. The FBE MULTFBE builds the bytes 18 to 250 of the VSAM record from one of four DB2 tables, based on the value of REC_TYPE.


Concept Concept

Feedback


Timestamp icon Last updated: Monday, 10 February 2014


http://pic.dhe.ibm.com/infocenter/cicsts/v5r1/topic/com.ibm.cics.vt.doc//topics/cvtdecmapapplctl.html