From 3ef62a0570055da710328937e7f65dbb2c027c62 Mon Sep 17 00:00:00 2001 From: ivan Date: Mon, 12 Aug 2002 06:17:09 +0000 Subject: import rt 2.0.14 --- rt/webrt/Ticket/Elements/EditLinks | 109 +++++++++++++++++++++++++++++++++++++ 1 file changed, 109 insertions(+) create mode 100755 rt/webrt/Ticket/Elements/EditLinks (limited to 'rt/webrt/Ticket/Elements/EditLinks') diff --git a/rt/webrt/Ticket/Elements/EditLinks b/rt/webrt/Ticket/Elements/EditLinks new file mode 100755 index 000000000..b0296fce1 --- /dev/null +++ b/rt/webrt/Ticket/Elements/EditLinks @@ -0,0 +1,109 @@ +%# $Header: /home/cvs/cvsroot/freeside/rt/webrt/Ticket/Elements/Attic/EditLinks,v 1.1 2002-08-12 06:17:09 ivan Exp $ +%# Copyright 1996-2000 Jesse Vincent + + + + + + + +
+

New Relationships

+Enter tickets or URIs to link tickets to. Seperate multiple entries with spaces.
+ + + + + + + + +
Merge into: (only one ticket)
Depends on:
Depended on by:
Parents:
Children:
Refers to:
Referred to by:
+
+

Current Relationships

+(Check boxes to delete)
+ +Depends on:
+
    +% while (my $link = $Ticket->DependsOn->Next) { +% my $member = $link->TargetObj; +
  • + +<%$member->Id%>: (<%$member->OwnerObj->Name%>) <%$member->Subject%> +[<%$member->Status%>] + +% } +
+ +Depended on by:
+
    +% while (my $link = $Ticket->DependedOnBy->Next) { +% my $member = $link->BaseObj; +
  • + +<%$member->Id%>: (<%$member->OwnerObj->Name%>) <%$member->Subject%> +[<%$member->Status%>] +% } +
+ +Parents:
+
    +% while (my $link = $Ticket->MemberOf->Next) { +% my $member = $link->TargetObj; +
  • + +<%$member->Id%>: (<%$member->OwnerObj->Name%>) <%$member->Subject%> +[<%$member->Status%>] + +% } +
+ +Children:
+
    +% while (my $link = $Ticket->Members->Next) { +
  • + +% my $member = $link->BaseObj; +<%$member->Id%>: (<%$member->OwnerObj->Name%>) <%$member->Subject%> +[<%$member->Status%>] +% } +
+ + +Refers to:
+
    +% while (my $link = $Ticket->RefersTo->Next) { +
  • + +% if ($link->TargetIsLocal) { +% my $member = $link->TargetObj; + +<%$member->Id%>: (<%$member->OwnerObj->Name%>) <%$member->Subject%> [<%$member->Status%>]
    +% } else { +<%$link->Target%> +% } +%} +
+ +Referred to by:
+
    +% while (my $link = $Ticket->ReferredToBy->Next) { +
  • + +% if ($link->BaseIsLocal) { +% my $member = $link->BaseObj; +<%$member->Id%>: (<%$member->OwnerObj->Name%>) <%$member->Subject%> [<%$member->Status%>]
    +% } else { +<%$link->Base%> +%} +% } +
+ + +
+ + + +<%ARGS> +$Ticket => undef + -- cgit v1.2.1