# -*-c-*-
#
# $Id: 55MQSTAT-v7,v 33.4 2012/09/26 16:10:08 jettisu Exp $
#
# (c) 2009-2012 Morgan Stanley & Co. Incorporated
# See ..../src/LICENSE for terms of distribution.
#

void
MQSTAT(Hconn,StatType,Stat,CompCode,Reason)
        MQHCONN Hconn
        MQLONG  StatType
        MQSTS   Stat = NO_INIT
        MQLONG  CompCode = NO_INIT
        MQLONG  Reason = NO_INIT

    PREINIT:
        MQSTS stat_dft = {MQSTS_DEFAULT};
    CODE:
        memcpy((char*)&Stat, &stat_dft, sizeof(Stat));
        MQSTAT(Hconn,StatType,&Stat,&CompCode,&Reason);
    OUTPUT:
        Stat
        CompCode
        Reason