Version 2.2: Also take instances of the master project into account (optionally)

Author: sbuchali

README.md

@@ -1,5 +1,5 @@
 # TemplateDependenceChecker
-_Version 2.1_
+_Version 2.2_
 
 "TemplateDependenceChecker" is a SmartTree enhancement for the Opentext Website Management Server allowing to check the assignment of every template of a content class within all connected projects.
 
@@ -26,17 +26,19 @@ This file contains the dialog box the plugin will start with. Translate the germ
 
 ####  TemplateDependenceChecker_do.asp
 
-This file contains the plugin script itself. Translate the german variables (lines 21-32) if necessary.
+This file contains the plugin script itself. Translate the german variables (lines 21-33) if necessary.
 
 The plugin must be run under an administrator account. Please enter the corresponding login data in lines 18+19.  
 This user must have the role "Administrator" and "Template Editor" in all projects, and the number of allowed sessions should be set to at least 2.  
 The user also must have access to all language variants in every project. If a language variant is denied for him, it will not occur in the report, and there will be no error message regarding this.
 
 ## How to use
 
-In every project, the plugin will appear in the action menu of every content class. After clicking OK, the plugin reads the project variant assignment of the selected content 
+In every project the plugin was assigned, it will appear in the action menu of content classes. After clicking OK, the plugin reads the project variant assignment of the selected content 
 class in every project that is connected to the corresponding content class folder.
 
+Optionally it also counts the number of active instances of the content class within the master project.
+
 This process can take some minutes.
 
 Finally it will show a report that lists:
@@ -74,6 +76,10 @@ The following error messages can occur:
 
 ## Changelog
 
+**Version 2.2**  
+August 25, 2017  
+Also take instances of the master project into account (optionally)
+
 **Version 2.1**  
 May 31, 2017  
 Language specific counting of instances

TemplateDependenceChecker_dlg.asp

@@ -117,9 +117,10 @@ function submitForm() {
 	if(submitOK) {
 		submitOK=false;
 		document.getElementById("messageDiv").innerText='<%=dlgPleaseWait %>...';
+		document.TemplateDependenceCheckerForm.submit();
+		document.getElementById("cbMaster").disabled=true;
 		document.getElementById("btn1").disabled=true;
 		document.getElementById("btn2").disabled=true;
-		document.TemplateDependenceCheckerForm.submit();
 	}
 }
 </script>
@@ -160,12 +161,15 @@ function submitForm() {
 		<td><%=dlgContent %></td>
 		<td></td>
 		</tr>
+<% if dlgContinue then %>
+		<tr>
+		<td height="15" colspan="3"></td>
+		</tr>
 		<tr>
 		<td></td>
-		<td><label><input type="checkbox" name="master" value="1" /> <%=dlgAlsoMaster %></label></td>
+		<td><label><input type="checkbox" name="master" id="cbMaster" value="1" /> <%=dlgAlsoMaster %></label></td>
 		<td></td>
 		</tr>
-<% if dlgContinue then %>
 		<tr>
 		<td height="15" colspan="3"></td>
 		</tr>

TemplateDependenceChecker_do.asp

@@ -69,7 +69,7 @@ Dim xmlSendDoc		' RQL-Anfrage, die zum Server geschickt wird
 Dim ServerAnswer	' Antwort des Servers
 
 
-function countInstances(lGUID, sKey)
+function countInstances(lGUID, sKey, tGUID)
 
 	instancesStr = ""
 
@@ -105,7 +105,7 @@ function countInstances(lGUID, sKey)
 
 		'Instanzen zählen
 		xmlSendDoc=	"<IODATA loginguid=""" & lGUID & """ sessionkey=""" & sKey & """>"&_
-						"<PAGE action=""search"" templateguid=""" & TemplateToCheckGUID & """ flags=""0"" maxrecords=""999999""/>"&_
+						"<PAGE action=""search"" templateguid=""" & tGUID & """ flags=""0"" maxrecords=""999999""/>"&_
 					"</IODATA>"
 		ServerAnswer = objIO.ServerExecuteXml (xmlSendDoc, sError)
 		XMLInstancesDoc.loadXML(ServerAnswer)
@@ -135,7 +135,7 @@ end function
 if countMaster = "1" then
 	'Instanzen im Masterprojekt zählen
 	resultStr = resultStr & "<hr/><p><b>" & dlgMasterProject & "</b></p>"
-	resultStr = resultStr & countInstances(LoginGUID, RQLKey)
+	resultStr = resultStr & countInstances(LoginGUID, RQLKey, TemplateGUID)
 end if
 
 
@@ -260,7 +260,7 @@ if InStr(ServerAnswer,"guid")>0 then
 					Set TemplateVariantList = nothing
 					
 					'Instanzen zählen
-					resultStr = resultStr & countInstances(RqlAdmLoginGUID, RqlAdmSessionKey)
+					resultStr = resultStr & countInstances(RqlAdmLoginGUID, RqlAdmSessionKey, TemplateToCheckGUID)
 										
 				else
 					resultStr = resultStr & "<p><b>" & dlgError & ": " & dlgContentClassNotFound & "!</b></p>"