Lines Matching refs:record
135 for my $record ($serialized->{$key}, $serialized->{$key}->{primary_record}) {
136 next if !$record;
142 …$record->{$column . '_highlighted'} = $self->HighlightTextForSearch($record->{$column}, $args->{$k…
148 $record->{'highlight'} = $record->{primary_record} ? 0 : 1;
150 $record->{$column . '_highlighted'} = _EscapeHTML($record->{$column});
201 my $record;
204 $record = RT::Ticket->new($self->CurrentUser);
207 $record = RT::Queue->new($self->CurrentUser);
210 $record = RT::Asset->new($self->CurrentUser);
213 $record = RT::Catalog->new($self->CurrentUser);
216 $record = RT::Article->new($self->CurrentUser);
219 $record = RT::Class->new($self->CurrentUser);
222 $record = RT::CustomField->new($self->CurrentUser);
232 $record->Load($identifier);
233 return $record if $record->Id;
234 my $class = ref($record); $class =~ s/^RT:://;
400 my ($record, $msg) = $self->ObjectForSpec($type, $identifier);
401 if (!$record) {
408 $primary_records{object} = $record;
410 for my $obj ($record, $record->ACLEquivalenceObjects, RT->System) {
565 my $record = $serialized->{$key};
566 next ACE if $record->{class} =~ $re
567 || $record->{id} =~ $re
568 || $record->{label} =~ $re
569 || $record->{detail} =~ $re;
580 my $record = $serialized->{$key};
584 next KEY if $record->{class} =~ $re
585 || $record->{id} =~ $re
586 || $record->{label} =~ $re
587 || $record->{detail} =~ $re;
656 my $record = shift;
658 return undef unless $record;
660 if ($record->isa('RT::Principal')) {
661 $record = $record->Object;
664 if ($record->isa('RT::Group')) {
665 if ($record->Domain eq 'ACLEquivalence') {
666 my $principal = RT::Principal->new($record->CurrentUser);
667 $principal->Load($record->Instance);
668 $record = $principal->Object;
670 elsif ($record->Domain =~ /-Role$/) {
671 my ($id) = $record->Name =~ /^RT::CustomRole-(\d+)$/;
673 my $role = RT::CustomRole->new($record->CurrentUser);
675 $record = $role;
680 return $record;
687 my $record = shift;
690 return undef unless $record;
692 $record = $self->CanonicalizeRecord($record);
696 && ref($record) eq ref($primary_record)
697 && $record->Id == $primary_record->Id;
700 class => ref($record),
701 id => $record->id,
702 label => $self->LabelForRecord($record),
703 detail => $self->DetailForRecord($record),
704 url => $self->URLForRecord($record),
705 disabled => $self->DisabledForRecord($record) ? JSON::true : JSON::false,
766 my $record = shift;
768 if ($record->isa('RT::Ticket')) {
769 return $record->Subject || $self->CurrentUser->loc('(No subject)');
772 return $record->Name || $self->CurrentUser->loc('(No name)');
778 my $record = shift;
780 if ($record->can('Disabled') || $record->_Accessible('Disabled', 'read')) {
781 return $record->Disabled;
790 my $record = shift;
792 my $id = $record->Id;
794 return 'Global System' if $record->isa('RT::System');
796 return 'System User' if $record->isa('RT::User')
800 if ($record->isa('RT::Group')) {
801 if ($record->RoleClass) {
802 my $class = $record->RoleClass;
806 elsif ($record->Domain eq 'SystemInternal') {
811 my $type = ref($record);
821 my $record = shift;
822 my $id = $record->id;
824 if ($record->isa('RT::Queue')) {
827 elsif ($record->isa('RT::User')) {
833 elsif ($record->isa('RT::Group')) {
834 if ($record->Domain eq 'UserDefined') {
837 elsif ($record->Domain eq 'RT::System-Role') {
840 elsif ($record->Domain eq 'RT::Queue-Role') {
841 …return RT->Config->Get('WebURL') . 'Admin/Queues/GroupRights.html?id=' . $record->Instance . '#acl…
843 elsif ($record->Domain eq 'RT::Catalog-Role') {
844 …>Config->Get('WebURL') . 'Admin/Assets/Catalogs/GroupRights.html?id=' . $record->Instance . '#acl-…
850 elsif ($record->isa('RT::CustomField')) {
853 elsif ($record->isa('RT::Class')) {
856 elsif ($record->isa('RT::Catalog')) {
859 elsif ($record->isa('RT::CustomRole')) {
862 elsif ($record->isa('RT::Ticket')) {
865 elsif ($record->isa('RT::Asset')) {
868 elsif ($record->isa('RT::Article')) {