// extended db javascript template for ArcIMS HTML Viewer
// aimsDB.js
/*
*  JavaScript template file for ArcIMS HTML Viewer
*		dependent on aimsXML.js, ArcIMSparam.js, aimsCommon.js, aimsMap.js, and aimsLayers.js
*		To be interactive, dependent also on aimsDHTML.js, aimsClick.js, and aimsNavigation.js
*/
// global variables
var aimsDBPresent = true;
//var theDBFrame = parent.DBFrame.document;
var dbLinkLayer = "Parcels";
var dbLinkLayerID = "29";
var dbLinkLayerIndex = 8;   ///kav20040317  HARDCODE
ActiveLayerIndex = 3;
var dbQueryString = "";
var dbIdString = "";
var dbIdValue = "";
var dbNumValue = "";
var dbStreetValue = "";
var dbOwnerValue = "";
var dbDisplayValue = "";
var mapIDField;
var dbIDField;
//************************************************************************************************************************************

function getDBQuery(value) {	
	var wholeLayerName = t.selFieldList[ActiveLayerIndex];
	var index = wholeLayerName.indexOf(" ");
	wholeLayerName = wholeLayerName.substr(0,index);
	index = wholeLayerName.lastIndexOf(".");
	wholeLayerName = wholeLayerName.substr(0,index);
	var queryString = "";	
//alert(parent.MapFrame.theFID);
if (t.SearchSwitch=="Property Search" && parent.MapFrame.theFID==0) {

//if (t.SearchSwitch=="Property Search") {		



		var mapIDField = "sde.DBO.WEB_PARCEL_POLYGON.PARCEL_ID";		
		var dbIDField = "parcel_id"; 
			if (dbIDFieldIsText) {
				queryString = mapIDField + ' like \'' + value + '%\'';
				dbIdString = dbIDField + ' like \'' + value + '%\'';
			} else {
				
			}
	setQueryString = queryString;
	hideRetrieveData();
	var theString = getDBEnvelope(queryString);
	sendDBXMLRequest(theString, 3001)		
} else {//custom query	
		dbLinkLayerIndex = t.ActiveLayerIndex;		
		mapIDField = wholeLayerName + "."	
				
		dbIDField = ActiveLayerIDField[t.ActiveLayerIndex];
			
		var r;
		var r2="";
		var rName="";
			if (opener) {
		                if (opener.name=="MapFrame") {
		                        r = opener.parent.MapFrame;
		                        rName = "opener.parent.MapFrame.";
					r2 = "opener.parent.MapFrame";
		                } else {
		                        r = opener;
		                        rName = "opener.";
					r2 = "opener";
		                }
		        } else {		                
		                if (parent.MapFrame!=null) {
		                        r = parent.MapFrame;
		                        rName = "parent.MapFrame.";
					r2 = "parent.MapFrame";
		                } else {
		                        r=document;
					r2 = "document";
		                }
		        }							
		queryString = mapIDField + dbIDField + " like '" + value + "'";			
		setQueryString = queryString;
		hideRetrieveData();
		var theString = getDBEnvelope(queryString);
		//alert(queryString);			
		sendDBXMLRequest(theString, 3001)
	}		
} //end    function getDBquery()
////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////


// create the ArcXML query request with feature id used to match external db record to feature. envelope will parsed from response
function getDBEnvelope(queryString) {
	//alert(queryString);
	//alert(dbLinkLayerIndex + " " + theString);
	var theFields = LayerIDField[dbLinkLayerIndex] + " " + LayerShapeField[dbLinkLayerIndex];
	//alert(theFields);	
	var theString = '<ARCXML VERSION="1.1">\n<REQUEST>\n<GET_FEATURES outputmode="xml" geometry="false" envelope="true"';
	theString += ' compact="true" featurelimit="' + maxFeaturesReturned + '" beginrecord="' + queryStartRecord + '">\n';	
	if (t.LayerName[t.ActiveLayerIndex]=="Property Boundaries") {
		dbLinkLayerIndex = 8;  //HARDCODE
		}
	theString += '<LAYER id="' + LayerID[dbLinkLayerIndex] + '" ftype="' + ActiveLayerType + '" />';
	
	if (useLimitExtent) {
		// keep this within the limitExtent
		theString += '<SPATIALQUERY subfields="' + theFields + '" where="' + queryString + '" />';
		theString += '<SPATIALFILTER relation="area_intersection">\n';
		theString += '<ENVELOPE maxx="' + limitRight + '" maxy="' + limitTop + '" minx="' + limitLeft + '" miny="' + limitBottom + '" />\n';
		theString += '</SPATIALFILTER>\n';
		theString += '</SPATIALQUERY>\n';
	} else {	
	theString += '<QUERY subfields="' + theFields + '" where="' + queryString + '" />';
	}
	theString += '</GET_FEATURES>';
	theString += '</REQUEST>';
	theString += '</ARCXML>';
	//alert("getDBEnvelope:\n" + theString); //ckx
	selectLayer=ActiveLayer;
	selectType=ActiveLayerType;
	selectCount=0;
	hightlightedOne="";
	selectPoints.length=1;
	selectLeft.length=1;
	selectRight.length=1;
	selectTop.length=1;
	selectBottom.length=1;
	return theString;
} //end function getDBEnvelope(queryString)
//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////


