This is a sample of the JCL that we use and it works fine usinf TCPIP :
//SYSTCPD DD DSN=TCP.SYSB2.TCPPARMS(TCPDATA),DISP=SHR ( the TCP
parms member)
//DSCOPT DD DSN=ADSM0.TSO.OPTIONS.FDATA,DISP=SHR ( The
ADSM TSO options member)
Thanks,
Kuli.
Kulbinder Toora
01384 296191 x3498
e-mail - Kulbinder.toora AT meb.co DOT uk
Midlands Electricity
> -----Original Message-----
> From: François Le Maner [SMTP:flemaner AT LORICAM DOT FR]
> Sent: Wednesday, June 23, 1999 7:21 AM
> To: ADSM-L AT VM.MARIST DOT EDU
> Subject: Calling ADSM via TSO in batch
>
> >>>Does anyone know how to call ADSM via TSO admin client in batch ?
> >>>
> >>>ADSM is ready and working correctly
> >>>
> >>>ADSM is ready
> >>>
> >>>ADSM Server for MVS - Version 3, Release 1, Level 2.20
> >>>ANR5105I Interlink TCPaccess driver is ready for service on port 1500
> >>>
> >>>Here are the TSO admin client options is use in DD DSCOPT :
> >>>
> >>>//DSCOPT DD *
> >>>***********************************************************************
> *
> >>>* ADSM: Configuration File
> >>>* Options for TSO Admin Client Version 3 Release 1
> >>>***********************************************************************
> *
> >>>COMMMETHOD TCPIP
> >>>LANGUAGE AMENG
> >>>TCPPORT 1500
> >>>TCPSERVERADDRESS 10.9.90.1
> >>>ICSSNAME ACSS
> >>>
> >>>
> >>>Here is the JCL result :
> >>>
> >>>1 J E S 2 J O B L O G -- S Y S T E M L O
> >
> >> --
> >Unknown command - "--". Try HELP.
> >
> >>>N O D E L O R
> >>>0
> >>> 10:46:31 JOB62737 ---- THURSDAY, 17 JUN 1999 ----
> >>> 10.46.31 JOB62737 TSS7000I S2300 Last-Used 17 Jun 99 10:35 System=LOR
> >>>Facility=BATCH
> >>> 10.46.31 JOB62737 TSS7001I Count=65144 Mode=Fail Locktime=None
> Name=LE
> >>>MANER FRANCOIS
> >>> 10.46.31 JOB62737 $HASP373 S0000ADS STARTED - INIT S1 - CLASS S -
> SYS
> >>>LOR
> >>> 10.46.31 JOB62737 IEF403I S0000ADS - STARTED - TIME=10.46.31
> >>> 10.46.32 JOB62737 - G.I.E L O R I C A M *
> >>> --TIMINGS (MINS.)-- ----PAGING COUNTS---
> >>> 10.46.32 JOB62737 -JOBNAME STEPNAME PROCSTEP RC EXCP CONN
> TCB
> >>>SRB CLOCK SERV PG PAGE SWAP VIO SWAPS
> >>> 10.46.32 JOB62737 -S0000ADS DELETE 00 13 27
> .00
> >>>.00 .0 1442 0 0 0 0 0
> >>> 10.46.34 JOB62737 -S0000ADS TSO 1059 357 1030
> .00
> >>>.00 .0 10788 0 0 0 0 0
> >>> 10.46.34 JOB62737 -S0000ADS S010 00 19 21
> .00
> >>>.00 .0 1201 0 0 0 0 0
> >>> 10.46.34 JOB62737 IEF404I S0000ADS - ENDED - TIME=10.46.34
> >>> 10.46.34 JOB62737 -S0000ADS ENDED. NAME-ADSM BATCH TOTAL
> TCB
> >>>CPU TIME= .00 TOTAL ELAPSED TIME= .0
> >>> 10.46.34 JOB62737 $HASP395 S0000ADS ENDED
> >>>0------ JES2 JOB STATISTICS ------
> >>>- 17 JUN 1999 JOB EXECUTION DATE
> >>>- 37 CARDS READ
> >>>- 129 SYSOUT PRINT RECORDS
> >>>- 0 SYSOUT PUNCH RECORDS
> >>>- 8 SYSOUT SPOOL KBYTES
> >>>- 0.05 MINUTES EXECUTION TIME
> >>> 1 //S0000ADS JOB S,'ADSM
> BATCH',CLASS=S,MSGLEVEL=(1,1),MSGCLASS=X,
> >>>JOB62737
> >>> // NOTIFY=S2300,REGION=8M,
> >>>00020003
> >>> // USER=S2300,PASSWORD=
> >>>
> >>>//******************************************************************
> >>>00030000
> >>> //*
> >>>* 00040000
> >>> //* COMMANDES ADSM EN BATCH
> >>>* 00041000
> >>> //*
> >>>* 00042000
> >>>
> >>>//******************************************************************
> >>>00050000
> >>> 2 //DELETE EXEC PGM=IDCAMS
> >>>04190004
> >>> 3 //SYSPRINT DD SYSOUT=Z
> >>>04191004
> >>> 4 //SYSIN DD *
> >>>04192004
> >>> 5 //TSO EXEC PGM=IKJEFT01
> >>>04200004
> >>> 6 //DSCLANG DD DSN=EPDS.ADSM.SANSMSG(ANSMENU),DISP=SHR
> >>>04200103
> >>> 7 //SYSTSPRT DD SYSOUT=*
> >>>04201002
> >>> 8 //SYSPRINT DD SYSOUT=*
> >>>04202003
> >>> 9 //DSCOPT DD *
> >>>04210002
> >>> 10 //SYSTSIN DD *
> >>>04225004
> >>> 11 //S010 EXEC PGM=ICEGENER
> >>>04380004
> >>> 12 //SYSPRINT DD SYSOUT=Z
> >>>04390004
> >>> 13 //SYSUT1 DD DISP=SHR,DSN=S2300.DSMERROR.LOG
> >>>04400004
> >>> 14 //SYSUT2 DD SYSOUT=*
> >>>04420004
> >>> 15 //SYSIN DD DUMMY
> >>>04440004
> >>> TSS7000I S2300 Last-Used 17 Jun 99 10:35 System=LOR Facility=BATCH
> >>> TSS7001I Count=65144 Mode=Fail Locktime=None Name=LE MANER FRANCOIS
> >>> IEF236I ALLOC. FOR S0000ADS DELETE
> >>> IEF237I JES2 ALLOCATED TO SYSPRINT
> >>> IEF237I JES2 ALLOCATED TO SYSIN
> >>> IGD103I SMS ALLOCATED TO DDNAME SYS00001
> >>> IGD104I S2300.DSMERROR.LOG RETAINED,
> >>>DDNAME=SYS00001
> >>> IEF142I S0000ADS DELETE - STEP WAS EXECUTED - COND CODE 0000
> >>> IEF285I S2300.S0000ADS.JOB62737.D0000104.? SYSOUT
> >>> IEF285I S2300.S0000ADS.JOB62737.D0000101.? SYSIN
> >>> IEF373I STEP/DELETE /START 1999168.1046
> >>> IEF374I STEP/DELETE /STOP 1999168.1046 CPU 0MIN 00.02SEC SRB
> 0MIN
> >>>00.00SEC VIRT 212K SYS 408K EXT 4K SYS 10084K
> >>> IEF236I ALLOC. FOR S0000ADS TSO
> >>> IGD103I SMS ALLOCATED TO DDNAME DSCLANG
> >>> IEF237I JES2 ALLOCATED TO SYSTSPRT
> >>> IEF237I JES2 ALLOCATED TO SYSPRINT
> >>> IEF237I JES2 ALLOCATED TO DSCOPT
> >>> IEF237I JES2 ALLOCATED TO SYSTSIN
> >>> IEF237I 0A3D ALLOCATED TO SYS00002
> >>> IEF285I SYS1.UADS KEPT
> >>> IEF285I VOL SER NOS= LORCA2.
> >>> IGD101I SMS ALLOCATED TO DDNAME (SYS00004)
> >>> DSN (S2300.DSMERROR.LOG )
> >>> STORCLAS (SCSYS) MGMTCLAS (MCMIG30) DATACLAS ( )
> >>> VOL SER NOS= LORS05
> >>> IGD104I S2300.DSMERROR.LOG RETAINED,
> >>>DDNAME=SYS00004
> >>> IGD103I SMS ALLOCATED TO DDNAME SYS00005
> >>> IGD104I S2300.DSMERROR.LOG RETAINED,
> >>>DDNAME=SYS00005
> >>> IGD103I SMS ALLOCATED TO DDNAME SYS00006
> >>> IGD104I S2300.DSMERROR.LOG RETAINED,
> >>>DDNAME=SYS00006
> >>> IEF142I S0000ADS TSO - STEP WAS EXECUTED - COND CODE 1059
> >>> IGD104I EPDS.ADSM.SANSMSG RETAINED,
> >>>DDNAME=DSCLANG
> >>> IEF285I S2300.S0000ADS.JOB62737.D0000105.? SYSOUT
> >>> IEF285I S2300.S0000ADS.JOB62737.D0000106.? SYSOUT
> >>> IEF285I S2300.S0000ADS.JOB62737.D0000102.? SYSIN
> >>> IEF285I S2300.S0000ADS.JOB62737.D0000103.? SYSIN
> >>> IEF373I STEP/TSO /START 1999168.1046
> >>> IEF374I STEP/TSO /STOP 1999168.1046 CPU 0MIN 00.12SEC SRB
> 0MIN
> >>>00.02SEC VIRT 160K SYS 480K EXT 4624K SYS 10240K
> >>> IEF236I ALLOC. FOR S0000ADS S010
> >>> IEF237I JES2 ALLOCATED TO SYSPRINT
> >>> IGD103I SMS ALLOCATED TO DDNAME SYSUT1
> >>> IEF237I JES2 ALLOCATED TO SYSUT2
> >>> IEF237I DMY ALLOCATED TO SYSIN
> >>> IEF142I S0000ADS S010 - STEP WAS EXECUTED - COND CODE 0000
> >>> IEF285I S2300.S0000ADS.JOB62737.D0000107.? SYSOUT
> >>> IGD104I S2300.DSMERROR.LOG RETAINED,
> >>>DDNAME=SYSUT1
> >>> IEF285I S2300.S0000ADS.JOB62737.D0000108.? SYSOUT
> >>> IEF373I STEP/S010 /START 1999168.1046
> >>> IEF374I STEP/S010 /STOP 1999168.1046 CPU 0MIN 00.02SEC SRB
> 0MIN
> >>>00.00SEC VIRT 1052K SYS 368K EXT 4K SYS 10104K
> >>> IEF375I JOB/S0000ADS/START 1999168.1046
> >>> IEF376I JOB/S0000ADS/STOP 1999168.1046 CPU 0MIN 00.16SEC SRB
> 0MIN
> >>>00.02SEC
> >>>1READY
> >>> PROFILE PROMPT
> >>> READY
> >>> DSMADMC / -ID=S2300 -PASS=S2300 Q VOL
> >>> READY
> >>> END
> >>> ADSTAR Distributed Storage Manager
> >>> Command Line Administrative Interface - Version 3, Release 1, Level
> 0.5
> >>> (C) Copyright IBM Corporation, 1990, 1997, All Rights Reserved.
> >>>0ANS1235E Unknown system error
> >>> ANS8023E Unable to establish session with server.
> >>>0ANS8002I Highest return code was -59.
> >>>
> >>> 06/17/1999 10:46:34 sessInit: Failure in communications
> initialization.
> >>>rc: -59
> >>> 06/17/1999 10:46:34 ANS1235E Unknown system error
> >>> 06/17/1999 10:46:34 ANS8023E Unable to establish session with server.
> >>>
> >>>
> >
> >Your message did not contain any command. Note that lines starting with a
> >"greater than" sign ('>') are ignored.
> >
> >Summary of resource utilization
> >-------------------------------
> > CPU time: 0.016 sec Device I/O: 0
> > Overhead CPU: 0.001 sec Paging I/O: 0
> > CPU model: 9672 DASD model: 3390
> > Job origin: flemaner AT LORICAM DOT FR
> >
>
> ================================================================
> This incoming e-mail (and any attachments) has been checked at MEB
> (UK 01384 296191), and has been found to be clean from any
> virus infection (using Sophos SAVI 3.21 and Dr Solomon's v7.95).
>
> Virus queries - Tech Support (09 3521)
> E-mail system - External Postmaster (09 3673)
>
> ================================================================
===============================================================This outgoing
e-mail (and any attachments) has been checked
(using Sophos SAVI 3.21 and Dr Solomon's v7.95) before leaving us
(UK 01384 296191), and has been found to be clean from any virus infection.
Virus queries - PC Tech Support (09 3521)
E-mail system - External Postmaster (09 3673).
==============================================================
|