This commit was generated by cvs2svn to compensate for changes in r4407,

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

diff --git a/rt/lib/RT/CustomField.pm b/rt/lib/RT/CustomField.pm
index be05c30..212e594 100644 (file)
--- a/rt/lib/RT/CustomField.pm
+++ b/rt/lib/RT/CustomField.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::CustomField
 
 package RT::CustomField;
 use RT::Record; 
 
 package RT::CustomField;
 use RT::Record; 

-use RT::Queue;

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


@@ -90,11 +89,17 @@ Create takes a hash of values and creates a row in the database:
 
   varchar(200) 'Name'.
   varchar(200) 'Type'.
 
   varchar(200) 'Name'.
   varchar(200) 'Type'.

-  int(11) 'Queue'.
+  int(11) 'MaxValues'.
+  varchar(255) 'Pattern'.
+  smallint(6) 'Repeated'.

   varchar(255) 'Description'.
   int(11) 'SortOrder'.
   varchar(255) 'Description'.
   int(11) 'SortOrder'.

+  varchar(255) 'LookupType'.

   smallint(6) 'Disabled'.
 
   smallint(6) 'Disabled'.
 

+  'LookupType' is generally the result of either 
+  RT::Ticket->CustomFieldLookupType or RT::Transaction->CustomFieldLookupType
+

 =cut
 
 
 =cut
 
 


@@ -105,18 +110,24 @@ sub Create {
     my %args = ( 
                 Name => '',
                 Type => '',
     my %args = ( 
                 Name => '',
                 Type => '',

-                Queue => '0',
+                MaxValues => '',
+                Pattern => '',
+                Repeated => '0',

                 Description => '',
                 SortOrder => '0',
                 Description => '',
                 SortOrder => '0',

+                LookupType => '',

                 Disabled => '0',
 
                  @_);
     $self->SUPER::Create(
                          Name => $args{'Name'},
                          Type => $args{'Type'},
                 Disabled => '0',
 
                  @_);
     $self->SUPER::Create(
                          Name => $args{'Name'},
                          Type => $args{'Type'},

-                         Queue => $args{'Queue'},
+                         MaxValues => $args{'MaxValues'},
+                         Pattern => $args{'Pattern'},
+                         Repeated => $args{'Repeated'},

                          Description => $args{'Description'},
                          SortOrder => $args{'SortOrder'},
                          Description => $args{'Description'},
                          SortOrder => $args{'SortOrder'},

+                         LookupType => $args{'LookupType'},

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


@@ -169,37 +180,59 @@ Returns (1, 'Status message') on success and (0, 'Error Message') on failure.
 =cut
 
 
 =cut
 
 

-=head2 Queue
+=head2 MaxValues

 
 

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

 
 
 
 
 
 

-=head2 SetQueue VALUE
+=head2 SetMaxValues VALUE

 
 
 
 

-Set Queue to VALUE. 
+Set MaxValues 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, Queue will be stored as a int(11).)
+(In the database, MaxValues will be stored as a int(11).)

 
 
 =cut
 
 
 
 
 =cut
 
 

-=head2 QueueObj
+=head2 Pattern
+
+Returns the current value of Pattern. 
+(In the database, Pattern is stored as varchar(255).)
+
+

 
 

-Returns the Queue Object which has the id returned by Queue
+=head2 SetPattern VALUE
+
+
+Set Pattern to VALUE. 
+Returns (1, 'Status message') on success and (0, 'Error Message') on failure.
+(In the database, Pattern will be stored as a varchar(255).)
+
+
+=cut
+
+
+=head2 Repeated
+
+Returns the current value of Repeated. 
+(In the database, Repeated is stored as smallint(6).)
+
+
+
+=head2 SetRepeated VALUE
+
+
+Set Repeated to VALUE. 
+Returns (1, 'Status message') on success and (0, 'Error Message') on failure.
+(In the database, Repeated will be stored as a smallint(6).)

 
 
 =cut
 
 
 
 =cut
 

-sub QueueObj {
-       my $self = shift;
-       my $Queue =  RT::Queue->new($self->CurrentUser);
-       $Queue->Load($self->__Value('Queue'));
-       return($Queue);
-}

 
 =head2 Description
 
 
 =head2 Description
 


@@ -237,6 +270,24 @@ Returns (1, 'Status message') on success and (0, 'Error Message') on failure.
 =cut
 
 
 =cut
 
 

+=head2 LookupType
+
+Returns the current value of LookupType. 
+(In the database, LookupType is stored as varchar(255).)
+
+
+
+=head2 SetLookupType VALUE
+
+
+Set LookupType to VALUE. 
+Returns (1, 'Status message') on success and (0, 'Error Message') on failure.
+(In the database, LookupType will be stored as a varchar(255).)
+
+
+=cut
+
+

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


@@ -296,27 +347,33 @@ sub _CoreAccessible {
     {
      
         id =>
     {
      
         id =>

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

         Name => 
         Name => 

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

         Type => 
         Type => 

-               {read => 1, write => 1, type => 'varchar(200)', default => ''},
-        Queue => 
-               {read => 1, write => 1, type => 'int(11)', default => '0'},
+               {read => 1, write => 1, sql_type => 12, length => 200,  is_blob => 0,  is_numeric => 0,  type => 'varchar(200)', default => ''},
+        MaxValues => 
+               {read => 1, write => 1, sql_type => 4, length => 11,  is_blob => 0,  is_numeric => 1,  type => 'int(11)', default => ''},
+        Pattern => 
+               {read => 1, write => 1, sql_type => 12, length => 255,  is_blob => 0,  is_numeric => 0,  type => 'varchar(255)', default => ''},
+        Repeated => 
+               {read => 1, write => 1, sql_type => 5, length => 6,  is_blob => 0,  is_numeric => 1,  type => 'smallint(6)', default => '0'},

         Description => 
         Description => 

-               {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 => ''},

         SortOrder => 
         SortOrder => 

-               {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'},
+        LookupType => 
+               {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 => ''},

         LastUpdatedBy => 
         LastUpdatedBy => 

-               {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'},

         LastUpdated => 
         LastUpdated => 

-               {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 => ''},

         Disabled => 
         Disabled => 

-               {read => 1, write => 1, type => 'smallint(6)', default => '0'},
+               {read => 1, write => 1, sql_type => 5, length => 6,  is_blob => 0,  is_numeric => 1,  type => 'smallint(6)', default => '0'},

 
  }
 };
 
  }
 };


@@ -348,7 +405,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);