FINISHED!

Ok, so a few forewords.  First and foremost, I have not followed any coding standards the dev team have assigned for themselves, mainly because I did not know them.  I only made my modifications where I saw they were needed.  For that reason, I do not necessarily encourage the installation of this module as it stands.  I also don't discourage it because my company is using it (which is why I had to write it :P, and so I can verify that, for the past week at least, it has been working well.

Another reason I discourage the usage of this is because it will conflict with future updates from the Wiki Dev Team.  I'm mainly posting this in hopes that the idea will be admitted into the project, and so that those of you interested on how I went about my modifications can understand it.

First, here are the important links:
SOURCE: www.thedivineforums.com/files/Wiki_Source.zip
INSTALL: www.thedivineforums.com/files/Wiki_Install.zip

Now, for the info:

---

DataProvider.vb

Had to update the override subs and functions to include the GroupName string.

ORIGINAL                                                                                                 NEW
Public MustOverride Function Wiki_SettingsGetByModuleID(ByVal ModuleID As Integer) As IDataReader Public MustOverride Function Wiki_TopicAdd(ByVal moduleID As Integer, ByVal content As String, ByVal cache As String, ByVal name As String, ByVal updateDate As Date, ByVal updatedBy As String, ByVal updatedByUserID As Integer, ByVal AllowDiscussion As Boolean, ByVal AllowRating As Boolean, ByVal RatingOneCount As Integer, ByVal RatingTwoCount As Integer, ByVal RatingThreeCount As Integer, ByVal RatingFourCount As Integer, ByVal RatingFiveCount As Integer, ByVal RatingSixCount As Integer, ByVal RatingSevenCount As Integer, ByVal RatingEightCount As Integer, ByVal RatingNineCount As Integer, ByVal RatingTenCount As Integer) As Integer Public MustOverride Sub Wiki_TopicUpdate(ByVal moduleID As Integer, ByVal topicID As Integer, ByVal content As String, ByVal cache As String, ByVal name As String, ByVal updateDate As Date, ByVal updatedBy As String, ByVal updatedByUserID As Integer, ByVal AllowDiscussion As Boolean, ByVal AllowRating As Boolean, ByVal RatingOneCount As Integer, ByVal RatingTwoCount As Integer, ByVal RatingThreeCount As Integer, ByVal RatingFourCount As Integer, ByVal RatingFiveCount As Integer, ByVal RatingSixCount As Integer, ByVal RatingSevenCount As Integer, ByVal RatingEightCount As Integer, ByVal RatingNineCount As Integer, ByVal RatingTenCount As Integer) Public MustOverride Sub Wiki_TopicDelete(ByVal topicID As Integer) Public MustOverride Function Wiki_SettingsGetByModuleID(ByVal ModuleID As Integer) As IDataReader ' Edited for group auth Public MustOverride Function Wiki_TopicAdd(ByVal moduleID As Integer, ByVal content As String, ByVal cache As String, ByVal name As String, ByVal updateDate As Date, ByVal updatedBy As String, ByVal updatedByUserID As Integer, ByVal AllowDiscussion As Boolean, ByVal AllowRating As Boolean, ByVal RatingOneCount As Integer, ByVal RatingTwoCount As Integer, ByVal RatingThreeCount As Integer, ByVal RatingFourCount As Integer, ByVal RatingFiveCount As Integer, ByVal RatingSixCount As Integer, ByVal RatingSevenCount As Integer, ByVal RatingEightCount As Integer, ByVal RatingNineCount As Integer, ByVal RatingTenCount As Integer, ByVal GroupName As String) As Integer Public MustOverride Sub Wiki_TopicUpdate(ByVal moduleID As Integer, ByVal topicID As Integer, ByVal content As String, ByVal cache As String, ByVal name As String, ByVal updateDate As Date, ByVal updatedBy As String, ByVal updatedByUserID As Integer, ByVal AllowDiscussion As Boolean, ByVal AllowRating As Boolean, ByVal RatingOneCount As Integer, ByVal RatingTwoCount As Integer, ByVal RatingThreeCount As Integer, ByVal RatingFourCount As Integer, ByVal RatingFiveCount As Integer, ByVal RatingSixCount As Integer, ByVal RatingSevenCount As Integer, ByVal RatingEightCount As Integer, ByVal RatingNineCount As Integer, ByVal RatingTenCount As Integer, ByVal GroupName As String) Public MustOverride Sub Wiki_TopicDelete(ByVal topicID As Integer)

