CA-SRAM modules called SRTOPEN/SRTCLSE/SRTFILL are missing
Article ID: 93685
Updated On:
Products
CIS
COMMON SERVICES FOR Z/OS
90S SERVICES
DATABASE MANAGEMENT SOLUTIONS FOR DB2 FOR Z/OS
COMMON PRODUCT SERVICES COMPONENT
Common Services
Datacom/AD
CA ECOMETER SERVER COMPONENT FOC
Easytrieve Report Generator for Common Services
INFOCAI MAINTENANCE
IPC
UNICENTER JCLCHECK COMMON COMPONENT
Mainframe VM Product Manager
CHORUS SOFTWARE MANAGER
CA ON DEMAND PORTAL
CA Service Desk Manager - Unified Self Service
PAM CLIENT FOR LINUX ON MAINFRAME
MAINFRAME CONNECTOR FOR LINUX ON MAINFRAME
GRAPHICAL MANAGEMENT INTERFACE
WEB ADMINISTRATOR FOR TOP SECRET
Xpertware
Compress Data Compression for MVS
Compress Data Compression for Fujitsu
Issue/Introduction
s attempting to recompile an old COBOL program which called what I believe to be CA-SRAM modules called SRTOPEN/SRTCLSE/SRTFILL. These modules appear to have been renamed in the current Common Services CCCSLINK loadlib to SRAMOPEN, SRAMFILL (there doesn't appear to be an SRAMCLSE).
Can you please point me at any documentation for CA SRAM for z/OS as I'm unable to locate any on the C.A. documentation website.
Environment
Release: COMCOM00200-15.0-Database Management Solutions-for DB2 for z/OS
Component:
Component:
Resolution
In the current release of Common Services (12.0 and above) CA SRAM modules were not shipped seperatly or maintianed as this component was stabilized.
The SRAMOPEN & SRAMFILL are used with the Common Earl functions and is included as is for EARL programs.
SRTOPEN, SRTFILL, & SRTCLSE are all defined alias entries utilized for external calls to SRAM.
You create these alias entries at your site as part of the setup of using SRAM.
Here is some sample JCL that you can use to create the alias entries. You probably have this already setup somewhere from the previous setup but I am providing it anyway.
//IEWL EXEC PGM=IEWL,REGION=2048K,
// PARM='MAP,LET,LIST,NCAL'
//SYSLIB DD DISP=SHR,DSN=your.SRAMLIB
//SYSLMOD DD DISP=SHR,DSN=your.SRAMLIB
//SYSLIN DD *
INCLUDE SYSLIB(SRAMASCB)
ALIAS SRTOPEN
ALIAS SRTFILL
ALIAS SRTGETR
ALIAS SRTCLSE
ALIAS SRTROPN
NAME SRAMASCB(R)
//SYSUT1 DD UNIT=SYSDA,SPACE=(CYL,(1,1))
//SYSPRINT DD SYSOUT=*
//
The SRAMOPEN & SRAMFILL are used with the Common Earl functions and is included as is for EARL programs.
SRTOPEN, SRTFILL, & SRTCLSE are all defined alias entries utilized for external calls to SRAM.
You create these alias entries at your site as part of the setup of using SRAM.
Here is some sample JCL that you can use to create the alias entries. You probably have this already setup somewhere from the previous setup but I am providing it anyway.
//IEWL EXEC PGM=IEWL,REGION=2048K,
// PARM='MAP,LET,LIST,NCAL'
//SYSLIB DD DISP=SHR,DSN=your.SRAMLIB
//SYSLMOD DD DISP=SHR,DSN=your.SRAMLIB
//SYSLIN DD *
INCLUDE SYSLIB(SRAMASCB)
ALIAS SRTOPEN
ALIAS SRTFILL
ALIAS SRTGETR
ALIAS SRTCLSE
ALIAS SRTROPN
NAME SRAMASCB(R)
//SYSUT1 DD UNIT=SYSDA,SPACE=(CYL,(1,1))
//SYSPRINT DD SYSOUT=*
//
Feedback
Yes
No
Powered by
