Hello Jim,
Try doing this:
----+----1----+----2----+----3----+----4----+----5----+----6----+----7-//ADSM2
PROC
//ADSM2 PROC
//SERVER EXEC PGM=DSMSERV,DYNAMNBR=300,REGION=128M,
// PARM='/LOADDB DEV=XTAPE VOL=126784,005537,063831,128583,126502,129
// 971,118916,116900'
//STEPLIB DD DISP=SHR,DSN=SYS1.EDC210.SEDCLINK
// DD DISP=SHR,DSN=SYS1.PLI230.SIBMLINK
//OPT DD DSN=SYSP.ADSM2.OPTIONS,DISP=SHR
//DSMAMENG DD DSN=SYSP.XAMAINT.SANRMSG(ANRMENU),DISP=SHR
//HLPAMENG DD DSN=SYSP.XAMAINT.SANRHLP(ANRHENU),DISP=SHR
//SYSUDUMP DD SYSOUT=S
//SYSMDUMP DD SYSOUT=S
//* DATA DD DSN=SYSP.DMP,DISP=SHR,UNIT=XTAPE,
//* VOL=SER=(126784,005537,063831,128583,126502,129971,118916,116900)
//DSK DD DSN=SYSP.ADSM2.DISKLOG,DISP=SHR
//DSK DD DSN=SYSP.ADSM2.DISKLOG,DISP=SHR
//ERR DD DSN=SYSP.ADSM2.ERRLOG,DISP=SHR
When continuing a parameter that is between single quotes, you need to
observe the following:
1) Code the parameter all the way out to, and including, column 71. Do
not code a continuation mark in column 72.
2) Code a '//' in columns 1 - 2 of the next line, then continue the parameter
starting exactly in column 16. Notice that the entire parm is enclosed in one
set of quotes, even though it is split across two lines.
Andy
Andy Raibeck
IBM Storage Systems Division
ADSM Client Development
e-mail: storman AT us.ibm DOT com
Please respond to Jhealy AT chubb DOT com @ internet
To: ADSM-L AT VM.MARIST DOT EDU @ internet
cc:
Subject: loaddb
Can anyone tell me what is wrong with this mvs jcl syntax?
//ADSM2 PROC
//SERVER EXEC PGM=DSMSERV,DYNAMNBR=300,REGION=128M,
// PARM='/LOADDB DEV=XTAPE',
// 'VOL=126784,005537,063831,128583,126502,129971,118916,116900'
//STEPLIB DD DISP=SHR,DSN=SYS1.EDC210.SEDCLINK
// DD DISP=SHR,DSN=SYS1.PLI230.SIBMLINK
//OPT DD DSN=SYSP.ADSM2.OPTIONS,DISP=SHR
//DSMAMENG DD DSN=SYSP.XAMAINT.SANRMSG(ANRMENU),DISP=SHR
//HLPAMENG DD DSN=SYSP.XAMAINT.SANRHLP(ANRHENU),DISP=SHR
//SYSUDUMP DD SYSOUT=S
//SYSMDUMP DD SYSOUT=S
//* DATA DD DSN=SYSP.DMP,DISP=SHR,UNIT=XTAPE,
//* VOL=SER=(126784,005537,063831,128583,126502,129971,118916,116900)
//DSK DD DSN=SYSP.ADSM2.DISKLOG,DISP=SHR
//DSK DD DSN=SYSP.ADSM2.DISKLOG,DISP=SHR
//ERR DD DSN=SYSP.ADSM2.ERRLOG,DISP=SHR
|