---

Router.ascx.vb

This edit isn't so much necessary for my GroupAuth mod, but a fix. I noticed that when the admin chose to make the wiki have seperate edit settings than the page, no one could actually edit the topic. This fixes that issue. NOTE THAT I CAN NOT BE CERTAIN IF THIS CONFLICTS WITH ACTIVE DIRECTORY AUTHENTICATION! However, as far as database auth goes, this has worked perfectly. The difference is from where you get the user info. Context doesn't seem to wanna play nice. It doesn't load the user's DNN roles.

If Context.User.IsInRole(role) Then myPage.CanEdit = True Exit For End If If UserInfo.IsInRole(role) Then myPage.CanEdit = True Exit For End If

---

Start.ascx.vb

This is VERY horrible coding. I should've put this elsewhere, such as making CanEdit a .NET Property and making this check there, but I just left it here because it worked for the time being. The reason it's here, however, and not in Router (where CanEdit is originally set) is because in Router, you can't check the GroupName property. IOW, the TopicInfo object property in WikiControlBase hasn't been initialized yet, and returns an Object Reference Exception. Also, the MyModule property (of type DotNetNuke.Entities.Modules.PortalModuleBase) has also not been loaded, but that's not as important, as Router loads this automatically. Anyways, as a side note, just remember that I do not promote the direct usage of this mod. While I'm certain that it works (my company is using it now), it has not been written to any standards for updates that the Wiki team has set up. Please wait to see if they want to impliment this idea, or else use this at your own discretion. I am, however, available for questions. Anyways, what it does: This is where the page checks if the user is actually in the group specified. If not, link shows only if either (inclusive or) the author of the page or a superuser.

Else Me.EditPipe.Visible = Me.CanEdit Me.cmdEdit.Visible = Me.CanEdit Me.ViewPipe1.Visible = True Me.ViewPipe2.Visible = True Me.SavePanel.Visible = False If Not teContent Is Nothing Then Me.teContent.Text = "" End If Me.lblPageContent.Visible = True Me.txtViewHistory.Visible = True Dim Content As String = ReadTopic() Else ' Added for group auth If CanEdit Then If GroupName IsNot Nothing Then If GroupName.Length > 0 Then CanEdit = MyModule.UserInfo.IsInRole(GroupName) End If End If If UserID = CreatedByID Then CanEdit = True If MyModule.UserInfo.IsSuperUser Then CanEdit = True End If Me.EditPipe.Visible = Me.CanEdit Me.cmdEdit.Visible = Me.CanEdit Me.ViewPipe1.Visible = True Me.ViewPipe2.Visible = True Me.SavePanel.Visible = False If Not teContent Is Nothing Then Me.teContent.Text = "" End If Me.lblPageContent.Visible = True Me.txtViewHistory.Visible = True Dim Content As String = ReadTopic()

---

WikiControlBase.vb

It was during this process that I discovered that the Topic object (of type TopicInfo) does not load during Router's PageLoad event. Pretty straight forward of checking for a GroupName and CreatedByID. If null, look in TopicInfo. If not, send the info.

Public ReadOnly WikiHomeName As String = "WikiHomePage" Private mModule As DotNetNuke.Entities.Modules.PortalModuleBase Private mModule As DotNetNuke.Entities.Modules.PortalModuleBase ' Necessary parts for group auth. Private cbi As Integer Private gn As String Public Property CreatedByID() As Integer Get If cbi = 0 Then cbi = Topic.CreatedByID End If Return cbi End Get Set(ByVal value As Integer) cbi = value End Set End Property Public Property GroupName() As String Get If gn Is Nothing OrElse gn.Length = 0 Then gn = Topic.GroupName End If Return gn End Get Set(ByVal value As String) gn = value End Set End Property

