import rt 3.4.6

[freeside.git] / rt / lib / RT / Transaction.pm

diff --git a/rt/lib/RT/Transaction.pm b/rt/lib/RT/Transaction.pm
index 431d39a..cca2281 100755 (executable)
--- a/rt/lib/RT/Transaction.pm
+++ b/rt/lib/RT/Transaction.pm
@@ -1,8 +1,8 @@
-# {{{ BEGIN BPS TAGGED BLOCK
+# BEGIN BPS TAGGED BLOCK {{{

 # 
 # COPYRIGHT:
 #  
 # 
 # COPYRIGHT:
 #  

-# This software is Copyright (c) 1996-2004 Best Practical Solutions, LLC 
+# This software is Copyright (c) 1996-2005 Best Practical Solutions, LLC 

 #                                          <jesse@bestpractical.com>
 # 
 # (Except where explicitly superseded by other copyright notices)
 #                                          <jesse@bestpractical.com>
 # 
 # (Except where explicitly superseded by other copyright notices)


@@ -42,7 +42,7 @@
 # works based on those contributions, and sublicense and distribute
 # those contributions and any derivatives thereof.
 # 
 # works based on those contributions, and sublicense and distribute
 # those contributions and any derivatives thereof.
 # 

-# }}} END BPS TAGGED BLOCK
+# END BPS TAGGED BLOCK }}}

 # Autogenerated by DBIx::SearchBuilder factory (by <jesse@bestpractical.com>)
 # WARNING: THIS FILE IS AUTOGENERATED. ALL CHANGES TO THIS FILE WILL BE LOST.  
 # 
 # Autogenerated by DBIx::SearchBuilder factory (by <jesse@bestpractical.com>)
 # WARNING: THIS FILE IS AUTOGENERATED. ALL CHANGES TO THIS FILE WILL BE LOST.  
 # 


@@ -67,7 +67,6 @@ RT::Transaction
 
 package RT::Transaction;
 use RT::Record; 
 
 package RT::Transaction;
 use RT::Record; 

-use RT::Ticket;

 
 
 use vars qw( @ISA );
 
 
 use vars qw( @ISA );