// Custom function to send ArcXML requests points response to processDBXML()
function sendDBXMLRequest(XMLRequest, theType) {
	//alert("XMLRequest: " + XMLRequest);
	var theFunction = "parent.MapFrame.processDBXML";	
	sendCustomToServer(XMLRequest,theFunction, theType)
}  //end     function sendDBXMLRequest
//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////


// Custom XML processor for db access
function processDBXML(theReplyIn) {
	//alert(theReplyIn);
	theReplyIn = replacePlus(theReplyIn);	
	var theReply = unescape(theReplyIn);
	okToSend = true;
	if (debugOn>2) alert(msgList[13] + theReply);	
	if (theReplyIn.indexOf('count="0"') != -1) {			
		queryParcelID = 'NotFound';
	}
	if (theReplyIn.indexOf('<ERROR') != -1) {			
		queryParcelID = 'NotFound';
	}	
	if (XMLMode == 3001 && queryParcelID != 'NotFound') {			
		parseDBEnvelope(theReply);  // parse out envelope and send zoom to envelope request.
	} else {
		updateLayers();	
	}
	if (XMLMode == 3002) {
	}
	parent.MapFrame.eWidth = eRight - eLeft; //+250
	parent.MapFrame.eHeight = eTop - eBottom;
	if (parent.MapFrame.eWidth < parent.MapFrame.eHeight) {
		parent.MapFrame.eWidth = parent.MapFrame.eHeight/.6886;		
		parent.MapFrame.usedZoomBox=true;
	}
	parent.MapFrame.fullWidth = fullWidth;
} // end      function processDBXML
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////


// after matching feature to external db record parse out envelope and send zoom to envelope request.
function parseDBEnvelope(theReply) {
	var theError = getXMLErrorMessage(theReply);	
	var featureCount = justGetFeatureCount(theReply);
	var theXYs = getEnvelopeXYs(theReply, 0)
	var endpos = 0;
	selectLeft[0] = theXYs[0];
	selectBottom[0] = theXYs[1];
	selectRight[0] = theXYs[2];
	selectTop[0] = theXYs[3];
	endpos = xmlEndPos;
	var inData = parseRecordString(theReply, endpos);
	endpos = xmlEndPos;
	var selectedData = clearLeadingSpace(inData);
	var fName1 = getFieldNames(selectedData);
	var fValue1 = getFieldValues(selectedData);
	selectPoints[0] = getIdValue(fName1, fValue1);
	highlightedOne = LayerIDField[ActiveLayerIndex] + " = " + selectPoints[0];
	//alert(highlightedOne);
	//alert(selectLeft[selNum] + "," + selectRight[selNum]);
	var fWidth = selectRight[0] - selectLeft[0];
	var fHeight = selectTop[0] - selectBottom[0];
	var mWMargin = 0;
	var mHMargin = 0;
	if (selectType=="point") {
		mWMargin = fullWidth * selectPointMargin;
		mHMargin = fullHeight * selectPointMargin;
	} else {
		mWMargin = fWidth * selectMargin;
		mHMargin = fHeight * selectMargin; 
	}
	saveLastExtent();
	eLeft = selectLeft[0] - mWMargin;
	eRight = selectRight[0] + mWMargin;
	eTop = selectTop[0] + mHMargin;
	eBottom = selectBottom[0] - mHMargin;
	//alert(highlightedOne);
	legendTemp=legendVisible;
	legendVisible=false;
	if (dbAccessType == "VB") writeDBResponsePage(dbQueryString);
	sendMapXML();
} //end    function parseDBEnvelope
////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////


