# -*-c-*-
#
# $Id: 50MQCRTMH-v7,v 33.1 2009/07/02 20:57:52 biersma Exp $
#
# (c) 2009 Morgan Stanley & Co. Incorporated
# See ..../src/LICENSE for terms of distribution.
#
MQHMSG
MQCRTMH(Hconn,CrtMsgHOpts,CompCode,Reason)
MQHCONN Hconn
MQCMHO CrtMsgHOpts
MQLONG CompCode = NO_INIT
MQLONG Reason = NO_INIT
CODE:
MQCRTMH(Hconn,&CrtMsgHOpts,&RETVAL,&CompCode,&Reason);
OUTPUT:
RETVAL
CompCode
Reason