---

WWWikiDB.vb

TopicInfo Class

Just added the private variables to contain the author's ID and the GroupName.

Private mRatingTenCount As Integer Private mUpdatedByUsername As String Private mRatingTenCount As Integer Private mUpdatedByUsername As String ' Added for Group Auth Private mCreatedByID As Integer Private mGroupName As String

---

When the content for the topic is rendered, the GroupName should also be parsed and set.

Set(ByVal Value As String) mContent = Me.ProcessLineBreaks(Value) If CanUseWikiText Then Cache = RenderedContent End Set Set(ByVal Value As String) mContent = Me.ProcessLineBreaks(Value) If CanUseWikiText Then Cache = RenderedContent GroupName = RenderedGroup End Set

---

Added the GroupName and CreatedByID properties to the Topic.

Public Property RatingTenCount() As Integer Get Return mRatingTenCount End Get Set(ByVal Value As Integer) mRatingTenCount = Value End Set End Property Public Property RatingTenCount() As Integer Get Return mRatingTenCount End Get Set(ByVal Value As Integer) mRatingTenCount = Value End Set End Property ' Added for Group Auth Public Property CreatedByID() As Integer Get Return mCreatedByID End Get Set(ByVal value As Integer) mCreatedByID = value End Set End Property 'Added for Group Auth Public Property GroupName() As String Get If mGroupName = "" Then mGroupName = RenderedGroup End If Return mGroupName End Get Set(ByVal value As String) mGroupName = value End Set End Property

---

TopicController Class

Changed the Add function to include the GroupName. CreatedByID does not need to be added because it's the same as the original 'Updater'

Public Function Add(ByVal TopicInfo As TopicInfo) As Integer Dim id As Integer = CType(DataProvider.Instance().Wiki_TopicAdd(TopicInfo.ModuleID, TopicInfo.Content, TopicInfo.Cache, TopicInfo.Name, TopicInfo.UpdateDate, TopicInfo.UpdatedBy, TopicInfo.UpdatedByUserID, TopicInfo.AllowDiscussions, TopicInfo.AllowRatings, TopicInfo.RatingOneCount, TopicInfo.RatingTwoCount, TopicInfo.RatingThreeCount, TopicInfo.RatingFourCount, TopicInfo.RatingFiveCount, TopicInfo.RatingSixCount, TopicInfo.RatingSevenCount, TopicInfo.RatingEightCount, TopicInfo.RatingNineCount, TopicInfo.RatingTenCount), Integer) TopicInfo.TopicID = id InsertUpdateAppCache(TopicInfo) Return id End Function ' Edited for Group Auth Public Function Add(ByVal TopicInfo As TopicInfo) As Integer Dim id As Integer = CType(DataProvider.Instance().Wiki_TopicAdd(TopicInfo.ModuleID, TopicInfo.Content, TopicInfo.Cache, TopicInfo.Name, TopicInfo.UpdateDate, TopicInfo.UpdatedBy, TopicInfo.UpdatedByUserID, TopicInfo.AllowDiscussions, TopicInfo.AllowRatings, TopicInfo.RatingOneCount, TopicInfo.RatingTwoCount, TopicInfo.RatingThreeCount, TopicInfo.RatingFourCount, TopicInfo.RatingFiveCount, TopicInfo.RatingSixCount, TopicInfo.RatingSevenCount, TopicInfo.RatingEightCount, TopicInfo.RatingNineCount, TopicInfo.RatingTenCount, TopicInfo.GroupName), Integer) TopicInfo.TopicID = id InsertUpdateAppCache(TopicInfo) Return id End Function

---

Again, added GroupName to the end of the update comman.

