% while ( my $KeywordSelect = $KeywordSelects->Next ) { % }

<% $KeywordSelect->Name %>

% my $Keywords = $Ticket->KeywordsObj($KeywordSelect->Id); % while (my $Keyword = $Keywords->Next) { <% $Keyword->KeywordObj->RelativePath($KeywordSelect->KeywordObj) |n %> % }

<%INIT> my $KeywordSelects = $Ticket->QueueObj->KeywordSelects; <%ARGS> $Ticket => undef