Use the following JCL to execute a Total application program under the central version.
Runtime (z/VSE)
// LIBDEF *,SEARCH=(user.sublib,idms.sublib) // DLBL sysctl,'idms.sysctl',1999/365,SD // EXTENT SYSnnn,nnnnnn // ASSGN SYSnnn,DISK,VOL=nnnnnn,SHR // DLBL SYSIDMS,'#SYSIPT' // EXEC userprog Optional SYSIDMS parameters /* Program input if any /*
|
user.sublib |
The name of the user sublibrary |
|
idms.sublib |
The name of the CA IDMS library |
|
sysctl |
Filename of the SYSCTL file |
|
idms.sysctl |
File ID of the SYSCTL file |
|
SYSnnn |
Logical unit of the volume for which the extent is effective |
|
nnnnnn |
Volume serial number |
|
userprog |
Name of the Total application program |
|
SYSIDMS parameters |
Parameters you specify to establish a runtime environment. Note: For more information about the SYSIDMS parameters, see the CA IDMS Common Facilities Guide. |
Executing in Local Mode
To execute user application programs in local mode, remove the SYSCTL statements, and insert the following statements before the EXEC userprog statement:
// DLBL dcmsg,'idms.sysmsg.ddldcmsg',1999/365,DA // EXTENT SYSnnn,nnnnnn // ASSGN SYSnnn,DISK,VOL=nnnnnn,SHR // DLBL userdb,'user.userdb',,DA // EXTENT SYSnnn,nnnnnn // ASSGN SYSnnn,DISK,VOL=nnnnnn,SHR Additional database file assignments, as required // TLBL sysjrnl,'idms.tapejrnl',,nnnnnn,,f // ASSGN sys009,TAPE,VOL=nnnnnn
|
dcmsg |
Filename of the system message area (ddldcmsg) |
|
idms.sysmsg.ddldcmsg |
File name of the CA IDMS system message area (DDLDCMSG) |
|
userdb |
Filename of the user CA IDMS/DB database file |
|
user.userdb |
File ID of the user CA IDMS/DB database file |
|
SYSnnn |
Logical unit assignment of the user CA IDMS/DB database file |
|
sysjrnl |
Filename of the tape journal file |
|
sys009 |
Logical unit assignment of the tape journal file |
|
idms.tapejrnl |
File ID of the tape journal file |
|
nnnnnn |
Volume serial number |
|
f |
File number of the tape journal file |
|
Copyright © 2013 CA.
All rights reserved.
|
|