GDDM V3R2 Base Application Programming Reference
Previous topic | Next topic | Contents | Index | Contact z/OS | Library | PDF | BOOK


MSPUT

GDDM V3R2 Base Application Programming Reference
SC33-0868-02



Function


To place data into a mapped field.


   MSPUT       (id, option, length, ads)

APL code 1109 GDDM RCP code X'0C280501' (203949313)


Parameters


id (specified by user) (fullword integer)
The identifier of the mapped field to be modified.


option (specified by user) (fullword integer)
Controls the parts of the map and the associated application data structures to be modified. Possible values are:

0
All data is replaced with data from the application data structure. Character attributes are set to their default values. Any fields in the map that have selector adjuncts indicating that the fields are to be absent, are set to their defaults.

1
Part of the data is replaced. Any fields in the map that have selector adjuncts indicating that the fields are to be absent are unchanged. The selector adjuncts can be used to set fields to their default values.

2
Part of the data is replaced in the same way as for an option value of 1. Also, any fields that were modified by the terminal operator during previous interactions with the application program retain their modification indication.

3
Parts of the shadow application data structure for highlighting are modified. Set the highlighting values required for the characters in each field in the appropriate application data structure field.

4
Parts of the shadow application data structure for color are modified. Set the color values required for the characters in each field in the appropriate application data structure field.

5
Parts of the shadow application data structure for programmed symbols are modified. Set the programmed symbol values required for the characters in each field in the appropriate application data structure field.

Note: For option values 3, 4, and 5, other field adjuncts can be used in the map definition to control the modification of the data. The selector adjunct can be used to indicate that the character attributes for the field are not to be changed or are to be set to the default. The length adjunct can be used to indicate the length of character-attribute data provided. If the field data is longer, the character attributes are padded with default values.

If the field data is shorter, the character attributes are truncated. The cursor adjunct can be used to position the cursor.

length (specified by user) (fullword integer)
The length of the application data structure specified in the ads parameter. The length can be 0, or it must be at least as great as the length of the application data structure defined to GDDM by the Interactive Map Definition (GDDM-IMD). If the length is 0, the ads parameter is not referenced. Instead, GDDM assumes an application data structure of the correct length, filled with blanks.

ads (specified by user) (character)
The application data structure. This is a contiguous set of bytes whose layout is determined by the map definer when the map for the field is created.

Description


Modifies the data associated with a map. The whole map, or selected fields within the map, can be replaced with data from the application data structure. The way in which the data in the map appears on the screen can be altered by modifying parts of the shadow application data structures associated with the map. The shadow application data structures contain information about the character attributes that apply to the data in each field of the map.

Principal errors


ADM0966 E
PAGE n IS NOT MAPPED
ADM0976 E
MAPPED FIELD a DOES NOT EXIST
ADM0977 E
OPTION IS NOT IN RANGE 0 THROUGH 5
ADM0980 E
DATA LENGTH (n) IS SMALLER THAN LENGTH OF ADS (a) OF MAP
ADM0981 E
type ATTRIBUTE SELECTOR FOR '{FIELD n|xxxxxx|xxxxxx(m)}' IS NOT BLANK, 1, 2, OR 3
ADM0982 E
CURSOR SELECTOR FOR '{FIELD n|xxxxxx|xxxxxx(m)}' IS NOT BLANK OR 1
ADM0983 E
type ATTRIBUTE FOR '{FIELD n|xxxxxx|xxxxxx(m)}' IS INVALID

Go to the previous page Go to the next page



Copyright IBM Corporation 1990, 2012