# -*-c-*-
#
# $Id: 37MQCLOSE,v 20.1 2002/03/18 20:32:41 biersma Exp $
#
# (c) 1999-2002 Morgan Stanley Dean Witter and Co.
# See ..../src/LICENSE for terms of distribution.
#

void
MQCLOSE(Hconn,Hobj,Options,CompCode,Reason)
	MQHCONN	Hconn
	MQHOBJ	Hobj
	MQLONG	Options
	MQLONG	CompCode
	MQLONG	Reason

	CODE:
	MQCLOSE(Hconn,&Hobj,Options,&CompCode,&Reason);
	OUTPUT:
	Hobj
	CompCode
	Reason

