Getting Started in IDMS Under MVS

Interactive Access From TSO in IDMS

Use the following CLIST as a model for accessing FOCUS interactively in TSO:

ALLOC F(FOCEXEC) DA('prefix.FOCEXEC.DATA') SHR REUSE
ALLOC F(MASTER)  DA('prefix.MASTER.DATA') SHR REUSE
ALLOC F(FOCIDMS) DA('prefix.ACCESS.DATA') SHR REUSE
ALLOC F(USERLIB) DA('prefix.IDMS.LOAD' -
                    'prefix.FUSELIB.LOAD') SHR REUSE
ALLOC F(FOCLIB)  DA('prefix.FOCLIB.LOAD') SHR REUSE
ALLOC F(ERRORS)  DA('prefix.IDMS.DATA' -
                    'prefix.ERRORS.DATA') SHR REUSE
ALLOC F(SYSCTL)  DA('highlvl.SYSCTL') SHR REUSE
ALLOC F(SYSIDMS) DA('highlvl.SYSIDMS') SHR REUSE
CALL 'prefix.FOCLIB.LOAD(FOCUS)'                

where:

highlvl

Is the high-level qualifier for Computer Associates supplied data sets.

prefix

Is the high-level qualifier for FOCUS production data sets.

Note: In most cases there are two CA-IDMS load libraries that need to be allocated to STEPLIB.

Interactive Access From MSO in IDMS

For interactive access in MSO, modify the MSO startup JCL to include the following allocations. See the Multi-Session Option Installation and Technical Reference Guide for further information.

//STEPLIB  DD   DSN=prefix.IDMS.LOAD,DISP=SHR
//         DD   DSN=highlvl.DBA.LOADLIB,DISP=SHR
//         DD   DSN=highlvl.LOADLIB,DISP=SHR
//ERRORS   DD   DSN=prefix.IDMS.DATA,DISP=SHR
//         DD   DSN=prefix.ERRORS.DATA,DISP=SHR
//MASTER   DD   DSN=prefix.MASTER.DATA,DISP=SHR
//FOCIDMS  DD   DSN=prefix.ACCESS.DATA,DISP=SHR
//FOCEXEC  DD   DSN=prefix.FOCEXEC.DATA,DISP=SHR
//SYSCTL   DD   DSN=highlvl.SYSCTL,DISP=SHR
//SYSIDMS  DD   DSN=highlvl.SYSIDMS,DISP=SHR

where:

highlvl

Is the high-level qualifier for Computer Associates supplied data sets.

prefix

Is the high-level qualifier for FOCUS production data sets.

Note: In most cases there are two CA-IDMS load libraries that need to be allocated to STEPLIB.

Batch Access (MVS) in IDMS

For batch access, use the following JCL as a model:

//IDMSCV   EXEC PGM=FOCUS
//STEPLIB  DD  DSN=highlvl.DBA.LOADLIB,DISP=SHR
//         DD  DSN=highlvl.LOADLIB,DISP=SHR
//         DD  DSN=prefix.IDMS.LOAD,DISP=SHR
//         DD  DSN=prefix.FOCLIB.LOAD,DISP=SHR
//         DD  DSN=prefix.FUSELIB.LOAD,DISP=SHR
//ERRORS   DD  DSN=prefix.IDMS.DATA,DISP=SHR
//         DD  DSN=prefix.ERRORS.DATA,DISP=SHR
//MASTER   DD  DSN=prefix.MASTER.DATA,DISP=SHR
//FOCIDMS  DD  DSN=prefix.ACCESS.DATA,DISP=SHR
//FOCEXEC  DD  DSN=prefix.FOCEXEC.DATA,DISP=SHR 
//SYSCTL   DD  DSN=highlvl.SYSCTL,DISP=SHR
//SYSIDMS  DD  DSN=highlvl.SYSIDMS,DISP=SHR
//SYSIN    DD   *
? REL
TABLE FILE EMPFILE
PRINT EMP_NAME_0415
END
FIN

where:

highlvl

Is the high-level qualifier for Computer Associates supplied data set.

prefix

Is the high-level qualifier for FOCUS production data set.

Note: In most cases there are two CA-IDMS load libraries that need to be allocated to STEPLIB.