// dynamically write out page with form that automatically submits upon loading. sends request to external vb db access module with sql query
function writeDBResponsePage(featureString) {
	var theFrame = "TextFrame";
	if ((useExternalWindow) || (!useTextFrame)) theFrame = "_blank";
	var Win1 = parent.DBFrame.document;
	var startpos = featureString.indexOf("IN (");
	startpos += 4;
	var endpos = featureString.indexOf(")",startpos);
	if (endpos==-1) endpos = featureString.length;
	var flist = featureString.substring(startpos, endpos);
	//alert("Where Clause: " + flist);
	if (dbAccessType == "VB") {
		/*
		Win1.open();
		Win1.writeln('<html><head>');
		Win1.writeln('	<title>Identify Form</title>');
		Win1.writeln('<script language="javascript">');
		Win1.writeln('	function sendForm() {');
		Win1.writeln('		document.forms[0].submit();')
		Win1.writeln('	}');
		Win1.writeln('</script>');
		Win1.writeln('</head>');
		Win1.writeln('<body onload="sendForm()" BGCOLOR="Black" TEXT="Gray" LINK="Gray" VLINK="Gray" ALINK="Gray" topmargin=10>');
		//Win1.writeln('<body BGCOLOR="Black" TEXT="Gray" LINK="Gray" VLINK="Gray" ALINK="Gray">');
		//Win1.writeln('<form action="http://aardvark/servlet/com.esri.esrimap.Esrimap" target="TextFrame">');
		Win1.writeln('<p>&nbsp;<p><form action="' + dbSQLurl + '" target="' + theFrame + '">');
		//Win1.writeln('<INPUT TYPE="submit" NAME="submit" VALUE="Show Data">');
		Win1.writeln('<input type="Hidden" name="Name" value="' + dbSQLservice + '">');
		//Win1.writeln('<input type="Hidden" name="Name" value="SQLsend">');
		Win1.writeln('<input type="Hidden" name="Database" value="' + dbNumber + '">');
		Win1.writeln('<input type="Hidden" name="Connect" value="' + dbConnect + '">');
		Win1.writeln('<input type="Hidden" name="Response" value="1">');
		Win1.writeln('<input type="Hidden" name="Style" value="' + dbStyle + '">');
		Win1.writeln('<input type="text" name="IDValue" value="' + flist + '">');
		Win1.writeln('<textarea name="SQL" cols="30" rows="10">');
		Win1.writeln(featureString);
		Win1.writeln('</textarea>');

		Win1.writeln('</form>');
		Win1.writeln('</body></html>');
		Win1.close();
		*/
		//featureString = featureString + " AND " + dbDisplayField + " = " + dbDisplayValue;
		var f = Win1.forms[0];
		f.action = dbSQLurl;
		f.Database.value = dbDatabase;
		f.Connect.value = dbConnectString;
		f.IDField.value = dbIDField;
		f.SQL.value = featureString;
		f.Response.value = "1";
		f.Style.value = dbStyle;
		f.IDValue.value = flist;
		f.Function.value = "sendValue";		
		f.ListDescript.value = dbFieldListDescript;

		f.submit();
		
	} else if ((dbAccessType == "ColdFusion") || (dbAccessType == "ASP"))  {
		theForm = Win1.forms[0];
		//theForm.SQLValue = featureString;
		theForm.IDValue.value = flist;
		theForm.DisplayValue.value = "**None**";
		
		theForm.submit();

	}
	
	featureString=null;
	Win1 = null;
	
}
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////

// set the active layer parameters to the dbLinkLayer
function matchDBLinkLayer(layerName) {
	var j = -1;
	for (var i=0;i<layerCount;i++) {
		if (LayerName[i]==layerName) j = i;
	}
	if (j>-1) {
		dbLinkLayerIndex = j
		dbLinkLayerID = LayerID[dbLinkLayerIndex];
		dbLinkLayer = LayerName[dbLinkLayerIndex];
		ActiveLayerIndex = dbLinkLayerIndex;
		ActiveLayer = dbLinkLayerID;
	}
}
// 
// db Identify - external db access
//	XMLMode=70... response will be sent to parseIDFieldData()
function dbIdentify(e) {
	highlightedOne="";
	var theX = mouseX;
	var theY = mouseY;
	getMapXY(theX,theY);
	searchTolerance = (xDistance/iWidth) * pixelTolerance;
	//alert(xDistance + "/" + iWidth + "/" + pixelTolerance + "/" + searchTolerance);
	var tempWest = mapX - searchTolerance;
	var tempNorth = mapY + searchTolerance;
	var tempEast = mapX + searchTolerance;
	var tempSouth = mapY - searchTolerance;
	var theString = writeGetFeatures(tempWest,tempSouth,tempEast,tempNorth);
	//alert(theString);
	showRetrieveData();
	sendToServer(imsQueryURL,theString,70);
}

