Bivio::Delegate::RowTagKey
# Copyright (c) 2007-2012 bivio Software, Inc. All Rights Reserved.
# $Id$
package Bivio::Delegate::RowTagKey;
use strict;
use Bivio::Base 'Type.EnumDelegate';
my($_INFO, $_TYPE) = _init();
sub get_delegate_info {
return [@$_INFO];
}
sub internal_get_type {
return $_TYPE->{shift->get_name};
}
sub _init {
my($type) = {};
return (
[map(
{
$type->{$_->[0]} = $_->[2];
($_->[0], $_->[1]);
}
[UNKNOWN => 0],
[ERROR_DETAIL => 1, 'Text'],
[RELATED_ID => 2, 'PrimaryId'],
[DEFAULT_TUPLE_MONIKER => 3, 'TupleMoniker'],
[MAIL_SUBJECT_PREFIX => 4, 'MailSubject'],
[BULLETIN_MAIL_MODE => 5, 'BulletinMailMode'],
#6
[PAGE_SIZE => 7, 'PageSize'],
[CANONICAL_EMAIL_ALIAS => 8, 'Email'],
[CANONICAL_SENDER_EMAIL => 9, 'Email'],
[CRM_SUBJECT_PREFIX => 10, 'MailSubject'],
#11
[TEXTAREA_WRAP_LINES => 12, 'BooleanFalseDefault'],
[TIME_ZONE => 13, 'TimeZone'],
[MAIL_WANT_REPLY_TO => 14, 'MailWantReplyTo'],
[MAIL_VISIBILITY => 15, 'MailVisibility'],
[BULLETIN_BODY_TEMPLATE => 16, 'BulletinBodyTemplate'],
[FILTER_MAILER_DAEMON => 17, 'BooleanFalseDefault'],
[NO_CONFIRM_TASKS => 18, 'TaskIdArray'],
[LAST_RESERVED_VALUE => 99],
)],
$type,
);
}
1;