# -*-c-*-
#
# $Id: 38MQDISC,v 27.1 2007/01/11 20:19:54 molinam Exp $
#
# (c) 1999-2007 Morgan Stanley Dean Witter and Co.
# See ..../src/LICENSE for terms of distribution.
#

void
MQDISC(Hconn,CompCode,Reason)
	MQHCONN	Hconn
	MQLONG	CompCode
	MQLONG	Reason

	CODE:
	MQDISC(&Hconn,&CompCode,&Reason);
	OUTPUT:
	Hconn
	CompCode
	Reason