// get the attribute values from the identify XML response
// 	then send request to external db access server
// 	and request for map highlighting feature
function parseIDFieldData(theReply) {	
	var fList="";
	var iList="";
	var fieldPair = "";
	var fieldString = mapIDField + "=";
	var idString = LayerIDField[dbLinkLayerIndex] + "=";
	//alert(idString);
	//alert(fieldString);
	var qpos = 0;
	var pos = theReply.indexOf("<FEATURECOUNT count=");
	var startpos = pos + 21;
	var endpos = theReply.indexOf(dQuote,startpos);
	var tempString = theReply.substring(startpos,endpos);
	//alert(tempString);
	var featureCount = parseInt(tempString);
	if (featureCount > 0) {
		endpos = 1;
		for (var i=0;i<featureCount;i++) {
			if ((dbAccessType == "ASP" && i < 1) || dbAccessType != "ASP") {
				var startpos2 = theReply.indexOf("<FIELDS ",endpos);
				pos = startpos2 + 8;
				qpos = fieldString.length + 1;
				startpos =theReply.indexOf(fieldString,pos);
				startpos = startpos + qpos
				endpos = theReply.indexOf(dQuote,startpos);
				tempString = theReply.substring(startpos,endpos);
				if (addIDQuotes) {
					tempString = String.fromCharCode(39) + tempString + String.fromCharCode(39);
				//} else {
				//	tempString = mapIDField + " = " + tempString;
				}
				if (i>0) tempString = "," + tempString;
				fList = fList + tempString;
				
				pos = startpos2 + 8;
				qpos = idString.length + 1;
				startpos =theReply.indexOf(idString,pos);
				startpos = startpos + qpos
				endpos = theReply.indexOf(dQuote,startpos);
				tempString = theReply.substring(startpos,endpos);
				//tempString = LayerIDField[dbLinkLayerIndex] + " = " + tempString;
				if (i>0) tempString = "," + tempString;
				iList = iList + tempString;
				
			}
		}
		//alert(fList);
		//if (dbAccessType == "VB") {
		
			var featureString = "select " + dbFieldList + " from " + dbTableList + " where " + dbIDField + " IN (" + fList + ") order by " + dbIDField;
		
		//} else if ((dbAccessType == "ASP") || (dbAccessType == "ColdFusion")) {
		//	var featureString = fList;
		//} else {
		//	var featureString = "";
		//}
		
		writeDBResponsePage(featureString);
		if (highlightIdentify) {
			//alert(iList);
			highlightedOne=LayerIDField[dbLinkLayerIndex] + " IN (" + iList + ")";
			sendMapXML();
		}
	} else {
		tempString = ActiveLayer + ":\n" + dbList[0];
		//alert(tempString);
		var Win1;
		if ((useExternalWindow) || (!useTextFrame)) {
			Win1 = window.open("","QueryWindow","width=575,height=120,scrollbars=yes,resizable=yes");
		} else {
			Win1 = parent.TextFrame.document;
			Win1.open();
		}
		Win1.writeln('<html><meta http-equiv="Content-Type" content="text/html; charset=' + charSet + '"><head>');
		Win1.writeln('	<title>' + dbList[1] + '</title>');
		Win1.writeln('</head>');
		Win1.writeln('<body BGCOLOR="White" TEXT="Black" LEFTMARGIN=0 TOPMARGIN=0>');
		Win1.writeln('<FONT FACE="Arial"><B>' + LayerName[ActiveLayerIndex] + '</B></font><FONT FACE="Arial" size="-2">');
		Win1.writeln('<br>' + dbList[2] + '</FONT>');
		Win1.writeln('</body></html>');
		Win1.close();
	}
	hideRetrieveData();
	
}

function getDBQuery2(value1,value2) {
	// for vb implementation
	var queryString = "";
	/*
	if (dbIDFieldIsText) {
		queryString = mapIDField + ' = "' + value + '"';
		dbIdString = dbIDField + ' = "' + value + '"';
	} else {
		queryString = mapIDField + " = " + value;
		dbIdString = dbIDField + " = " + value;
	}
	*/
	queryString = mapIDField + " IN (" + value1 + ")";
	setQueryString=  queryString ;
	dbQueryString = dbIDField + " IN (" + value1 + ") AND " + dbDisplayField + " = '" + value2 + "'";
	dbQueryString = "select " + dbFieldList + " from " + dbTableList + " where " + dbQueryString + " order by " + dbIDField;
	hideRetrieveData();
	var theString = getDBEnvelope(queryString);
	sendDBXMLRequest(theString, 3001)
}