Open-ILS/src/perlmods/OpenILS/Application/Storage/CDBI/actor.pm

   1 package OpenILS::Application::Storage::CDBI::actor;
   2 our $VERSION = 1;
   3
   4 #-------------------------------------------------------------------------------
   5 package actor;
   6 use base qw/OpenILS::Application::Storage::CDBI/;
   7 #-------------------------------------------------------------------------------
   8 package actor::user;
   9 use base qw/actor/;
  10
  11 __PACKAGE__->table( 'actor_usr' );
  12 __PACKAGE__->columns( Primary => qw/id/ );
  13 __PACKAGE__->columns( Others => qw/id usrid usrname email prefix first_given_name
  14                                 second_given_name family_name suffix address
  15                                 home_ou gender dob active master_account
  16                                 super_user usrgroup passwd last_xact_id/ );
  17
  18 #-------------------------------------------------------------------------------
  19 package actor::org_unit_type;
  20 use base qw/actor/;
  21
  22 __PACKAGE__->table( 'actor_org_unit_type' );
  23 __PACKAGE__->columns( Primary => qw/id/);
  24 __PACKAGE__->columns( Others => qw/name depth parent can_have_users/);
  25
  26 #-------------------------------------------------------------------------------
  27 package actor::org_unit;
  28 use base qw/actor/;
  29
  30 __PACKAGE__->table( 'actor_org_unit' );
  31 __PACKAGE__->columns( Primary => qw/id/);
  32 __PACKAGE__->columns( Others => qw/parent_ou ou_type address shortname name/);
  33
  34 #-------------------------------------------------------------------------------
  35 package actor::user_access_entry;
  36 use base qw/actor/;
  37 #-------------------------------------------------------------------------------
  38 package actor::perm_group;
  39 use base qw/actor/;
  40 #-------------------------------------------------------------------------------
  41 package actor::permission;
  42 use base qw/actor/;
  43 #-------------------------------------------------------------------------------
  44 package actor::perm_group_permission_map;
  45 use base qw/actor/;
  46 #-------------------------------------------------------------------------------
  47 package actor::perm_group_user_map;
  48 use base qw/actor/;
  49 #-------------------------------------------------------------------------------
  50 package actor::user_address;
  51 use base qw/actor/;
  52 #-------------------------------------------------------------------------------
  53 1;
  54