@@ -88,13 +87,16 @@ sub _Init {
 
 Create takes a hash of values and creates a row in the database:
 
 
 Create takes a hash of values and creates a row in the database:
 

-  int(11) 'EffectiveTicket'.
-  int(11) 'Ticket'.
+  varchar(64) 'ObjectType'.
+  int(11) 'ObjectId'.

   int(11) 'TimeTaken'.
   varchar(20) 'Type'.
   varchar(40) 'Field'.
   varchar(255) 'OldValue'.
   varchar(255) 'NewValue'.
   int(11) 'TimeTaken'.
   varchar(20) 'Type'.
   varchar(40) 'Field'.
   varchar(255) 'OldValue'.
   varchar(255) 'NewValue'.

+  varchar(255) 'ReferenceType'.
+  int(11) 'OldReference'.
+  int(11) 'NewReference'.

   varchar(255) 'Data'.
 
 =cut
   varchar(255) 'Data'.
 
 =cut


@@ -105,24 +107,30 @@ Create takes a hash of values and creates a row in the database:
 sub Create {
     my $self = shift;
     my %args = ( 
 sub Create {
     my $self = shift;
     my %args = ( 

-                EffectiveTicket => '0',
-                Ticket => '0',
+                ObjectType => '',
+                ObjectId => '0',

                 TimeTaken => '0',
                 Type => '',
                 Field => '',
                 OldValue => '',
                 NewValue => '',
                 TimeTaken => '0',
                 Type => '',
                 Field => '',
                 OldValue => '',
                 NewValue => '',

+                ReferenceType => '',
+                OldReference => '',
+                NewReference => '',

                 Data => '',
 
                  @_);
     $self->SUPER::Create(
                 Data => '',
 
                  @_);
     $self->SUPER::Create(

-                         EffectiveTicket => $args{'EffectiveTicket'},
-                         Ticket => $args{'Ticket'},
+                         ObjectType => $args{'ObjectType'},
+                         ObjectId => $args{'ObjectId'},

                          TimeTaken => $args{'TimeTaken'},
                          Type => $args{'Type'},
                          Field => $args{'Field'},
                          OldValue => $args{'OldValue'},
                          NewValue => $args{'NewValue'},
                          TimeTaken => $args{'TimeTaken'},
                          Type => $args{'Type'},
                          Field => $args{'Field'},
                          OldValue => $args{'OldValue'},
                          NewValue => $args{'NewValue'},

+                         ReferenceType => $args{'ReferenceType'},
+                         OldReference => $args{'OldReference'},
+                         NewReference => $args{'NewReference'},

                          Data => $args{'Data'},
 );
 
                          Data => $args{'Data'},
 );
 


@@ -139,56 +147,42 @@ Returns the current value of id.
 =cut
 
 
 =cut
 
 

-=head2 EffectiveTicket
+=head2 ObjectType

 
 

-Returns the current value of EffectiveTicket. 
-(In the database, EffectiveTicket is stored as int(11).)
+Returns the current value of ObjectType. 
+(In the database, ObjectType is stored as varchar(64).)

 
 
 
 
 
 

-=head2 SetEffectiveTicket VALUE
+=head2 SetObjectType VALUE

 
 
 
 

-Set EffectiveTicket to VALUE. 
+Set ObjectType to VALUE. 

 Returns (1, 'Status message') on success and (0, 'Error Message') on failure.
 Returns (1, 'Status message') on success and (0, 'Error Message') on failure.

-(In the database, EffectiveTicket will be stored as a int(11).)
+(In the database, ObjectType will be stored as a varchar(64).)

 
 
 =cut
 
 
 
 
 =cut
 
 

-=head2 Ticket
+=head2 ObjectId

 
 

-Returns the current value of Ticket. 
-(In the database, Ticket is stored as int(11).)
+Returns the current value of ObjectId. 
+(In the database, ObjectId is stored as int(11).)

 
 
 
 
 
 

-=head2 SetTicket VALUE
+=head2 SetObjectId VALUE

 
 
 
 

-Set Ticket to VALUE. 
+Set ObjectId to VALUE. 

 Returns (1, 'Status message') on success and (0, 'Error Message') on failure.
 Returns (1, 'Status message') on success and (0, 'Error Message') on failure.

-(In the database, Ticket will be stored as a int(11).)
+(In the database, ObjectId will be stored as a int(11).)

 
 
 =cut
 
 
 
 
 =cut
 
 

-=head2 TicketObj
-
-Returns the Ticket Object which has the id returned by Ticket
-
-
-=cut
-
-sub TicketObj {
-       my $self = shift;
-       my $Ticket =  RT::Ticket->new($self->CurrentUser);
-       $Ticket->Load($self->__Value('Ticket'));
-       return($Ticket);
-}
-

 =head2 TimeTaken
 
 Returns the current value of TimeTaken. 
 =head2 TimeTaken
 
 Returns the current value of TimeTaken. 


@@ -279,6 +273,60 @@ Returns (1, 'Status message') on success and (0, 'Error Message') on failure.
 =cut
 
 
 =cut
 
 

+=head2 ReferenceType
+
+Returns the current value of ReferenceType. 
+(In the database, ReferenceType is stored as varchar(255).)
+
+
+
+=head2 SetReferenceType VALUE
+
+
+Set ReferenceType to VALUE. 
+Returns (1, 'Status message') on success and (0, 'Error Message') on failure.
+(In the database, ReferenceType will be stored as a varchar(255).)
+
+
+=cut
+
+
+=head2 OldReference
+
+Returns the current value of OldReference. 
+(In the database, OldReference is stored as int(11).)
+
+
+
+=head2 SetOldReference VALUE
+
+
+Set OldReference to VALUE. 
+Returns (1, 'Status message') on success and (0, 'Error Message') on failure.
+(In the database, OldReference will be stored as a int(11).)
+
+
+=cut
+
+
+=head2 NewReference
+
+Returns the current value of NewReference. 
+(In the database, NewReference is stored as int(11).)
+
+
+
+=head2 SetNewReference VALUE
+
+
+Set NewReference to VALUE. 
+Returns (1, 'Status message') on success and (0, 'Error Message') on failure.
+(In the database, NewReference will be stored as a int(11).)
+
+
+=cut
+
+

 =head2 Data
 
 Returns the current value of Data. 
 =head2 Data
 
 Returns the current value of Data. 


@@ -320,27 +368,33 @@ sub _CoreAccessible {
     {
      
         id =>
     {
      
         id =>

-               {read => 1, type => 'int(11)', default => ''},
-        EffectiveTicket => 
-               {read => 1, write => 1, type => 'int(11)', default => '0'},
-        Ticket => 
-               {read => 1, write => 1, type => 'int(11)', default => '0'},
+               {read => 1, sql_type => 4, length => 11,  is_blob => 0,  is_numeric => 1,  type => 'int(11)', default => ''},
+        ObjectType => 
+               {read => 1, write => 1, sql_type => 12, length => 64,  is_blob => 0,  is_numeric => 0,  type => 'varchar(64)', default => ''},
+        ObjectId => 
+               {read => 1, write => 1, sql_type => 4, length => 11,  is_blob => 0,  is_numeric => 1,  type => 'int(11)', default => '0'},

         TimeTaken => 
         TimeTaken => 

-               {read => 1, write => 1, type => 'int(11)', default => '0'},
+               {read => 1, write => 1, sql_type => 4, length => 11,  is_blob => 0,  is_numeric => 1,  type => 'int(11)', default => '0'},

         Type => 
         Type => 

-               {read => 1, write => 1, type => 'varchar(20)', default => ''},
+               {read => 1, write => 1, sql_type => 12, length => 20,  is_blob => 0,  is_numeric => 0,  type => 'varchar(20)', default => ''},

         Field => 
         Field => 

-               {read => 1, write => 1, type => 'varchar(40)', default => ''},
+               {read => 1, write => 1, sql_type => 12, length => 40,  is_blob => 0,  is_numeric => 0,  type => 'varchar(40)', default => ''},

         OldValue => 
         OldValue => 

-               {read => 1, write => 1, type => 'varchar(255)', default => ''},
+               {read => 1, write => 1, sql_type => 12, length => 255,  is_blob => 0,  is_numeric => 0,  type => 'varchar(255)', default => ''},

         NewValue => 
         NewValue => 

-               {read => 1, write => 1, type => 'varchar(255)', default => ''},
+               {read => 1, write => 1, sql_type => 12, length => 255,  is_blob => 0,  is_numeric => 0,  type => 'varchar(255)', default => ''},
+        ReferenceType => 
+               {read => 1, write => 1, sql_type => 12, length => 255,  is_blob => 0,  is_numeric => 0,  type => 'varchar(255)', default => ''},
+        OldReference => 
+               {read => 1, write => 1, sql_type => 4, length => 11,  is_blob => 0,  is_numeric => 1,  type => 'int(11)', default => ''},
+        NewReference => 
+               {read => 1, write => 1, sql_type => 4, length => 11,  is_blob => 0,  is_numeric => 1,  type => 'int(11)', default => ''},

         Data => 
         Data => 

-               {read => 1, write => 1, type => 'varchar(255)', default => ''},
+               {read => 1, write => 1, sql_type => 12, length => 255,  is_blob => 0,  is_numeric => 0,  type => 'varchar(255)', default => ''},

         Creator => 
         Creator => 

-               {read => 1, auto => 1, type => 'int(11)', default => '0'},
+               {read => 1, auto => 1, sql_type => 4, length => 11,  is_blob => 0,  is_numeric => 1,  type => 'int(11)', default => '0'},

         Created => 
         Created => 

-               {read => 1, auto => 1, type => 'datetime', default => ''},
+               {read => 1, auto => 1, sql_type => 11, length => 0,  is_blob => 0,  is_numeric => 0,  type => 'datetime', default => ''},

 
  }
 };
 
  }
 };


@@ -372,7 +426,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.
 
 
 These overlay files can contain new subs or subs to replace existing subs in this module.
 

-If you'll be working with perl 5.6.0 or greater, each of these files should begin with the line 
+Each of these files should begin with the line 

 
    no warnings qw(redefine);
 
 
    no warnings qw(redefine);