ADSM-L

Re: SQL on OS390

2001-07-12 16:12:12
Subject: Re: SQL on OS390
From: Bill Colwell <bcolwell AT DRAPER DOT COM>
Date: Thu, 12 Jul 2001 16:06:50 -0400
Zoltan,

I use a plus sign, but I don't try to put long selects into the call command,
instead I use a macro.  Here is some jcl and a macro -

//QUERYVOL EXEC PGM=IKJEFT01,DYNAMNBR=100
/SYSPRINT DD  SYSOUT=*
//SYSTSPRT DD  SYSOUT=*
//SYSTSIN  DD *
FREE F(DSCLANG DSCOPT)
DEL   'mytsoid.SELVOLS.OUTPUT'
ALLOC F(DSCLANG) DA('ADSM.V3R1M21.SANSMSG(ANSMENU)') SHR REU
ALLOC F(DSCOPT) DA('ADSM.V3R1.ADMIN.PORT1600.TSOOPT') SHR REU
CALL 'ADSM.V3R1M21.LINKLIB(DSMADMC)' +
 '-ID=mytsmid -PASS=mypass +
 MACRO ''ADSM.V3R1.PROD.MACS(SELVOLS)'' '


/*                                              */
/* macro file to select all tape volumes        */
/*                                              */
/*                                              */
set sqldisplaymode w
select * -
   from adsm.volumes  -
   where stgpool_name ^= 'BACKUPPOOL' -
   > 'mytsoid.SELVOLS.OUTPUT'


Hope this helps,

--
--------------------------
--------------------------
Bill Colwell
Bill Colwell
C. S. Draper Lab
Cambridge, Ma.
bcolwell AT draper DOT com
--------------------------
In <OF77FCA2AD.C6DC4104-ON85256A87.0064C8B4 AT vcu DOT edu>, on 07/12/01
In <OF77FCA2AD.C6DC4104-ON85256A87.0064C8B4 AT vcu DOT edu>, on 07/12/01
   at 04:06 PM, Zoltan Forray/AC/VCU <zforray AT VCU DOT EDU> said:

>I see lots of SQL floating around here.

>Since my server is OS390, I tried a "query" in batch.  However, the
>command was too long for a 72-column "card".

>What character is used to continue SQL commands onto subsequent lines ?  I
>tried the standard "-" which works for almost *ALL* other OS390 utilities,
>but it didn't work for TSM.

>This is TSM 4.1.3.

>===========================
>Zoltan Forray
>Virginia Commonwealth University
>University Computing Center
>e-mail: zforray AT vcu DOT edu
>voice: 804-828-4807
<Prev in Thread] Current Thread [Next in Thread>