Public Sub Update(ByVal TopicInfo As TopicInfo) DataProvider.Instance().Wiki_TopicUpdate(TopicInfo.ModuleID, TopicInfo.TopicID, TopicInfo.Content, TopicInfo.Cache, TopicInfo.Name, TopicInfo.UpdateDate, TopicInfo.UpdatedBy, TopicInfo.UpdatedByUserID, TopicInfo.AllowDiscussions, TopicInfo.AllowRatings, TopicInfo.RatingOneCount, TopicInfo.RatingTwoCount, TopicInfo.RatingThreeCount, TopicInfo.RatingFourCount, TopicInfo.RatingFiveCount, TopicInfo.RatingSixCount, TopicInfo.RatingSevenCount, TopicInfo.RatingEightCount, TopicInfo.RatingNineCount, TopicInfo.RatingTenCount) InsertUpdateAppCache(TopicInfo) End Sub 'Edited for Group Auth Public Sub Update(ByVal TopicInfo As TopicInfo) DataProvider.Instance().Wiki_TopicUpdate(TopicInfo.ModuleID, TopicInfo.TopicID, TopicInfo.Content, TopicInfo.Cache, TopicInfo.Name, TopicInfo.UpdateDate, TopicInfo.UpdatedBy, TopicInfo.UpdatedByUserID, TopicInfo.AllowDiscussions, TopicInfo.AllowRatings, TopicInfo.RatingOneCount, TopicInfo.RatingTwoCount, TopicInfo.RatingThreeCount, TopicInfo.RatingFourCount, TopicInfo.RatingFiveCount, TopicInfo.RatingSixCount, TopicInfo.RatingSevenCount, TopicInfo.RatingEightCount, TopicInfo.RatingNineCount, TopicInfo.RatingTenCount, TopicInfo.GroupName) InsertUpdateAppCache(TopicInfo) End Sub

---

WikiData Abstract Class

Adds the Group constant, between which one would add the authorized group.

Public Const OPEN_BRACKET As String = "[[" Public Const CLOSE_BRACKET As String = "]]" Public Const OPEN_BRACKET As String = "[[" Public Const CLOSE_BRACKET As String = "]]" Public Const OPEN_GROUP As String = "(-" Public Const CLOSE_GROUP As String = "-)"

---

Just added the RenderedGroup property.

Public ReadOnly Property RenderedContent() As String Get Return WikiText(Content) End Get End Property Public ReadOnly Property RenderedContent() As String Get Return WikiText(Content) End Get End Property Public ReadOnly Property RenderedGroup() Get Return ProcessGroupPermission(Content) End Get End Property

---

Adds the code that will get rid of the (-GroupName-) from the display content.

ElseIf sob = -1 Then parsing = False End If Else parsing = False End If End While ElseIf sob = -1 Then parsing = False End If Else parsing = False End If End While ' Needed for Group Auth parsing = True fob = 0 sob = 0 fcb = 0 While parsing If (sob < 1) Then fob = RawText.IndexOf(OPEN_GROUP, fcb) Else fob = sob End If If fob <> -1 Then NextSearchSpot = fob + OPEN_GROUP.Length sob = RawText.IndexOf(OPEN_GROUP, NextSearchSpot) fcb = RawText.IndexOf(CLOSE_GROUP, NextSearchSpot) If fcb <> -1 And (sob = -1 Or fcb < sob) Then workingText = RawText.Substring(fob, fcb - fob + OPEN_GROUP.Length) RawText = RawText.Replace(workingText, String.Empty) ParsedText.Replace(workingText, String.Empty) If sob = -1 Then parsing = False End If ElseIf sob = -1 Then parsing = False End If Else parsing = False End If End While

---

Added a function that will return the name of the first group in a (-Group-) tag.

