gtpo1mefOperations

ZRPGM-Retrieve and Lock Program

Use this command to:

Requirements and Restrictions

You cannot lock a program that is private or that is already locked.

Format




progname
is a 4-character alphanumeric program name.

Lock
locks the program in core.

Unlock
unlocks the program from core.

LOAdset
specifies the loadset that contains the activated program.

lsname
is the 5- to 8-character alphanumeric name of a loadset.

BASE
indicates the base version of the program.

ALL
displays all of the programs that were locked in core by using the ZRPGM command or the ZAPGM command.

Is-xx
specifies the I-stream that this change affects, where xx is a decimal number from 1 to 16.

Additional Information

Examples

In the following example, each version of the CVAP program is locked in core.

+--------------------------------------------------------------------------------+
|User:   ZRPGM CVAP LOCK                                                         |
|                                                                                |
|System: RPGM0001I 13.39.46 PROGRAM CVAP LOADSET BASE LOCKED IN CORE             |
|        ------------------ AT ADDRESS 00A7DC30                                  |
+--------------------------------------------------------------------------------+

The following example displays the storage address of all locked versions of the CVAP program.

+--------------------------------------------------------------------------------+
|User:   ZRPGM CVAP                                                              |
|                                                                                |
|System: RPGM0033I 13.14.12 VERSIONS OF PROGRAM CVAP LOCKED ON I-STREAM  1       |
|                                                                                |
|        VERSION  LOADSET   CODE ADDR                                            |
|        -------  --------  ---------                                            |
|           40    BASE      00A7DC30                                             |
|        END OF DISPLAY                                                          |
+--------------------------------------------------------------------------------+

The following example displays the storage address of all the programs that are locked in core on the main I-stream.

Note:
The programs were locked in core by using the ZRPGM or ZAPGM command.
+--------------------------------------------------------------------------------+
|User:   ZRPGM ALL                                                               |
|                                                                                |
|System: RPGM0017I 13.39.46 PROGRAMS LOCKED ON I-STREAM  1                       |
|                                                                                |
|        PROGRAM  VERSION  LOADSET   CODE ADDR                                   |
|        -------  -------  --------  ---------                                   |
|         CHDD       IK    BASE      00174300                                    |
|         CVAB       MG    JGARCIA   00202180                                    |
|         CVAB       JW    GRATEFUL  0017B000                                    |
|         CHUG       AB    DENVER    00170000                                    |
|         CHUG       JX    BASE      00172130                                    |
|        END OF DISPLAY                                                          |
+--------------------------------------------------------------------------------+

Related Information

See the RELPC macro and the GETPC macro in TPF General Macros for more information about locking programs in storage.