ADSM-L

Re: SQL on OS390

2001-07-13 08:14:32
Subject: Re: SQL on OS390
From: "MC Matt Cooper (2838)" <Matt.Cooper AT AMGREETINGS DOT COM>
Date: Fri, 13 Jul 2001 07:28:29 -0400
I use the same mechanism but I can fit it all on 1 PDS member.

//TSMJOB1  EXEC PGM=IKJEFT01
//STEPLIB  DD   DSN=SYS1.CEE.SCEERUN,DISP=SHR
//DSCLANG  DD DSN=SYS1.TSM.SANSMSG(ANSMENU),DISP=SHR
//DSCOPT   DD DSN=AGPP.TSM.TSOADMIN.OPTIONS,DISP=SHR
//SYSHELP  DD DSN=SYS1.TCPIP.SEZAHELP,DISP=SHR
//SYSIN  DD  DUMMY
//SYSTSIN DD *
DSMADMC -ID=XXXXXXXX -PASSWORD=xxxxxxxx MACRO DD:TRYME
//TRYME DD *
 select * from -
  backups where -
   node_name='USCLES803' -
  and  backup_date<'2001-04-01'  -
   order by BACKUP_DATE
/*
//SYSTSPRT  DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*

Hope it helps,
Matt

<Prev in Thread] Current Thread [Next in Thread>