#-*-perl-*-
#
# $Id: ConfigEvent.in,v 33.1 2009/07/10 17:06:05 biersma Exp $
#
# (c) 2002-2009 Morgan Stanley & Co. Incorporated
# See ..../src/LICENSE for terms of distribution.
#
package MQSeries::Message::ConfigEvent;
%ResponseParameters =
(
#
# These are unqiue for PCF v2 events
#
&MQBACF_EVENT_ACCOUNTING_TOKEN => 'EventAccountingToken',
&MQCACF_EVENT_APPL_IDENTITY => 'EventApplIdentity',
&MQCACF_EVENT_APPL_NAME => 'EventApplName',
&MQCACF_EVENT_APPL_ORIGIN => 'EventApplOrigin',
&MQIACF_EVENT_APPL_TYPE => 'EventApplType',
&MQIACF_EVENT_ORIGIN => 'EventOrigin',
&MQCACF_EVENT_Q_MGR => 'EventQMgr',
&MQCACF_EVENT_USER_ID => 'EventUserid',
#
# This is necesary to translate the object type, so we can
# look up most keys in PCF command structures.
#
&MQIACF_OBJECT_TYPE => 'ObjectType',
#
# The below do not have PCF command equivalents on Unix. We might
# want to add them to the PCF response parameter tables...
#
&MQCA_ALTERATION_DATE => 'AlterationDate',
&MQCA_ALTERATION_TIME => 'AlterationTime',
&MQCA_CF_STRUC_DESC => 'CFStructDesc',
&MQCA_CF_STRUC_NAME => 'CFStructName',
&MQCA_IGQ_USER_ID => 'IntraGroupUser',
&MQCA_QSG_NAME => 'QSharingGroupName',
&MQCA_STORAGE_CLASS => 'StorageClassName',
&MQIA_CF_LEVEL => 'CFStructLevel',
&MQIA_CF_RECOVER => 'Recovery',
&MQIA_EXPIRY_INTERVAL => 'ExpiryInterval',
&MQIA_IGQ_PUT_AUTHORITY => 'IntraGroupAuthority',
&MQIA_INDEX_TYPE => 'IndexType',
&MQIA_INTRA_GROUP_QUEUING => 'IntraGroupQueueing',
&MQIA_PAGESET_ID => 'PageSetId',
&MQIA_QSG_DISP => 'QSharingGroupDisposition',
&MQIA_SSL_TASKS => 'SSLTasks',
&MQCA_XCF_GROUP_NAME => 'XCFGroupName',
&MQCA_XCF_MEMBER_NAME => 'XCFMemberName',
&MQIACH_KEEP_ALIVE_INTERVAL => 'KeepAliveInterval',
);
#
# We only include enums that we either need to get the object type, or
# that would not be included in the normal PCF command set.
#
%ResponseEnums =
(
EventOrigin =>
{
&MQEVO_CONSOLE => "MQEVO_CONSOLE - Console",
&MQEVO_INIT => "MQEVO_INIT - Initialization input data set",
&MQEVO_INTERNAL => "MQEVO_INTERNAL - Directly by queue manager",
&MQEVO_MQSET => "MQEVO_MQSET - MQSET call",
&MQEVO_MSG => "MQEVO_MSG - Message on SYSTEM.COMMAND.INPUT",
&MQEVO_OTHER => "MQEVO_OTHER - Other",
},
ObjectType =>
{
&MQOT_AUTH_INFO => "AuthInfo",
&MQOT_CF_STRUC => "CFStruct",
&MQOT_CHANNEL => "Channel",
&MQOT_NAMELIST => "Namelist",
&MQOT_PROCESS => "Process",
&MQOT_Q => "Queue",
&MQOT_Q_MGR => "QueueManager",
&MQOT_STORAGE_CLASS => "StorageClass",
},
);
1;