Well, this is a lot closer to what I am looking for.
It almost worked.
Now it gets stuck in a prompt loop:
ANR2963W This SQL query may produce a very large result table .......
Do you wish to proceed? (Yes/No)
Do you wish to proceed? (Yes/No)
Do you wish to proceed? (Yes/No)
......
Is there a way to turn off the prompts ?
Bruno Calce <[EMAIL PROTECTED]>
Sent by: "ADSM: Dist Stor Manager" <[EMAIL PROTECTED]>
07/13/2001 08:39 AM
Please respond to "ADSM: Dist Stor Manager"
To: [EMAIL PROTECTED]
cc:
Subject: AW: SQL on OS390
hello,
i guess you have to use QUIT before the "/*".
my job looks like this and it works://S99QBAT JOB NOTIFY=S99Q
//**********************************************************************
//* EXECUTE ADMIN CLIENT IN BATCH *
//**********************************************************************
//SERVER EXEC PGM=DSMADMC,
// PARM='/-ID=BAT -PA=BATUSER1'
//SYSPRINT DD SYSOUT=*
//SYSIN DD *
SELECT MSGNO,MESSAGE,DATE_TIME FROM ACTLOG WHERE -
ORIGINATOR='SERVER' AND -
(SEVERITY='E' OR SEVERITY='W' OR MSGNO=9999) -
AND DATE_TIME>='2001-07-01 00:00:00.000000'
QUIT
//DSCOPT DD DISP=SHR,DSN=DSM1.ADMIN.OPTIONS
//DSCLANG DD DISP=SHR,DSN=SYS1.SANSMSG(ANSMENU)
regards
bruno
-----Ursprüngliche Nachricht-----
Von: Zoltan Forray/AC/VCU [mailto:[EMAIL PROTECTED]]
Gesendet am: Freitag, 13. Juli 2001 14:19
An: [EMAIL PROTECTED]
Betreff: Re: SQL on OS390
Thanks for the many answers about using "+". However, it doesn't work.
I guess I didn't make my self clear. I am running ADSM in batch, not
"TSO in BATCH" !!
The only reason the "+" works is because it is TSO in BATCH ! Here is
what I am trying to do:
//STEP1 EXEC PGM=DSMADMC,PARM='-ID=BATCHADM -PASSWORD=BATCHADM'
//STEPLIB DD DSN=TIVOLI.SANRLOAD,DISP=SHR
//DSCLANG DD DSN=TIVOLI.SANSMSG(ANSMENU),DISP=SHR
//DSCOPT DD DSN=TIVOLI.BATCH.OPTIONS(DSMOPT),DISP=SHR
//SYSPRINT DD SYSOUT=*
//SYSIN DD *
select volume_name,stgpool_name,pct_utilized from volumes where
pct_utilized<40 order by pct_utilized > forray.volutil
/*
I have tried "-", "+" and even "/" as was suggested by a co-worker ! Still
nothing. I get:
adsm> ANR2907E Unexpected SQL operator token - '/'.
|
..............................................................V
lect volume_name,stgpool_name,pct_utilized from volumes where /
ANS8001I Return code 3.
Note, this works for almost everything else TSM allows as a command.
Luuk Kleibrink <[EMAIL PROTECTED]>
Sent by: "ADSM: Dist Stor Manager" <[EMAIL PROTECTED]>
07/13/2001 02:46 AM
Please respond to "ADSM: Dist Stor Manager"
To: [EMAIL PROTECTED]
cc:
Subject: Re: SQL on OS390
Zoltan,
This works (NOTE: don't put spaces around the comma's, this might be your
problem):
//TSO1 EXEC PGM=IKJEFT01
//SYSPRINT DD SYSOUT=X
//SYSTSPRT DD SYSOUT=X
//SYSTERM DD SYSOUT=X
//SYSOUT DD SYSOUT=X
//SYSTCPD DD DSN=SYS1.TCPPARMS(TCPDATA),DISP=SHR
//DSCOPT DD DSN=SYP.TSM.TSOADMIN.OPTIONS,DISP=SHR
//DSCLANG DD DSN=SYS2.TSM.SANSMSG(ANSMENU),DISP=SHR
//SYSTSIN DD *
DSMADMC -ID=id -PA=password -OUT='OS390 data set name' +
SELECT STGPOOL_NAME,SUM(NUM_FILES) AS FILES, +
SUM(LOGICAL_MB) AS MB,NODE_NAME FROM OCCUPANCY +
GROUP BY STGPOOL_NAME,NODE_NAME ORDER BY NODE_NAME,STGPOOL_NAME
Luuk Kleibrink
Delta Lloyd Nuts Ohra
