CA-SRAM modules called SRTOPEN/SRTCLSE/SRTFILL are missing
search cancel

CA-SRAM modules called SRTOPEN/SRTCLSE/SRTFILL are missing

book

Article ID: 93685

calendar_today

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:

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=* 
//