This commit was generated by cvs2svn to compensate for changes in r11022,
[freeside.git] / rt / lib / RT / Ticket.pm
index edf38f0..2f075a2 100755 (executable)
@@ -1,51 +1,26 @@
-# BEGIN BPS TAGGED BLOCK {{{
-#
-# COPYRIGHT:
-#
-# This software is Copyright (c) 1996-2011 Best Practical Solutions, LLC
-#                                          <sales@bestpractical.com>
-#
-# (Except where explicitly superseded by other copyright notices)
-#
-#
-# LICENSE:
-#
+# BEGIN LICENSE BLOCK
+# 
+# Copyright (c) 1996-2003 Jesse Vincent <jesse@bestpractical.com>
+# 
+# (Except where explictly superceded by other copyright notices)
+# 
 # This work is made available to you under the terms of Version 2 of
 # the GNU General Public License. A copy of that license should have
 # been provided with this software, but in any event can be snarfed
 # from www.gnu.org.
-#
+# 
 # This work is distributed in the hope that it will be useful, but
 # WITHOUT ANY WARRANTY; without even the implied warranty of
 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
 # General Public License for more details.
-#
-# You should have received a copy of the GNU General Public License
-# along with this program; if not, write to the Free Software
-# Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA
-# 02110-1301 or visit their web page on the internet at
-# http://www.gnu.org/licenses/old-licenses/gpl-2.0.html.
-#
-#
-# CONTRIBUTION SUBMISSION POLICY:
-#
-# (The following paragraph is not intended to limit the rights granted
-# to you to modify and distribute this software under the terms of
-# the GNU General Public License and is only of importance to you if
-# you choose to contribute your changes and enhancements to the
-# community by submitting them to Best Practical Solutions, LLC.)
-#
-# By intentionally submitting any modifications, corrections or
-# derivatives to this work, or any other work intended for use with
-# Request Tracker, to Best Practical Solutions, LLC, you confirm that
-# you are the copyright holder for those contributions and you grant
-# Best Practical Solutions,  LLC a nonexclusive, worldwide, irrevocable,
-# royalty-free, perpetual, license to use, copy, create derivative
-# works based on those contributions, and sublicense and distribute
-# those contributions and any derivatives thereof.
-#
-# END BPS TAGGED BLOCK }}}
-
+# 
+# Unless otherwise specified, all modifications, corrections or
+# extensions to this work which alter its source code become the
+# property of Best Practical Solutions, LLC when submitted for
+# inclusion in the work.
+# 
+# 
+# END LICENSE BLOCK
 # Autogenerated by DBIx::SearchBuilder factory (by <jesse@bestpractical.com>)
 # WARNING: THIS FILE IS AUTOGENERATED. ALL CHANGES TO THIS FILE WILL BE LOST.  
 # 
