Valid on z/OS, z/VSE, and z/VM.
Use the MAPDATA keyword to add, remove, or replace a MAPDATA field in the MAP record of the SDT Record. MAPDATA allows the administrator to specify field characteristics associated with MAPREC(map‑name).
MAP records are used to support Screen Level Protection (SLP) records.
This keyword has the following format:
TSS ADDTO(SDT) MAPREC(map‑name)
MAPDATA(field‑definition)
Specifies the layout of this screen field. You can specify up to five fields on each MAPDATA keyword. Each field‑definition operand consists of five sub‑fields:
Specifies an up to 24‑character field name unique to this MAP record. The name can consist of letters, digits, or national characters and can be qualified with periods (.), underscores (_), or hyphens (‑).
Indicates the field type:
Specifies a numeric row for this data field.
Specifies a numeric column for this data field.
Specifies the length for this data field (optional).
This keyword is used with:
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 © 2014 CA Technologies.
All rights reserved.
|
|