Return ParsedText.ToString() End Function Return ParsedText.ToString() End Function ' Returns the last group to be allowed editing permissions. Protected Function ProcessGroupPermission(ByVal RawText As String) As String Dim parsing As Boolean = True Dim fob As Integer = 0 Dim sob As Integer = 0 Dim fcb As Integer = 0 Dim workingText As String = "" Dim NextSearchSpot As Integer While parsing If (sob < 1) Then fob = RawText.IndexOf(OPEN_GROUP, fcb) Else fob = sob End If If fob <> -1 Then NextSearchSpot = fob + OPEN_GROUP.Length sob = RawText.IndexOf(OPEN_GROUP, NextSearchSpot) fcb = RawText.IndexOf(CLOSE_GROUP, NextSearchSpot) If fcb <> -1 And (sob = -1 Or fcb < sob) Then workingText = RawText.Substring(fob, fcb - fob + OPEN_GROUP.Length) RawText = RawText.Replace(workingText, String.Empty) workingText = workingText.Replace(OPEN_GROUP, String.Empty) workingText = workingText.Replace(CLOSE_GROUP, String.Empty) If sob = -1 Then parsing = False End If ElseIf sob = -1 Then parsing = False End If Else parsing = False End If End While Return workingText End Function

---

01.00.04.SqlDataProvider

Just added some updates down at the very bottom. Updates include modifying the table, editing stored proceedures to get the GroupName and CreatedByID, etc.

