##if error.Level
	##if error.IsEqual(Number,1002)
		##local.definebyrender(HandledError)<contentof>1</contentof>
	##else
		##if error.IsEqual(Number,8000)
			##local.definebyrender(HandledError)<contentof>1</contentof>
		##else
			##if error.IsEqual(Number,8001)
				##local.definebyrender(HandledError)<contentof>1</contentof>
			##endif			
		##endif
	##endif
##endif

##local.define(projectDefaults)<contentof>
	##include(CatProjectDefaults)
</contentof>

##local.define(Objects)<CONTENTOF>
	<OBJECT CLASSID="CLSID:80E620E0-F631-11D1-A71C-000021750386" HEIGHT=0 WIDTH=0 ID=CheckConn></OBJECT>
</CONTENTOF>

##local.define(Scripts)<CONTENTOF>
	<SCRIPT SRC="/script/validatebase.js"></SCRIPT>
	<SCRIPT SRC="/script/vcontrolno.js"></SCRIPT>

	<SCRIPT SRC="/script/delta.js"></SCRIPT>

	<SCRIPT>
		CheckConn.BFormat  = "##sessioncfg.DB.Session.Catalogue.vssp.bformat";
		CheckConn.LFormat  = "##sessioncfg.DB.Session.Catalogue.vssp.lformat";
		CheckConn.CFormats = "##sessioncfg.DB.Session.Catalogue.vssp.cformats";
		CheckConn.AutoCalculateCheckDigit = "##sessioncfg.DB.Session.Catalogue.vssp.general.autocalccheckdigit";
	</SCRIPT>

	<SCRIPT>
		function doALSiBack()
		{
			if ( window.getReasonableGoBackURL !== ( void 0 ) ) {
				var strURL = getReasonableGoBackURL ();
				if ( strURL != null ) {
					location.href = strURL;
					return;
				}
			}
			history.back();
		}
	</SCRIPT>
</CONTENTOF>

##local.Define(Title)<contentof>##leg.CAT.ExtZ3950Search.Title</contentof>

##local.define(ListTitle)<CONTENTOF>
	##leg.data(CAT.ExpertSearch) - ##startpoint.qualData(Query.targetMeta.label)<br>
		##local.define(Sep)<contentof></contentof>
		##startpoint.ForEachIn(term,Query.terms)<contentof>
			##if term.IsEqual(tvalue,"") ##else ##local.Sep (##term.QualData(termTypeMeta.label) = ##term.tvalue) ##local.defineByRender(Sep)<contentof>##if term.logicalOp ##term.logicalOp ##endif</contentof> ##endif
		</contentof>
</CONTENTOF>

