gtpo1mef | Operations |
Use this command to:
Requirements and Restrictions
You cannot lock a program that is private or that is already locked.
Format
|
Additional Information
ZRPGM HELP
ZRPGM ?
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.
+--------------------------------------------------------------------------------+ |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.