--------------------------- CICS VT: Insert column -------------------------- Command ===> ________________________________________________ Scroll ===> CSR Enter new field and column attributes:- Copybook field: position ==> 49___ length ==> 35__ data type ==> _ (C,P,U,F,H,B) Column: name ==> .................................................. + length ==> _____ Optional (if DEC specify x,y) data type ==> ____ (CHAR,DEC,INT,SINT,BINT,DATE,TIME,TIMS) Mapping: picture / FBE ==> _________________ (example HH.XX.SS.NNNNNN) (or MMDDYY) (or EXITx=exit name) parameters ==> __________________________ Optional user parameters Press: Enter to confirm PF3 to exit PF1 for help
--------------------------- CICS VT: Insert column -------------------------- Command ===> ________________________________________________ Scroll ===> CSR Enter new field and column attributes:- Copybook field: position ==> 49___ length ==> 4 __ data type ==> C (C,P,U,F,H,B) Column: name ==> ITEM_DESC_SHORT................................... + length ==> _____ Optional (if DEC specify x,y) data type ==> CHAR (CHAR,DEC,INT,SINT,BINT,DATE,TIME,TIMS) Mapping: picture / FBE ==> _________________ (example HH.XX.SS.NNNNNN) (or MMDDYY) (or EXITx=exit name) parameters ==> __________________________ Optional user parameters Press: Enter to confirm PF3 to exit PF1 for help
--------------------------- CICS VT: Insert column -------------------------- Command ===> ________________________________________________ Scroll ===> CSR Enter new field and column attributes:- Copybook field: position ==> 53___ length ==> 31__ data type ==> _ (C,P,U,F,H,B) Column: name ==> .................................................. + length ==> _____ Optional (if DEC specify x,y) data type ==> ____ (CHAR,DEC,INT,SINT,BINT,TIME,TIMS) Mapping: picture / FBE ==> _________________ (example HH.XX.SS.NNNNNN) (or MMDDYY) (or EXITx=exit name) parameters ==> __________________________ Optional user parameters Press: Enter to confirm PF3 to exit PF1 for help
--------------------- CICS VT: Edit columns in VIDKSDS2 ------- 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_SHIPPED + 8 ITEM_DATE_FIRST_SHIPPED....... + DATE Y _ 47 ITEM-SHELF-LIFE + 2 ITEM_SHELF_LIFE............... + CHAR 2 _ 49 ITEM_DESC_SHORT + 4 ITEM_DESC_SHORT............... + CHAR 4 _ 53 ITEM_DESC_LONG + 31 ITEM_DESC_LONG................ + CHAR 31