##local.define(ZForm)<contentof>

	##local.define(projectDefaults)<contentof>
		##include(CatProjectDefaults)
	</contentof>

	##local.define(Objects)<CONTENTOF>
		<OBJECT CLASSID="CLSID:80E620E0-F631-11D1-A71C-000021750386" HEIGHT=0 WIDTH=0 ID=CheckConn></OBJECT>
	</CONTENTOF>

	##local.define(Scripts)<CONTENTOF>
		<SCRIPT SRC="/script/validatebase.js"></SCRIPT>
		<SCRIPT SRC="/script/vcontrolno.js"></SCRIPT>
		<SCRIPT SRC="/script/delta.js"></SCRIPT>
		<SCRIPT>
			CheckConn.BFormat  = "##sessioncfg.DB.Session.Catalogue.vssp.bformat";
			CheckConn.LFormat  = "##sessioncfg.DB.Session.Catalogue.vssp.lformat";
			CheckConn.CFormats = "##sessioncfg.DB.Session.Catalogue.vssp.cformats";
			CheckConn.AutoCalculateCheckDigit = "##sessioncfg.DB.Session.Catalogue.vssp.general.autocalccheckdigit";
		</SCRIPT>

		<SCRIPT>
			function doALSiBack()
			{
					window.location.href = "APS_START?##this.StyleSet";
			}
		</SCRIPT>
	</CONTENTOF>

	<SCRIPT>
		function ViewRec(myURL){
			var o = documentManager.create ( "floatingFrame" );
			o.setRectangle ( 50, 50, 500, 10 );
			o.start ();
			o.load ( myURL );
		}
	</SCRIPT>

	##local.define(Title)<CONTENTOF>
		##if searchcontext.IsEqual(DB,"PRD")
			##local.define(IsPRD)<contentof>1</contentof>
		##endif
		##if searchcontext.IsEqual(DB,"PRDSearchServer")
			##local.define(IsPRD)<contentof>1</contentof>
		##endif

		##if local.IsPRD
			##leg.CAT.CatIdentify.IdentifyTitlePRD
			##helpcontext.addHelp(PRDKeySearch)
		##else
			##leg.CAT.CatIdentify.IdentifyTitle
			##helpcontext.addHelp(CatalogueKeySearch)
		##endif
	</CONTENTOF>

	##local.define(TopArea)<CONTENTOF>
		<script>
			function onChangeHost()
			{
				document.all.search.Method.value = "ChangeTarget";
				document.all.search.action = "##this.obj"
				document.all.search.submit()
			}
		</script>

    <form name=search id=search METHOD=POST ACTION="##this.obj">
        ##this.stylesetforform
		<table>
			<tr>
				<td>
					<INPUT TYPE=HIDDEN id=Method name=Method value="Search">
					<span class=label valign=top> ##leg.CAT.ExtZ3950Search.Host : </span>
					<span class=data>
					<select id=target name=target onchange="onChangeHost()">
						##targets.ForEachIn(i,"target")<contentof>
							<option value="##i.id">
								##i.QualData(label)
							</option>
						</contentof>
					</select>
					<script>
					document.all("target").value = "##query.target";</script>
					
					##local.DefineByRender(QueryOptions)<contentof>
						##queryTypes.ForEachIn(i,"queryTypes")<contentof>
							<option value="##i.id">##i.QualData(label)</option>
						</contentof>
					</contentof>
					
					##local.DefineByRender(LogicalOptions)<contentof>
						<option value="And" selected>##leg.CAT.ExtZ3950Search.And</option>
						<option value="Or">##leg.CAT.ExtZ3950Search.Or</option>
						<option value="Not">##leg.CAT.ExtZ3950Search.AndNot</option>
					</contentof>
				</td>
			</tr>
			<tr>
				<td>
					<span class=label>##leg.CAT.ExtZ3950Search.Description : </span>
					##targets.ForEachIn(k,"target")<contentof>
						##if query.IsEqual(target, ##k.id)
							<span class=data>##k.QualData(description)</span>
						##endif
					</contentof>
				</td>
			</tr>
		</table>
		<table>
	        ##query.ForEachIn(term,"terms")<contentof>
                ##local.defineByRender(tpath)<contentof>terms.##term.__Label()</contentof>
                <tr>
                    <td>
                        <select id= "##local.tpath\=002Etype" name="##local.tpath\=002Etype">##local.QueryOptions</select>
                        <script>document.all("##local.tpath\=002Etype").value = "##term.type";</script>
                    </td>

					<td><input width=60 name="##local.tpath\=002Etvalue" ALSiClass=Control value= ##term.AsJScriptLit(tvalue)></td>
					<td>
						##local.DefineByRender(TermLabel)<contentof>##term.__Label()</contentof>
						##if local.IsEqual(TermLabel,"3")
						##else
							<select id= "##local.tpath\=002ElogicalOp" name="##local.tpath\=002ElogicalOp">##local.LogicalOptions</select>
							##if term.logicalOp
								<script>document.all("##local.tpath\=002ElogicalOp").value = "##term.logicalOp";</script>
							##endif
						##endif
					</td>
               </tr>
	        </contentof>
        </table>
		<input type=submit id=submitMe value="##leg.CAT.ExtZ3950Search.Search">
	</form>
	##if local.HandledError
		<script>
		
			function launchZErrorDialogue () 
			{
				var url = "APS_Z39_ERROR_DIALOGUE?##this.StyleSet&Error=";

				var o = documentManager.topManager ().create ( "floatingFrame" );
				switch ("##error.Number")
				{
					case "1002": 
						url += escape("##leg.CAT.ExtZ3950Search.Z39Errors.1002");
						break;
					case "8000":
						url += escape("##leg.CAT.ExtZ3950Search.Z39Errors.8000");
						break;
					case "8001":
						url += escape("##error.Details.Diagnostic");
						url += " - ";
						url += escape("##error.QualData(Details.DiagnosticMap)");
						break;
					default:
						url += escape("##leg.CAT.ExtZ3950Search.Z39Errors.Unknown");
						url += " - ";
						url += "##error.Number";
						break;
				}
				o.setRectangle ( 50, 50, 400, 0 );
				o.start ();
				o.load ( url );
			}

			documentManager.addStartup ( launchZErrorDialogue );

		</SCRIPT>
	##endif

	</contentof>
	##local.TopArea
</contentof>

##local.define(MiddleArea)<CONTENTOF>
	<table height=100% width=100%>
		<tr>
			<td height="20%">
				##local.ZForm
			</td>
		</tr>
		##if error.Level
			<tr>
				<td></td>
			</tr>
			<tr>
				<td></td>
			</tr>
		##else
			<tr>
				<td bgcolor="#DEDEEF" border=1 >
					##local.ListTitle
				</td>
			</tr>
			<tr>
				<td border=2 style="border:2;border-style:solid;border-color:black">
					##local.ScrollingBrowseList
				</td>
			</tr>
		##endif        

	</table>
</CONTENTOF>

##include(Body)