gtps1m4o | System Macros |
Use this system macro to read all the program version records (PVRs) from file into main storage and to add the appropriate information from each PVR entry to the corresponding program allocation table (PAT) entry.
Format
|
Entry Requirements
The RPVRC macro is restricted to ECB-controlled programs.
Return Conditions
Programming Considerations
If unable to process all the PVRs for a subsystem, then state change will be disabled for the subsystem.
Examples
The following example shows the RPVRC macro being issued for each subsystem in the complex.
ICM R14,3,CE1DBI CEBIC DBI,S CEBIC BSS RESTORE DBI AND SSU ID TO BSS CTKSPVR DS 0H RPVRC PROCESS PVRS FOR THIS SS LEBIC DBI,R4,CHECK=NO GET SS ID WITHOUT COMPLEMENT PVRSSID DS 0H LA R4,1(,R4) NEXT DBI LR R6,R4 UATBC IDLOC=(R,SSI,R6), SS ID EXCD=PVRDONE, FINISHED INVLID=PVRSSID, NEXT NOTAVL=PVRSSID NEXT MS0UT REG=R6 ICM R14,3,MU0DPI LOAD SS ID WITH COMPLEMENT CEBIC DBI 07240000 B CTKSPVR FOUND - DO NEXT SS PVRDONE DS 0H FINISHED - CONTINUE