Mounting VMTAPE Managed Tapes For ADSM's Use
1996-05-14 11:06:51
Subject: |
Mounting VMTAPE Managed Tapes For ADSM's Use |
From: |
"Mark A. Stevens" <xmas AT UXA.ECN.BGU DOT EDU> |
Date: |
Tue, 14 May 1996 10:06:51 -0500 |
I'm lost (again). I've been able to get VMTAPE and ADSM to play when
mounting a scratch tape for use, but mounting a used tape escapes me.
This is what I've been using:
/***********************************************************************
* ADSTAR Distributed Storage Manager *
* *
* Licensed Materials - Property of IBM *
* *
* 5648-020 (C) Copyright IBM Corporation 1990, 1993. *
* All rights reserved. *
* *
* Refer to Copyright Instructions. *
***********************************************************************/
Trace Off
Address Command
/* ---------------------------------------- */
/* Get parameter list. */
/* ---------------------------------------- */
Arg serverName mountWait requestNum devType volName ,
serverVaddr mountMode format stgPoolName .
myVaddr = 181
rc = 0
/* ---------------------------------------- */
/* Setup mount options. */
/* ---------------------------------------- */
If devType = 'CARTRIDGE' Then Do
den = '18TR'
If mountMode = 'R/W' Then
ring = 'WRITE'
Else
ring = 'READ'
End
Else Do
den = 'DEN 6250'
If mountMode = 'R/W' Then
ring = 'RING'
Else
ring = 'NORING'
End
/* ---------------------------------------- */
/* Issue appropriate command to give the */
/* server the drive at the correct address. */
/* ---------------------------------------- */
'VMTAPE MOUNT' volName myVaddr '(WAIT LABEL SL' ring den
/* ---------------------------------------- */
/* Cancel mount if return code not zero. */
/* (Logging off will cancel the mount.) */
/* ---------------------------------------- */
If rc ,= 0 Then Do
'CP MSG OPERATOR VMTAPE MOUNT' VOLNAME MYVADDR '(WAIT LABEL SL',
ring den 'FAILED ON ADSM MOUNT MACHINE'
'CP LOGOFF'
End
/* ---------------------------------------- */
/* Find the real address of the tape drive. */
/* ---------------------------------------- */
'EXECIO 1 CP ( LIFO STRING QUERY VIRTUAL' myVaddr
If rc ,= 0 Then Do
'CP MSG OPERATOR ERROR FINDING REAL ADDRESS ON TAPE MOUNT MACHINE'
'CP LOGOFF'
End
Pull . . . . raddr .
'CP DETACH' raddr '* LEAVE'
'CP ATTACH' raddr serverName serverVaddr
/* ---------------------------------------- */
/* Stack a Logoff command and exit. */
/* ---------------------------------------- */
Push 'CP LOGOFF'
Exit 0
When DSMSERV calls for a tape, DSMTAPE is started, but never generates
a mount request for an existing tape. Does anyone have a clue what I
should read/do to get this fixed?
Mark A. Stevens Phone: 708-235-2204
Systems Programmer Internet: xmas AT uxa.ecn.bgu DOT edu
Educational Computing Network BITNET: [email protected]
Board of Governors Universities VMSHARE: ECE/MARK
|
<Prev in Thread] |
Current Thread |
[Next in Thread>
|
- Mounting VMTAPE Managed Tapes For ADSM's Use,
Mark A. Stevens <=
|
|
|