This example adds a MAPDATA field to the MAP record ENG1 that contains a salary field in character format called PAY which is in the fifth row and sixth column, and has a length of eight characters:
TSS ADDTO(SDT) MAPREC(ENG1)
(PAY,CHAR,5,6,8)
This example calculates the value for column if the screen image was built by CICS BMS (DFHBMS), by using the value specified in the DFHMDF POS field and adding 1 to the column value. For example if PANA DFHMDF POS=(3,25), length=5:
TSS ADDTO(SDT) MAPREC(PANA)
MAPDATA(CODE,CHAR,3,25,5)
If the screen image was not built by CICS BMS (DFHBMS), or you do not have access to the CICS BMS map source, calculate the column by physically counting (from 1) the offset to the field column on the screen.
This example replaces an existing MAP record with one new field:
TSS REPLACE(SDT) MAPREC(PANA)
MAPDATA(CODE,CHAR,3,15,5).
Even though only one field's worth of data is entered with the REPLACE syntax, all previously entered fields are replaced by the single field entered in the REPLACE command. If the MAP record consists of seven fields, all seven original fields are lost and one new field replaces them. There is no command to replace a single field.
|
Copyright © 2009 CA.
All rights reserved.
|
|