!                                                                               
!   © Copyright 1976, 2003 Hewlett-Packard Development Company, L.P.            
!                                                                               
!   Confidential computer software.  Valid license from HP and/or               
!   its subsidiaries required for possession, use, or copying.                  
!                                                                               
!   Consistent with FAR 12.211 and 12.212, Commercial Computer Software,        
!   Computer Software Documentation, and Technical Data for Commercial          
!   Items are licensed to the U.S. Government under vendor's standard           
!   commercial license.                                                         
!                                                                               
!   Neither HP nor any of its subsidiaries shall be liable for technical        
!   or editorial errors or omissions contained herein.  The information         
!   in this document is provided "as is" without warranty of any kind and       
!   is subject to change without notice.  The warranties for HP products        
!   are set forth in the express limited warranty statements accompanying       
!   such products.  Nothing herein should be construed as constituting an       
!   additional warranty.                                                        
!
!****************************************************************************
!                                                                               
!	X-1	CMOS		Christian Moser		 6-MAY-2003
!		Initial version.
!

module	rdb_cmd
ident	"X-1"



define	verb	show
	parameter	p1, 		value ( required, type = show_type )

define	type	show_type
	keyword		active_db,	syntax = show_active_db
	keyword		process,	syntax = show_process
	keyword		contention,	syntax = show_contention
	keyword		lock,		syntax = show_lock
	keyword		resource,	syntax = show_resource

define	syntax	show_active_db
	routine	rdb$show_active_db
	qualifier	toptrees,	value ( required )
	qualifier	full

define	syntax	show_process
	routine	rdb$show_process
	qualifier	index,		value ( required )
	qualifier	identification,	value ( required )
	qualifier	address,	value ( required )
	disallow	any2 ( identification, index, address )
	qualifier	waiting
	qualifier	convert
	qualifier	granted
	qualifier	valblk

define	syntax	show_contention
	routine	rdb$show_contention
	qualifier	interval,	value ( required )

define	syntax	show_lock
	routine	rdb$show_lock
	qualifier	address,	value ( required )
	qualifier	identification,	value ( required )
	qualifier	waiting
	qualifier	convert
	qualifier	granted
	qualifier	type,		value ( required )
	qualifier	valblk

define	syntax	show_resource
	routine	rdb$show_resource
	qualifier	address,	value ( required )
	qualifier	identification,	value ( required )
	qualifier	type,		value ( required )
	qualifier	valblk



define	verb	stop
	routine rdb$stop