C
C Version:	'V04-000'
C
C****************************************************************************
C*									    *
C*  COPYRIGHT (c) 1978, 1980, 1982, 1984 BY				    *
C*  DIGITAL EQUIPMENT CORPORATION, MAYNARD, MASSACHUSETTS.		    *
C*  ALL RIGHTS RESERVED.						    *
C* 									    *
C*  THIS SOFTWARE IS FURNISHED UNDER A LICENSE AND MAY BE USED AND COPIED   *
C*  ONLY IN  ACCORDANCE WITH  THE  TERMS  OF  SUCH  LICENSE  AND WITH THE   *
C*  INCLUSION OF THE ABOVE COPYRIGHT NOTICE. THIS SOFTWARE OR  ANY  OTHER   *
C*  COPIES THEREOF MAY NOT BE PROVIDED OR OTHERWISE MADE AVAILABLE TO ANY   *
C*  OTHER PERSON.  NO TITLE TO AND OWNERSHIP OF  THE  SOFTWARE IS  HEREBY   *
C*  TRANSFERRED.							    *
C* 									    *
C*  THE INFORMATION IN THIS SOFTWARE IS  SUBJECT TO CHANGE WITHOUT NOTICE   *
C*  AND  SHOULD  NOT  BE  CONSTRUED AS  A COMMITMENT BY DIGITAL EQUIPMENT   *
C*  CORPORATION.							    *
C* 									    *
C*  DIGITAL ASSUMES NO RESPONSIBILITY FOR THE USE  OR  RELIABILITY OF ITS   *
C*  SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DIGITAL.		    *
C* 									    *
C*									    *
C****************************************************************************
C
C
C
C	AUTHOR	BRIAN PORTER		CREATION DATE	14-OCT-1979
C
C
C
C




	INTEGER*4	EMB$L_VM_OWNUIC		!OWNER UIC OF VOLUME
	EQUIVALENCE	(EMB$L_VM_OWNUIC,EMB(16))

	INTEGER*4	EMB$L_VM_ERRCNT		!UCB ERROR COUNT
	EQUIVALENCE	(EMB$L_VM_ERRCNT,EMB(20))

	INTEGER*4	EMB$L_VM_OPRCNT		!UCB OPERATION COUNT
	EQUIVALENCE	(EMB$L_VM_OPRCNT,EMB(24))

	INTEGER*2	EMB$W_VM_UNIT		!UNIT NUMBER
	EQUIVALENCE	(EMB$W_VM_UNIT,EMB(28))

	BYTE		EMB$B_VM_NAMLNG		!LENGTH OF DEVICE NAME
	EQUIVALENCE	(EMB$B_VM_NAMLNG,EMB(30))

	CHARACTER*15	EMB$T_VM_NAME		!DEVICE NAME
	EQUIVALENCE	(EMB$T_VM_NAME,EMB(31))

	INTEGER*2	EMB$W_VM_VOLNUM		!VOLUME NUMBER
	EQUIVALENCE	(EMB$W_VM_VOLNUM,EMB(46))

	INTEGER*2	EMB$W_VM_NUMSET		!VOLUMES IN SET
	EQUIVALENCE	(EMB$W_VM_NUMSET,EMB(48))

	CHARACTER*12	EMB$T_VM_LABEL		!VOLUME LABEL
	EQUIVALENCE	(EMB$T_VM_LABEL,EMB(50))