-- Update Data -- Update Data UPDATE {databaseOwner}{objectQualifier}Wiki_Topic set UpdatedByUserID = UserID FROM {databaseOwner}{objectQualifier}Wiki_Topic inner join {databaseOwner}{objectQualifier}Users on UpdatedBy = UserName UPDATE {databaseOwner}{objectQualifier}Wiki_TopicHistory set UpdatedByUserID = UserID FROM {databaseOwner}{objectQualifier}Wiki_TopicHistory inner join {databaseOwner}{objectQualifier}Users on UpdatedBy = UserName -- Update Data UPDATE {databaseOwner}{objectQualifier}Wiki_Topic set UpdatedByUserID = UserID FROM {databaseOwner}{objectQualifier}Wiki_Topic inner join {databaseOwner}{objectQualifier}Users on UpdatedBy = UserName UPDATE {databaseOwner}{objectQualifier}Wiki_TopicHistory set UpdatedByUserID = UserID FROM {databaseOwner}{objectQualifier}Wiki_TopicHistory inner join {databaseOwner}{objectQualifier}Users on UpdatedBy = UserName -- End -- Alter Tables for Group Auth ALTER TABLE {databaseOwner}{objectQualifier}Wiki_Topic ADD CreatedByID int NOT NULL CONSTRAINT DF_{objectQualifier}Wiki_Topic_CreatedByID DEFAULT 0 GO ALTER TABLE {databaseOwner}{objectQualifier}Wiki_Topic ADD GroupName nvarchar(101) GO -- End -- Alter Procedures for the group auth functions ALTER PROCEDURE {databaseOwner}{objectQualifier}Wiki_TopicAdd @moduleID int, @content ntext, @cache ntext, @name nvarchar(50), @updateDate datetime, @updatedBy nvarchar(101), @updatedByUserID int, @AllowDiscussions bit, @AllowRatings bit, @RatingOneCount int, @RatingTwoCount int, @RatingThreeCount int, @RatingFourCount int, @RatingFiveCount int, @RatingSixCount int, @RatingSevenCount int, @RatingEightCount int, @RatingNineCount int, @RatingTenCount int, @GroupName nvarchar(101) AS SET NOCOUNT ON INSERT INTO {databaseOwner}{objectQualifier}Wiki_Topic (ModuleID, Content, Cache, [Name], [UpdateDate], UpdatedBy, updatedByUserID, AllowDiscussions,AllowRatings, RatingOneCount, RatingTwoCount, RatingThreeCount, RatingFourCount, RatingFiveCount, RatingSixCount, RatingSevenCount, RatingEightCount, RatingNineCount, RatingTenCount, CreatedByID, GroupName) VALUES (@ModuleID, @Content, @cache, @Name, @UpdateDate, @UpdatedBy, @updatedByUserID, @AllowDiscussions, @AllowRatings, @RatingOneCount, @RatingTwoCount, @RatingThreeCount, @RatingFourCount, @RatingFiveCount, @RatingSixCount, @RatingSevenCount, @RatingEightCount, @RatingNineCount, @RatingTenCount, @updatedByUserID, @GroupName) SELECT SCOPE_IDENTITY() GO -- END -- Alter for Group Auth ALTER PROCEDURE {databaseOwner}{objectQualifier}Wiki_TopicUpdate @moduleID int, @topicID int, @content ntext, @cache ntext, @name nvarchar(50), @updateDate datetime, @updatedBy nvarchar(101), @updatedByUserID int, @AllowDiscussions bit, @AllowRatings bit, @RatingOneCount int, @RatingTwoCount int, @RatingThreeCount int, @RatingFourCount int, @RatingFiveCount int, @RatingSixCount int, @RatingSevenCount int, @RatingEightCount int, @RatingNineCount int, @RatingTenCount int, @GroupName nvarchar(101) AS SET NOCOUNT ON UPDATE {databaseOwner}{objectQualifier}Wiki_Topic SET ModuleID = @moduleID, Content = @content, Cache = @cache, [Name] = @name, UpdateDate = @updateDate, UpdatedBy = @updatedBy, updatedByUserID = @updatedByUserID, AllowDiscussions = @AllowDiscussions, AllowRatings = @AllowRatings, RatingOneCount = @RatingOneCount, RatingTwoCount = @RatingTwoCount, RatingThreeCount = @RatingThreeCount, RatingFourCount = @RatingFourCount, RatingFiveCount = @RatingFiveCount, RatingSixCount = @RatingSixCount, RatingSevenCount = @RatingSevenCount, RatingEightCount = @RatingEightCount, RatingNineCount = @RatingNineCount, RatingTenCount = @RatingTenCount, GroupName = @GroupName WHERE TopicID = @topicID GO --END -- Alter for Group Auth ALTER PROCEDURE {databaseOwner}{objectQualifier}Wiki_TopicGet @topicID int AS SET NOCOUNT ON SELECT TopicID, ModuleID, Content, Cache, Name, UpdateDate, UpdatedBy, UpdatedByUserID, AllowDiscussions, AllowRatings, RatingOneCount, RatingTwoCount, RatingThreeCount, RatingFourCount, RatingFiveCount, RatingSixCount, RatingSevenCount, RatingEightCount, RatingNineCount, RatingTenCount, CreatedByID, GroupName, 'UpdatedByUsername' = isnull(u.FirstName,'Anonymous') + ' ' + isnull(u.LastName,'User') FROM {databaseOwner}{objectQualifier}Wiki_Topic t LEFT OUTER JOIN {databaseOwner}{objectQualifier}Users u on u.UserID = t.UpdatedByUserID WHERE TopicID = @topicID ORDER BY Name GO --End --Alter for group auth ALTER PROCEDURE {databaseOwner}{objectQualifier}Wiki_TopicGetAll AS SET NOCOUNT ON SELECT TopicID, ModuleID, Content, Cache, Name, UpdateDate, UpdatedBy, UpdatedByUserID, AllowDiscussions, AllowRatings, RatingOneCount, RatingTwoCount, RatingThreeCount, RatingFourCount, RatingFiveCount, RatingSixCount, RatingSevenCount, RatingEightCount, RatingNineCount, RatingTenCount, CreatedByID, GroupName, 'UpdatedByUsername' = isnull(u.FirstName,'Anonymous') + ' ' + isnull(u.LastName,'User') FROM {databaseOwner}{objectQualifier}Wiki_Topic t LEFT OUTER JOIN {databaseOwner}{objectQualifier}Users u on u.UserID = t.UpdatedByUserID ORDER BY Name GO --End --Alter for group auth ALTER PROCEDURE {databaseOwner}{objectQualifier}Wiki_TopicGetAllByModuleID @ModuleID int AS SET NOCOUNT ON SELECT TopicID, ModuleID, Content, Cache, Name, UpdateDate, UpdatedBy, UpdatedByUserID, AllowDiscussions, AllowRatings, RatingOneCount, RatingTwoCount, RatingThreeCount, RatingFourCount, RatingFiveCount, RatingSixCount, RatingSevenCount, RatingEightCount, RatingNineCount, RatingTenCount, CreatedByID, GroupName, 'UpdatedByUsername' = isnull(u.FirstName,'Anonymous') + ' ' + isnull(u.LastName,'User') FROM {databaseOwner}{objectQualifier}Wiki_Topic t LEFT OUTER JOIN {databaseOwner}{objectQualifier}Users u on u.UserID = t.UpdatedByUserID Where t.ModuleID = @ModuleID ORDER BY Name GO --End --Alter for group auth ALTER PROCEDURE {databaseOwner}{objectQualifier}Wiki_TopicGetAllByModuleChangedWhen @ModuleID int, @DaysBack int AS SET NOCOUNT ON SELECT TopicID, ModuleID, Content, Cache, Name, UpdateDate, UpdatedBy, UpdatedByUserID, AllowDiscussions, AllowRatings, RatingOneCount, RatingTwoCount, RatingThreeCount, RatingFourCount, RatingFiveCount, RatingSixCount, RatingSevenCount, RatingEightCount, RatingNineCount, RatingTenCount, CreatedByID, GroupName, 'UpdatedByUsername' = isnull(u.FirstName,'Anonymous') + ' ' + isnull(u.LastName,'User') FROM {databaseOwner}{objectQualifier}Wiki_Topic t LEFT OUTER JOIN {databaseOwner}{objectQualifier}Users u on u.UserID = t.UpdatedByUserID Where t.ModuleID = @ModuleID and UpdateDate >= DateDiff(d,@DaysBack,GetDate()) ORDER BY UpdateDate Desc GO ALTER PROCEDURE {databaseOwner}{objectQualifier}Wiki_TopicGetByNameForModule @ModuleID int, @name nvarchar(200) AS SET NOCOUNT ON SELECT TopicID, ModuleID, Content, Cache, Name, UpdateDate, UpdatedBy, UpdatedByUserID, AllowDiscussions, AllowRatings, RatingOneCount, RatingTwoCount, RatingThreeCount, RatingFourCount, RatingFiveCount, RatingSixCount, RatingSevenCount, RatingEightCount, RatingNineCount, RatingTenCount, CreatedByID, GroupName, 'UpdatedByUsername' = isnull(u.FirstName,'Anonymous') + ' ' + isnull(u.LastName,'User') FROM {databaseOwner}{objectQualifier}Wiki_Topic t LEFT OUTER JOIN {databaseOwner}{objectQualifier}Users u on u.UserID = t.UpdatedByUserID WHERE t.ModuleID = @ModuleID and t.name = @name GO ALTER PROCEDURE {databaseOwner}{objectQualifier}Wiki_TopicSearchWiki @Search ntext, @ModuleID int AS SET NOCOUNT ON SELECT TopicID, ModuleID, Content, Cache, Name, UpdateDate, UpdatedBy, UpdatedByUserID, AllowDiscussions, AllowRatings, RatingOneCount, RatingTwoCount, RatingThreeCount, RatingFourCount, RatingFiveCount, RatingSixCount, RatingSevenCount, RatingEightCount, RatingNineCount, RatingTenCount, CreatedByID, GroupName, 'UpdatedByUsername' = isnull(u.FirstName,'Anonymous') + ' ' + isnull(u.LastName,'User') FROM {databaseOwner}{objectQualifier}Wiki_Topic t LEFT OUTER JOIN {databaseOwner}{objectQualifier}Users u on u.UserID = t.UpdatedByUserID WHERE ( name like @Search or content like @Search ) AND ModuleID = @ModuleID Order By Name GO --End