VPUT—update variables in the shared or profile pool

The VPUT service copies values from dialog variables in the function pool to the shared or application profile pool. If a variable of the same name already exists in the shared or the profile pool, it is updated. If it does not exist in the shared or profile pool, it is created in the pool specified by the parameter on the VPUT service request, and then it is updated.

Command invocation format


                             .-ASIS----.   
>>-ISPEXEC--VPUT--name-list--+---------+-----------------------><
                             +-SHARED--+   
                             '-PROFILE-'

Call invocation format


>>-CALL--ISPEXEC--(buf-len,--buffer);--------------------------><


                                               .-'ASISbbbb'-.   
>>-CALL--ISPLINK--('VPUTbbbb'--,--name-list--,-+-'b'--------+--->
                                               +-'SHAREDbb'-+   
                                               '-'PROFILEb'-'   

>--);----------------------------------------------------------><

Parameters

name-list: Specifies the names of one or more dialog variables whose values are to be copied from the function pool to the shared or profile pool. See Invoking the ISPF services for specification of name lists.
ASIS: Specifies that the variables are to be copied to the pool in which they already exist or that they are to be copied to the shared pool, if they are new. If the variables exist in both the shared and profile pools, they are copied to the shared pool only.
SHARED: Specifies that the variables are to be copied to the shared pool.
PROFILE: Specifies that the variables are to be copied to the application profile pool. Any shared pool variables of the same names are deleted.
buf-len: Specifies a fullword fixed binary integer containing the length of "buffer".
buffer: Specifies a buffer containing the name of the service and its parameters in the same form as they would appear in an ISPEXEC call for a command procedure.

Return codes

These return codes are possible:

0: Normal completion.
8: Variable not found.
16: Truncation occurred while copying variables to the application profile pool.
20: Severe error.

Example

In a CLIST, write variables, the names of which are listed in the variable VPUTLIST, from the function pool to the shared pool.

ISPEXEC VPUT (&VPUTLIST ) SHARED

In a PL/I program, write variables, the names of which are listed in program variable VPUTLIST, from the function pool to the shared pool. The variable VPUTLIST has been made available to ISPF by a previous VDEFINE operation. Set the program variable BUFFER to contain:

VPUT (&VPUTLIST ) SHARED

Set program variable BUFLEN to the length of the variable BUFFER. Enter the command:

CALL ISPEXEC (BUFLEN, BUFFER);

or alternately

CALL ISPLINK ('VPUT    ',VPUTLIST,'SHARED  ');