@@ -87,7 +62,7 @@ sub _Init {
 
 
 
-=head2 Create PARAMHASH
+=item Create PARAMHASH
 
 Create takes a hash of values and creates a row in the database:
 
@@ -141,7 +116,7 @@ sub Create {
                 Resolved => '',
                 Disabled => '0',
 
-          @_);
+                 @_);
     $self->SUPER::Create(
                          EffectiveId => $args{'EffectiveId'},
                          Queue => $args{'Queue'},
@@ -169,7 +144,7 @@ sub Create {
 
 
 
-=head2 id
+=item id
 
 Returns the current value of id. 
 (In the database, id is stored as int(11).)
@@ -178,14 +153,14 @@ Returns the current value of id.
 =cut
 
 
-=head2 EffectiveId
+=item EffectiveId
 
 Returns the current value of EffectiveId. 
 (In the database, EffectiveId is stored as int(11).)
 
 
 
-=head2 SetEffectiveId VALUE
+=item SetEffectiveId VALUE
 
 
 Set EffectiveId to VALUE. 
@@ -196,14 +171,14 @@ Returns (1, 'Status message') on success and (0, 'Error Message') on failure.
 =cut
 
 
-=head2 Queue
+=item Queue
 
 Returns the current value of Queue. 
 (In the database, Queue is stored as int(11).)
 
 
 
-=head2 SetQueue VALUE
+=item SetQueue VALUE
 
 
 Set Queue to VALUE. 
@@ -214,7 +189,7 @@ Returns (1, 'Status message') on success and (0, 'Error Message') on failure.
 =cut
 
 
-=head2 QueueObj
+=item QueueObj
 
 Returns the Queue Object which has the id returned by Queue
 
@@ -222,22 +197,20 @@ Returns the Queue Object which has the id returned by Queue
 =cut
 
 sub QueueObj {
-    my $self = shift;
-    my $Queue =  RT::Queue->new($self->CurrentUser);
-    $Queue->Load($self->__Value('Queue'));
-    return($Queue);
+       my $self = shift;
+       my $Queue =  RT::Queue->new($self->CurrentUser);
+       $Queue->Load($self->__Value('Queue'));
+       return($Queue);
 }
 
-
-
-=head2 Type
+=item Type
 
 Returns the current value of Type. 
 (In the database, Type is stored as varchar(16).)
 
 
 
-=head2 SetType VALUE
+=item SetType VALUE
 
 
 Set Type to VALUE. 
@@ -248,14 +221,14 @@ Returns (1, 'Status message') on success and (0, 'Error Message') on failure.
 =cut
 
 
-=head2 IssueStatement
+=item IssueStatement
 
 Returns the current value of IssueStatement. 
 (In the database, IssueStatement is stored as int(11).)
 
 
 
-=head2 SetIssueStatement VALUE
+=item SetIssueStatement VALUE
 
 
 Set IssueStatement to VALUE. 
@@ -266,14 +239,14 @@ Returns (1, 'Status message') on success and (0, 'Error Message') on failure.
 =cut
 
 
-=head2 Resolution
+=item Resolution
 
 Returns the current value of Resolution. 
 (In the database, Resolution is stored as int(11).)
 
 
 
-=head2 SetResolution VALUE
+=item SetResolution VALUE
 
 
 Set Resolution to VALUE. 
@@ -284,14 +257,14 @@ Returns (1, 'Status message') on success and (0, 'Error Message') on failure.
 =cut
 
 
-=head2 Owner
+=item Owner
 
 Returns the current value of Owner. 
 (In the database, Owner is stored as int(11).)
 
 
 
-=head2 SetOwner VALUE
+=item SetOwner VALUE
 
 
 Set Owner to VALUE. 
@@ -302,14 +275,14 @@ Returns (1, 'Status message') on success and (0, 'Error Message') on failure.
 =cut
 
 
-=head2 Subject
+=item Subject
 
 Returns the current value of Subject. 
 (In the database, Subject is stored as varchar(200).)
 
 
 
-=head2 SetSubject VALUE
+=item SetSubject VALUE
 
 
 Set Subject to VALUE. 
@@ -320,14 +293,14 @@ Returns (1, 'Status message') on success and (0, 'Error Message') on failure.
 =cut
 
 
-=head2 InitialPriority
+=item InitialPriority
 
 Returns the current value of InitialPriority. 
 (In the database, InitialPriority is stored as int(11).)
 
 
 
-=head2 SetInitialPriority VALUE
+=item SetInitialPriority VALUE
 
 
 Set InitialPriority to VALUE. 
@@ -338,14 +311,14 @@ Returns (1, 'Status message') on success and (0, 'Error Message') on failure.
 =cut
 
 
-=head2 FinalPriority
+=item FinalPriority
 
 Returns the current value of FinalPriority. 
 (In the database, FinalPriority is stored as int(11).)
 
 
 
-=head2 SetFinalPriority VALUE
+=item SetFinalPriority VALUE
 
 
 Set FinalPriority to VALUE. 
@@ -356,14 +329,14 @@ Returns (1, 'Status message') on success and (0, 'Error Message') on failure.
 =cut
 
 
-=head2 Priority
+=item Priority
 
 Returns the current value of Priority. 
 (In the database, Priority is stored as int(11).)
 
 
 
-=head2 SetPriority VALUE
+=item SetPriority VALUE
 
 
 Set Priority to VALUE. 
@@ -374,14 +347,14 @@ Returns (1, 'Status message') on success and (0, 'Error Message') on failure.
 =cut
 
 
-=head2 TimeEstimated
+=item TimeEstimated
 
 Returns the current value of TimeEstimated. 
 (In the database, TimeEstimated is stored as int(11).)
 
 
 
-=head2 SetTimeEstimated VALUE
+=item SetTimeEstimated VALUE
 
 
 Set TimeEstimated to VALUE. 
@@ -392,14 +365,14 @@ Returns (1, 'Status message') on success and (0, 'Error Message') on failure.
 =cut
 
 
-=head2 TimeWorked
+=item TimeWorked
 
 Returns the current value of TimeWorked. 
 (In the database, TimeWorked is stored as int(11).)
 
 
 
-=head2 SetTimeWorked VALUE
+=item SetTimeWorked VALUE
 
 
 Set TimeWorked to VALUE. 
@@ -410,14 +383,14 @@ Returns (1, 'Status message') on success and (0, 'Error Message') on failure.
 =cut
 
 
-=head2 Status
+=item Status
 
 Returns the current value of Status. 
 (In the database, Status is stored as varchar(10).)
 
 
 
-=head2 SetStatus VALUE
+=item SetStatus VALUE
 
 
 Set Status to VALUE. 
@@ -428,14 +401,14 @@ Returns (1, 'Status message') on success and (0, 'Error Message') on failure.
 =cut
 
 
-=head2 TimeLeft
+=item TimeLeft
 
 Returns the current value of TimeLeft. 
 (In the database, TimeLeft is stored as int(11).)
 
 
 
-=head2 SetTimeLeft VALUE
+=item SetTimeLeft VALUE
 
 
 Set TimeLeft to VALUE. 
@@ -446,14 +419,14 @@ Returns (1, 'Status message') on success and (0, 'Error Message') on failure.
 =cut
 
 
-=head2 Told
+=item Told
 
 Returns the current value of Told. 
 (In the database, Told is stored as datetime.)
 
 
 
-=head2 SetTold VALUE
+=item SetTold VALUE
 
 
 Set Told to VALUE. 
@@ -464,14 +437,14 @@ Returns (1, 'Status message') on success and (0, 'Error Message') on failure.
 =cut
 
 
-=head2 Starts
+=item Starts
 
 Returns the current value of Starts. 
 (In the database, Starts is stored as datetime.)
 
 
 
-=head2 SetStarts VALUE
+=item SetStarts VALUE
 
 
 Set Starts to VALUE. 
@@ -482,14 +455,14 @@ Returns (1, 'Status message') on success and (0, 'Error Message') on failure.
 =cut
 
 
-=head2 Started
+=item Started
 
 Returns the current value of Started. 
 (In the database, Started is stored as datetime.)
 
 
 
-=head2 SetStarted VALUE
+=item SetStarted VALUE
 
 
 Set Started to VALUE. 
@@ -500,14 +473,14 @@ Returns (1, 'Status message') on success and (0, 'Error Message') on failure.
 =cut
 
 
-=head2 Due
+=item Due
 
 Returns the current value of Due. 
 (In the database, Due is stored as datetime.)
 
 
 
-=head2 SetDue VALUE
+=item SetDue VALUE
 
 
 Set Due to VALUE. 
@@ -518,14 +491,14 @@ Returns (1, 'Status message') on success and (0, 'Error Message') on failure.
 =cut
 
 
-=head2 Resolved
+=item Resolved
 
 Returns the current value of Resolved. 
 (In the database, Resolved is stored as datetime.)
 
 
 
-=head2 SetResolved VALUE
+=item SetResolved VALUE
 
 
 Set Resolved to VALUE. 
@@ -536,7 +509,7 @@ Returns (1, 'Status message') on success and (0, 'Error Message') on failure.
 =cut
 
 
-=head2 LastUpdatedBy
+=item LastUpdatedBy
 
 Returns the current value of LastUpdatedBy. 
 (In the database, LastUpdatedBy is stored as int(11).)
@@ -545,7 +518,7 @@ Returns the current value of LastUpdatedBy.
 =cut
 
 
-=head2 LastUpdated
+=item LastUpdated
 
 Returns the current value of LastUpdated. 
 (In the database, LastUpdated is stored as datetime.)
@@ -554,7 +527,7 @@ Returns the current value of LastUpdated.
 =cut
 
 
-=head2 Creator
+=item Creator
 
 Returns the current value of Creator. 
 (In the database, Creator is stored as int(11).)
@@ -563,7 +536,7 @@ Returns the current value of Creator.
 =cut
 
 
-=head2 Created
+=item Created
 
 Returns the current value of Created. 
 (In the database, Created is stored as datetime.)
@@ -572,14 +545,14 @@ Returns the current value of Created.
 =cut
 
 
-=head2 Disabled
+=item Disabled
 
 Returns the current value of Disabled. 
 (In the database, Disabled is stored as smallint(6).)
 
 
 
-=head2 SetDisabled VALUE
+=item SetDisabled VALUE
 
 
 Set Disabled to VALUE. 
@@ -591,64 +564,81 @@ Returns (1, 'Status message') on success and (0, 'Error Message') on failure.
 
 
 
-sub _CoreAccessible {
+sub _ClassAccessible {
     {
      
         id =>
-        {read => 1, sql_type => 4, length => 11,  is_blob => 0,  is_numeric => 1,  type => 'int(11)', default => ''},
+               {read => 1, type => 'int(11)', default => ''},
         EffectiveId => 
-        {read => 1, write => 1, sql_type => 4, length => 11,  is_blob => 0,  is_numeric => 1,  type => 'int(11)', default => '0'},
+               {read => 1, write => 1, type => 'int(11)', default => '0'},
         Queue => 
-        {read => 1, write => 1, sql_type => 4, length => 11,  is_blob => 0,  is_numeric => 1,  type => 'int(11)', default => '0'},
+               {read => 1, write => 1, type => 'int(11)', default => '0'},
         Type => 
-        {read => 1, write => 1, sql_type => 12, length => 16,  is_blob => 0,  is_numeric => 0,  type => 'varchar(16)', default => ''},
+               {read => 1, write => 1, type => 'varchar(16)', default => ''},
         IssueStatement => 
-        {read => 1, write => 1, sql_type => 4, length => 11,  is_blob => 0,  is_numeric => 1,  type => 'int(11)', default => '0'},
+               {read => 1, write => 1, type => 'int(11)', default => '0'},
         Resolution => 
-        {read => 1, write => 1, sql_type => 4, length => 11,  is_blob => 0,  is_numeric => 1,  type => 'int(11)', default => '0'},
+               {read => 1, write => 1, type => 'int(11)', default => '0'},
         Owner => 
-        {read => 1, write => 1, sql_type => 4, length => 11,  is_blob => 0,  is_numeric => 1,  type => 'int(11)', default => '0'},
+               {read => 1, write => 1, type => 'int(11)', default => '0'},
         Subject => 
-        {read => 1, write => 1, sql_type => 12, length => 200,  is_blob => 0,  is_numeric => 0,  type => 'varchar(200)', default => '[no subject]'},
+               {read => 1, write => 1, type => 'varchar(200)', default => '[no subject]'},
         InitialPriority => 
-        {read => 1, write => 1, sql_type => 4, length => 11,  is_blob => 0,  is_numeric => 1,  type => 'int(11)', default => '0'},
+               {read => 1, write => 1, type => 'int(11)', default => '0'},
         FinalPriority => 
-        {read => 1, write => 1, sql_type => 4, length => 11,  is_blob => 0,  is_numeric => 1,  type => 'int(11)', default => '0'},
+               {read => 1, write => 1, type => 'int(11)', default => '0'},
         Priority => 
-        {read => 1, write => 1, sql_type => 4, length => 11,  is_blob => 0,  is_numeric => 1,  type => 'int(11)', default => '0'},
+               {read => 1, write => 1, type => 'int(11)', default => '0'},
         TimeEstimated => 
-        {read => 1, write => 1, sql_type => 4, length => 11,  is_blob => 0,  is_numeric => 1,  type => 'int(11)', default => '0'},
+               {read => 1, write => 1, type => 'int(11)', default => '0'},
         TimeWorked => 
-        {read => 1, write => 1, sql_type => 4, length => 11,  is_blob => 0,  is_numeric => 1,  type => 'int(11)', default => '0'},
+               {read => 1, write => 1, type => 'int(11)', default => '0'},
         Status => 
-        {read => 1, write => 1, sql_type => 12, length => 10,  is_blob => 0,  is_numeric => 0,  type => 'varchar(10)', default => ''},
+               {read => 1, write => 1, type => 'varchar(10)', default => ''},
         TimeLeft => 
-        {read => 1, write => 1, sql_type => 4, length => 11,  is_blob => 0,  is_numeric => 1,  type => 'int(11)', default => '0'},
+               {read => 1, write => 1, type => 'int(11)', default => '0'},
         Told => 
-        {read => 1, write => 1, sql_type => 11, length => 0,  is_blob => 0,  is_numeric => 0,  type => 'datetime', default => ''},
+               {read => 1, write => 1, type => 'datetime', default => ''},
         Starts => 
-        {read => 1, write => 1, sql_type => 11, length => 0,  is_blob => 0,  is_numeric => 0,  type => 'datetime', default => ''},
+               {read => 1, write => 1, type => 'datetime', default => ''},
         Started => 
-        {read => 1, write => 1, sql_type => 11, length => 0,  is_blob => 0,  is_numeric => 0,  type => 'datetime', default => ''},
+               {read => 1, write => 1, type => 'datetime', default => ''},
         Due => 
-        {read => 1, write => 1, sql_type => 11, length => 0,  is_blob => 0,  is_numeric => 0,  type => 'datetime', default => ''},
+               {read => 1, write => 1, type => 'datetime', default => ''},
         Resolved => 
-        {read => 1, write => 1, sql_type => 11, length => 0,  is_blob => 0,  is_numeric => 0,  type => 'datetime', default => ''},
+               {read => 1, write => 1, type => 'datetime', default => ''},
         LastUpdatedBy => 
-        {read => 1, auto => 1, sql_type => 4, length => 11,  is_blob => 0,  is_numeric => 1,  type => 'int(11)', default => '0'},
+               {read => 1, auto => 1, type => 'int(11)', default => '0'},
         LastUpdated => 
-        {read => 1, auto => 1, sql_type => 11, length => 0,  is_blob => 0,  is_numeric => 0,  type => 'datetime', default => ''},
+               {read => 1, auto => 1, type => 'datetime', default => ''},
         Creator => 
-        {read => 1, auto => 1, sql_type => 4, length => 11,  is_blob => 0,  is_numeric => 1,  type => 'int(11)', default => '0'},
+               {read => 1, auto => 1, type => 'int(11)', default => '0'},
         Created => 
-        {read => 1, auto => 1, sql_type => 11, length => 0,  is_blob => 0,  is_numeric => 0,  type => 'datetime', default => ''},
+               {read => 1, auto => 1, type => 'datetime', default => ''},
         Disabled => 
-        {read => 1, write => 1, sql_type => 5, length => 6,  is_blob => 0,  is_numeric => 1,  type => 'smallint(6)', default => '0'},
+               {read => 1, write => 1, type => 'smallint(6)', default => '0'},
 
  }
 };
 
-RT::Base->_ImportOverlays();
+
+        eval "require RT::Ticket_Overlay";
+        if ($@ && $@ !~ qr{^Can't locate RT/Ticket_Overlay.pm}) {
+            die $@;
+        };
+
+        eval "require RT::Ticket_Vendor";
+        if ($@ && $@ !~ qr{^Can't locate RT/Ticket_Vendor.pm}) {
+            die $@;
+        };
+
+        eval "require RT::Ticket_Local";
+        if ($@ && $@ !~ qr{^Can't locate RT/Ticket_Local.pm}) {
+            die $@;
+        };
+
+
+
 
 =head1 SEE ALSO
 
@@ -658,7 +648,7 @@ _Vendor is for 3rd-party vendor add-ons, while _Local is for site-local customiz
 
 These overlay files can contain new subs or subs to replace existing subs in this module.
 
-Each of these files should begin with the line 
+If you'll be working with perl 5.6.0 or greater, each of these files should begin with the line 
 
    no warnings qw(redefine);