rt/webrt/Ticket/Elements/ShowLinks

   1 Depends on:<BR>
   2 <UL>
   3 % while (my $Link = $Ticket->DependsOn->Next) {
   4 % my $member = $Link->TargetObj;
   5 <LI><a href="<%$RT::WebPath%>/Ticket/Display.html?id=<%$member->Id%>"><%$member->Id%></a>: (<%$member->OwnerObj->Name%>) <%$member->Subject%>
   6 [<%$member->Status%>]
   7
   8 % }
   9 </UL>
  10
  11 Depended on by:<BR>
  12 <UL>
  13 % while (my $Link = $Ticket->DependedOnBy->Next) {
  14 % my $member = $Link->BaseObj;
  15 <LI><a href="<%$RT::WebPath%>/Ticket/Display.html?id=<%$member->Id%>"><%$member->Id%></a>: (<%$member->OwnerObj->Name%>) <%$member->Subject%>
  16 [<%$member->Status%>]
  17 % }
  18 </UL>
  19 Parents:<BR>
  20 <UL>
  21 % while (my $Link = $Ticket->MemberOf->Next) {
  22 % my $member = $Link->TargetObj;
  23 <LI><a href="<%$RT::WebPath%>/Ticket/Display.html?id=<%$member->Id%>"><%$member->Id%></a>: (<%$member->OwnerObj->Name%>) <%$member->Subject%>
  24 [<%$member->Status%>]
  25
  26 % }
  27 </UL>
  28
  29 Children:<BR>
  30 <& /Ticket/Elements/ShowMembers, Ticket => $Ticket &>
  31 <BR>
  32 Refers to:<BR>
  33 <UL>
  34 % while (my $Link = $Ticket->RefersTo->Next) {
  35 <LI>
  36 % if ($Link->TargetIsLocal) {
  37 % my $member = $Link->TargetObj;
  38
  39 <a href="<%$RT::WebPath%>/Ticket/Display.html?id=<%$member->Id%>"><%$member->Id%></a>: (<%$member->OwnerObj->Name%>) <%$member->Subject%> [<%$member->Status%>]<br>
  40 % } else {
  41 <A HREF="<%$Link->TargetAsHREF%>"><%$Link->Target%></A>
  42 % }
  43 %}
  44 </UL>
  45
  46 Referred to by:<BR>
  47 <UL>
  48 % while (my $Link = $Ticket->ReferredToBy->Next) {
  49 <LI>
  50 % if ($Link->BaseIsLocal) {
  51 % my $member = $Link->BaseObj;
  52 <a href="<%$RT::WebPath%>/Ticket/Display.html?id=<%$member->Id%>"><%$member->Id%></a>: (<%$member->OwnerObj->Name%>) <%$member->Subject%> [<%$member->Status%>]<br>
  53 % } else {
  54 <A HREF="<%$Link->BaseAsHREF%>"><%$Link->Base%></A>
  55 %}
  56 % }
  57 </UL>
  58
  59 <%ARGS>
  60 $Ticket => undef
  61 </%ARGS>