.
.
.
each.Keywords.Contains(keys)}.Select{each | each.HasProperty("ParentThread")}.IfNotNullElse({namespace.Topics.Select{each | each.Keywords.Contains(keys)}
.
.Select{each | each.HasProperty("ParentThread")}.SortBy{each | each.GetProperty("ParentThread")}},{""})
.
.
each.Keywords.Contains(keys)}.Select {each | each.GetProperty("Depth").Equals("0")}
.
.
.
each.Keywords.Contains(keys)}.Select { each | each.GetProperty("Depth").Equals("0")}
.
.
each.Keywords.Contains(keys)}.Select { each | each.HasProperty("Depth")}.Count
.
.
.GreaterThan(1).IfTrueIfFalse({namespace.TopicsWith("Keywords", keys).Select
.
{each | each.GetProperty("Depth").Equals("0")}.SortBy { each | each.Name }.Item(0).Created.LocalFormat},{""})
.
.
.GreaterThan(1).IfTrueIfFalse({namespace.TopicsWith("Keywords", keys).Select
.
{each | each.HasProperty("Depth")}.SortBy { each | DateTime.Now.SpanBetween(each.Created)}.Item(0).Created.LocalFormat}, {""})
.
[ Presentations.ContainerStart("div", "InfoBoxProgrammer"),
.
Presentations.ContainerStart("span", "InfoBoxHdr"), "Top Level Threads: ", Presentations.ContainerEnd("span"), " ",
.
Presentations.ContainerStart("span", "InfoBoxValue"), GetTopLevelNumber(topic.Keywords), Presentations.ContainerEnd("span"), Newline,
.
Presentations.ContainerStart("span", "InfoBoxHdr"), "Total Threads: ", Presentations.ContainerEnd("span"), " ",
.
Presentations.ContainerStart("span", "InfoBoxList"), GetTotalNumberThreads(topic.Keywords), Presentations.ContainerEnd("span"), Newline,
.
Presentations.ContainerStart("span", "InfoBoxHdr"), "Original Thread Created: ", Presentations.ContainerEnd("span"), Newline,
.
Presentations.ContainerStart("span", "InfoBoxList"), OriginalThreadDate(topic.Keywords), Presentations.ContainerEnd("span"), Newline,
.
Presentations.ContainerStart("span", "InfoBoxHdr"), "Latest Thread Created: ", Presentations.ContainerEnd("span"), Newline,
.
Presentations.ContainerStart("span", "InfoBoxValue"), LatestThreadDate(topic.Keywords), Presentations.ContainerEnd("span"),
.
Presentations.ContainerEnd("div"), Newline,
.[["@@Presentations.ContainerStart(\"div\",", "\, entry.Name, "\",", "\,
.
["Depth0","Depth1","Depth2","Depth3","Depth4","Depth5", "Depth6","Depth7"].Item(entry.GetProperty("Depth").AsInteger), "\")@@"].ToOneString, Newline,
."!!!!", entry.GetProperty("Title"), Newline, ControlView(entry.GetProperty("ParentThread")), " ", " ", " ",
.["Erstellung.ForumLibrary(1:30) : Unexpected token: TokenOther"].ToOneString, Newline,
.entry.GetProperty("_Body"), Newline,
.["@@Presentations.Link(federation.LinkMaker.SimpleLinkTo(\"MessagePost.aspx?topic=", namespace.Name, ".",
.
entry.GetProperty("Keywords"), "&forumKey=", entry.GetProperty("Keywords"), "&parentThread="
.,entry.GetProperty("ParentThread"),"&title=",entry.GetProperty("Title"),"\"),\"Reply To This\")@@"].ToOneString, Newline,
.["Erstellung.ForumLibrary(1:28) : Unexpected token: TokenOther"], ["Erstellung.ForumLibrary(1:28) : Unexpected token: TokenOther"], Newline,
.
.
[ "||", entry.GetProperty("Title"), "||", CountReplies(entry.GetProperty("ParentThread")), "||",
.
entry.LastModifiedBy, "||", GetLatestEntryInThreadInfo(entry.GetProperty("ParentThread")), "||", Newline
.
[["@@Presentations.Link(\"javascript:ToggleDisplay('", id, "')\",", "\"Hide Thread\",", "\"Toggle Thread View\",", "\"id=\\\"Link_", id, "\\\"\")@@",].ToOneString,]
.
.
namespace.TopicsWith("ParentThread", parentThread).Count.Subtract(1)
.
.
selected.IfNull{ FormatSelectionHelper("Linear")}
.
Else{ FormatSelectionHelper(selected)}
.
.
[Presentations.FormStart(federation.LinkMaker.LinkToTopic(topic.Fullname), "get"), "Forum view: ",
.
Presentations.ComboSelectField("format", ["Threaded", "Linear", "Single", "Branch"], selected), " ",
.
Presentations.ImageButton("submit", federation.LinkMaker.LinkToImage("images/go-dark.gif"), "Change Format"),
.
Presentations.FormEnd()]
.
{selected.Equals("Top Level").IfTrueIfFalse({ShowTopLevel},
.
GetTotalNumberThreads(topic.Keywords).GreaterThan(10).IfTrueIfFalse({ShowLinearPaged("Linear", request.GetParameterNamed("page"))},
.
{ShowLinearUnpaged("Linear")})
.
[Presentations.ContainerStart("div", "entryTitleList"),
.
GetNodes(topic.Keywords).Collect{ each |
.
ShowThreadedTitle(each)}, Presentations.ContainerEnd("div"), ShowLinearUnpaged("Threaded")]
.
[Presentations.ContainerStart("div", "entryTitleList"),
.
GetNodes(topic.Keywords).Collect{ each |
.
ShowSingleTitle("Single", each)}, Presentations.ContainerEnd("div"),
.
request.GetParameterNamed("entry").IfNotNull{ShowSinglePost(request.GetParameterNamed("entry"))}Else{""}]
.
[Presentations.ContainerStart("div", "entryTitleList"),
.
GetNodes(topic.Keywords).Collect{ each |
.
ShowSingleTitle("Branch", each)}, Presentations.ContainerEnd("div"),
.
request.GetParameterNamed("entry").IfNotNull{ShowBranchPosts(request.GetParameterNamed("entry"))}Else{""}]
.
.
[Presentations.ContainerStart("div", "entryList"), Presentations.ContainerStart("div", "entryHdr"),
.
Presentations.ContainerStart("div", "entryCol1Hdr"), "Author", Presentations.ContainerEnd("div"),
.
Presentations.ContainerStart("div", "entryCol2Hdr"), "Message Post", Presentations.ContainerEnd("div"),
.
Presentations.ContainerEnd("div"), Newline,
.
GetNodes(topic.Keywords).Collect{ each |
.
ShowNode(each)}, Presentations.ContainerEnd("div")]
.
.
[Presentations.ContainerStart("div", "entryList"), Presentations.ContainerStart("div", "entryHdr"),
.
Presentations.ContainerStart("div", "entryCol1Hdr"), "Author", Presentations.ContainerEnd("div"),
.
Presentations.ContainerStart("div", "entryCol2Hdr"), "Message Post", Presentations.ContainerEnd("div"),
.
Presentations.ContainerEnd("div"), Newline,
.
page.IfNotNull{GetPagedNodes(format, page.AsInteger, topic.Keywords)}Else {GetPagedNodes(format, 0, topic.Keywords)},
.
Presentations.ContainerEnd("div")]
.
.
GetNodes(key).Count.GreaterThanOrEqualTo(page.Multiply(10).Add(10)).
.
IfFalseIfTrue({[GetNodes(key).Snip(GetNodes(key).Count.Subtract(page.Multiply(10))).Collect{ each |
.
ShowNode(each)}, ShowLastPageLinks(format)]},{[[GetNodes(key).Item(page.Multiply(10)),
.
GetNodes(key).Item(page.Multiply(10).Add(1)), GetNodes(key).Item(page.Multiply(10).Add(2)),
.
GetNodes(key).Item(page.Multiply(10).Add(3)), GetNodes(key).Item(page.Multiply(10).Add(4)),
.
GetNodes(key).Item(page.Multiply(10).Add(5)), GetNodes(key).Item(page.Multiply(10).Add(6)),
.
GetNodes(key).Item(page.Multiply(10).Add(7)), GetNodes(key).Item(page.Multiply(10).Add(8)),
.
GetNodes(key).Item(page.Multiply(10).Add(9))].Collect{each | ShowNode(each)}, page.Equals(0)
.
.IfTrueIfFalse({ShowFirstPageLinks(format)},{ShowPageLinks(format, page)}),]})
.
.
[Newline, " ", Newline, namespace.TopicsWith("ParentThread").Select{each | each.GetProperty("ParentThread").Contains(entry)}
.
.
[Newline, " ", Newline, ShowNode(namespace.TopicsWith("ParentThread", entry).Item(0))]
.
[Presentations.ContainerStart("div", "entryDetail"), Presentations.ContainerStart("div", "entryCol1"),
.
entry.LastModifiedBy, Newline, "Total Posts: ", CountPosts(entry.LastModifiedBy, topic.Keywords), Newline,
.
Presentations.ContainerEnd("div"), Presentations.ContainerStart("div", "entryCol2"),
.
Presentations.ContainerStart("span", "postDateTime"), entry.LastModified.LocalFormat, Presentations.ContainerEnd("span"),
.
Presentations.ContainerStart("div", "replyLink"),
.
["@@Presentations.Link(federation.LinkMaker.SimpleLinkTo(\"MessagePost.aspx?topic=", namespace.Name, ".",
.
entry.GetProperty("Keywords"), "&forumKey=", entry.GetProperty("Keywords"), "&parentThread=",entry.GetProperty("ParentThread"),
.
"&title=",entry.GetProperty("Title"),"\"),\"Reply To This\")@@"].ToOneString,
.
Presentations.ContainerEnd("div"),
.
Presentations.ContainerStart("div", "messageDetail"), Presentations.ContainerStart("div", "messageTitle"),
.
Newline, "!!!!", entry.GetProperty("Title"), Newline,
.
Presentations.ContainerEnd("div"), Newline,
.
entry.GetProperty("_Body"),
.
Presentations.ContainerEnd("div"), Newline,
.
Presentations.ContainerStart("div", "printerLink"),
.
Presentations.Link(federation.LinkMaker.LinkToPrintView(entry.Fullname), "Print Message", "Print Message"),
.
Presentations.ContainerEnd("div"), Presentations.ContainerEnd("div"),Presentations.ContainerEnd("div"), Newline, ]
.
[["@@Presentations.ContainerStart(\"div\",", "\"", entry.Name, "\",", "\"",
.
["Depth0","Depth1","Depth2","Depth3","Depth4","Depth5", "Depth6","Depth7"].Item(entry.GetProperty("Depth").AsInteger), "\")@@"].ToOneString, Newline, Presentations.Link(["#", entry.GetProperty("Title")].ToOneString, entry.GetProperty("Title")), " - ",
.
Presentations.ContainerEnd("div"), ]
.
[["@@Presentations.ContainerStart(\"div\",", "\"", entry.Name, "\",", "\"",
.
["Depth0","Depth1","Depth2","Depth3","Depth4","Depth5", "Depth6","Depth7"].
.
Item(entry.GetProperty("Depth").AsInteger), "\")@@"].ToOneString, Newline,
.
Presentations.Link(federation.LinkMaker.SimpleLinkTo(
.
["default.aspx/", namespace.Name, "/", topic.Name, ".html?format=", format, "&entry=",
.
entry.GetProperty("ParentThread")].ToOneString), entry.GetProperty("Title")), " - ",
.
Presentations.ContainerEnd("div"), ]
.
.
namespace.Topics.Select{ each |
.
each.HasProperty("Depth")}.Count
.
.
[Newline, Presentations.ContainerStart("div", "pageLinks"),
.
CreatePageLink(format, 1, "Next Page"), " ",
.
GetTotalNumberThreads(topic.Keywords).Divide(10).GreaterThan(1).IfFalseIfTrue({""},{
.
CreatePageLink(format, GetTotalNumberThreads(topic.Keywords).Divide(10), "Last Page")}),
.
Presentations.ContainerEnd("div")]
.
.
[Newline, Presentations.ContainerStart("div", "pageLinks"),
.
CreatePageLink(format, 0, "First Page"), " ",
.
GetTotalNumberThreads(topic.Keywords).Divide(10).GreaterThan(1).IfFalseIfTrue({""},{
.
CreatePageLink(format, GetTotalNumberThreads(topic.Keywords).Divide(10).Subtract(1), "Prev Page")}),
.
Presentations.ContainerEnd("div")]
.
.
[Newline, Presentations.ContainerStart("div", "pageLinks"),
.
page.GreaterThan(0).IfFalseIfTrue({""},{[CreatePageLink(format, 0, "First Page"), " ",]}),
.
page.GreaterThan(1).IfFalseIfTrue({""},{[CreatePageLink(format, page.Subtract(1), "Prev Page"), " ",]}),
.
page.LessThan(GetTotalNumberThreads(topic.Keywords).Divide(10).Subtract(1)).IfFalseIfTrue({""},{
.
[CreatePageLink(format, page.Add(1), "Next Page"), " ",]}),
.
page.LessThan(GetTotalNumberThreads(topic.Keywords).Divide(10)).IfFalseIfTrue({""},{
.
CreatePageLink(format,GetTotalNumberThreads(topic.Keywords).Divide(10), "Last Page")}),
.
Presentations.ContainerEnd("div")]
.
.
Presentations.Link(federation.LinkMaker.SimpleLinkTo(
.
["default.aspx/", namespace.Name, "/", topic.Name, ".html?format=", format, "&page=", pageLink].ToOneString), label)