zspwgis.js

arcpad二次开发示例,电力GIS系统巡视PDA模块

function nextCLDT(){
	var obj=ThisEvent.Object;
	var lstGLSB=obj.Parent.Controls("lstGLSB");
	lstGLSB.Clear();
	var detail_values=DETAILDATA.values;
	var cur_DT_number;
	if(cur_DT_CL+DT_number>detail_values.length){
		cur_DT_CL=cur_DT_CL;
	}
	else{
		cur_DT_CL=cur_DT_CL+DT_number;
	}
	if(cur_DT_CL+DT_number>detail_values.length){
		cur_DT_number=detail_values.length-cur_DT_CL;
	}
	else{
		cur_DT_number=DT_number+cur_DT_CL;
	}
	buildGLSBList(cur_DT_CL,cur_DT_number,lstGLSB,10);
	if(cur_DT_CL!=0){
		obj.Parent.Controls("bntPrevDT").Enabled=true;
	}
	if(cur_DT_CL+DT_number>detail_values.length){
		obj.Enabled=false;
	}
}
function prevCLDT(){
	var obj=ThisEvent.Object;
	var lstGLSB=obj.Parent.Controls("lstGLSB");
	lstGLSB.Clear();
	var detail_values=DETAILDATA.values;
	var cur_DT_number;
	if(cur_DT_CL==0){
		cur_DT_CL=0;
	}
	else
		cur_DT_CL=cur_DT_CL-DT_number;
	if(DT_number>detail_values.length)
		cur_DT_number=detail_values.length;
	else
		cur_DT_number=DT_number+cur_DT_CL;
	buildGLSBList(cur_DT_CL,cur_DT_number,lstGLSB,10);
	if(cur_DT_CL==0){
		obj.Enabled=false;
	}
	if(cur_DT_CL+DT_number<=detail_values.length){
		obj.Parent.Controls("bntNextDT").Enabled=true;
	}
}
function findCLSB(){
	var obj=ThisEvent.Object;
	var txtFind=obj.Parent.Controls("txtFind");
	var lstGLSB=obj.Parent.Controls("lstGLSB");
	var findSBMC=txtFind.TEXT;
	if(findSBMC==null || findSBMC==""){
		//Application.MessageBox("未找到设备");
		str_Message="提示：请先输入要查找的关键字！！";
		Applet.Forms("frmMessage").Show();
		return;
	}
	find_index_cl=-1;
	var findit=false;
	var detail_values=DETAILDATA.values;
	for(i=0;i<detail_values.length;i++){
		var value=detail_values[i]; 
		var temp=value[2];
		var ifnd=temp.indexOf(findSBMC);
		if(ifnd!=-1){
			find_index_cl=i;
			findit=true;
			break;
		}
	}
	if(!findit){
		//Application.MessageBox("未找到设备");
		str_Message="提示：没有找到此设备！！";
		Applet.Forms("frmMessage").Show();
		return;
	}
	var num=Math.floor(find_index_cl/DT_number);
	var curid=find_index_cl%DT_number;
	cur_DT_CL=num*DT_number;
	lstGLSB.Clear();
	var cur_DT_number;
	if(detail_values.length<DT_number+cur_DT_CL)
		cur_DT_number=detail_values.length;
	else
		cur_DT_number=DT_number+cur_DT_CL;
	buildGLSBList(cur_DT_CL,cur_DT_number,lstGLSB,10);
	lstGLSB.ListIndex=curid;
	if(cur_DT_CL!=0)
		obj.Parent.Controls("bntPrevDT").Enabled=true;
	else
		obj.Parent.Controls("bntPrevDT").Enabled=false;
	if(cur_DT_CL+DT_number>detail_values.length)
		obj.Parent.Controls("bntNextDT").Enabled=false;
	else
		obj.Parent.Controls("bntNextDT").Enabled=true;
}
function findNextCLSB(){
	var obj=ThisEvent.Object;
	var txtFind=obj.Parent.Controls("txtFind");
	var lstGLSB=obj.Parent.Controls("lstGLSB");
	var findSBMC=txtFind.TEXT;
	if(findSBMC==null || findSBMC==""){
		//Application.MessageBox("未找到设备");
		str_Message="提示：请先输入要查找的关键字！！";
		Applet.Forms("frmMessage").Show();
		return;
	}
	var detail_values=DETAILDATA.values;
	var startid=0;
	var findit=false;
	if(find_index_cl>-1)startid=find_index_cl+1;
	for(i=startid;i<detail_values.length;i++){
		var value=detail_values[i]; 
		var temp=value[2];
		var ifnd=temp.indexOf(findSBMC);
		if(ifnd!=-1){
			find_index_cl=i;
			findit=true;
			break;
		}
	}
	if(!findit){
		//Application.MessageBox("已经搜索到尾！");
		str_Message="提示：已经搜索到尾！！";
		Applet.Forms("frmMessage").Show();
		return;
	}
	var num=Math.floor(find_index_cl/DT_number);
	var curid=find_index_cl%DT_number;
	cur_DT_CL=num*DT_number;
	lstGLSB.Clear();
	var cur_DT_number;
	if(detail_values.length<DT_number+cur_DT_CL)
		cur_DT_number=detail_values.length;
	else
		cur_DT_number=DT_number+cur_DT_CL;
	buildGLSBList(cur_DT_CL,cur_DT_number,lstGLSB,10);
	lstGLSB.ListIndex=curid;
	if(cur_DT_CL!=0)
		obj.Parent.Controls("bntPrevDT").Enabled=true;
	else
		obj.Parent.Controls("bntPrevDT").Enabled=false;
	if(cur_DT_CL+DT_number>detail_values.length)
		obj.Parent.Controls("bntNextDT").Enabled=false;
	else
		obj.Parent.Controls("bntNextDT").Enabled=true;
}
function findPrevCLSB(){
	var obj=ThisEvent.Object;
	var txtFind=obj.Parent.Controls("txtFind");
	var lstGLSB=obj.Parent.Controls("lstGLSB");
	var findSBMC=txtFind.TEXT;
	if(findSBMC==null || findSBMC==""){
		//Application.MessageBox("未找到设备");
		str_Message="提示：请先输入要查找的关键字！！";
		Applet.Forms("frmMessage").Show();
		return;
	}
	var detail_values=DETAILDATA.values;
	var startid=0;
	var findit=false;
	if(find_index_cl>1)startid=find_index_cl-1;
	for(i=startid;i>=0;i--){
		var value=detail_values[i]; 
		var temp=value[2];
		var ifnd=temp.indexOf(findSBMC);
		if(ifnd!=-1){
			find_index_cl=i;
			var findit=true;
			break;
		}
	}
	if(!findit){
		//Application.MessageBox("已经搜索到头！");
		str_Message="提示：已经搜索到头！！";
		Applet.Forms("frmMessage").Show();
		return;
	}
	var num=Math.floor(find_index_cl/DT_number);
	var curid=find_index_cl%DT_number;
	cur_DT_CL=num*DT_number;
	lstGLSB.Clear();
	var cur_DT_number;
	if(detail_values.length<DT_number+cur_DT_CL)
		cur_DT_number=detail_values.length;
	else
		cur_DT_number=DT_number+cur_DT_CL;
	buildGLSBList(cur_DT_CL,cur_DT_number,lstGLSB,10);
	lstGLSB.ListIndex=curid;
	if(cur_DT_CL!=0)
		obj.Parent.Controls("bntPrevDT").Enabled=true;
	else
		obj.Parent.Controls("bntPrevDT").Enabled=false;
	if(cur_DT_CL+DT_number>detail_values.length)
		obj.Parent.Controls("bntNextDT").Enabled=false;
	else
		obj.Parent.Controls("bntNextDT").Enabled=true;
}

//测量记录列表和巡视记录列表公共
function gotoGLSB(){
	var bnt=ThisEvent.Object;
	var temp=bnt.Parent.Controls("lstGLSB").Value;
	if(temp==null || temp==""){
		//Application.MessageBox("请选择关联设备");
		str_Message="提示：请先从列表中选择一个设备，再进行此操作！！";
		Applet.Forms("frmMessage").Show();
		return;
	}
	var temp1=temp.split(",");
	var gisid=temp1[1];
	if(gisid=="NULL"){
		//Application.MessageBox("本设备没有地理图形");
		str_Message="提示：选择的设备没有对应的地理图形，属于无GIS图形设备！！";
		Applet.Forms("frmMessage").Show();
		return;
	}
	var findit=gotoGisPosition(gisid);
	if(!findit){
			//Application.MessageBox("未找到与本设备关联的图形!");
			str_Message="提示：未找到与本设备关联的GIS图形！！";
			Applet.Forms("frmMessage").Show();
	}
	else
		bnt.Parent.Parent.Close();
}
function viewGLSBTaiZhang(){
	var bnt=ThisEvent.Object;
	var temp=bnt.Parent.Controls("lstGLSB").Value;
	if(temp==null || temp==""){
		//Application.MessageBox("请选择关联设备");
		str_Message="提示：请先从列表中选择一个设备，再进行此操作！！";
		Applet.Forms("frmMessage").Show();
		return;
	}
	var temp1=temp.split(",");
	var gisid=temp1[1];
	cur_tzsb_name=getDeviceNameByXZBM(temp1[0]);
	curDeviceInfo=getTaiZhangInfo(gisid);
	if(curDeviceInfo==null){
		//Application.MessageBox("未找到关联的台帐");
		str_Message="提示：没有找到此设备关联的台帐，属于无台帐设备！！";
		Applet.Forms("frmMessage").Show();
	}
	else{
		Applet.Forms("frmDeviceInfo").Show();
	}
}
function clearFindText(){
	var obj=ThisEvent.Object;
	var txtFind=obj.Parent.Controls("txtFind");
	txtFind.Text="";
}
function glsbList_selChange(){
	var obj=ThisEvent.Object;
	var txtFind=obj.Parent.Controls("txtFind");
	var temp=obj.Value;
	var substr=temp.split(",");
	var sbmc=getDeviceNameByXZBM(substr[0]);
	txtFind.Text=sbmc;
}
//巡视任务单有关
function chooseXunShiRenWuDan(){
	Applet.Forms("frmXSRWD").Show();
}
function viewXSRWD_Info(){
	Applet.Forms("frmXSRWD_Info").Show();
}
function initSXRWD_InfoForm(){
	var frmXLXSJH=Applet.Forms("frmXSRWD_Info");
	var pageXSRWD=frmXLXSJH.Pages("pageXSRWD");
	var lstPWXS_XLXSB=pageXSRWD.Controls("lstPWXS_XLXSB");
	lstPWXS_XLXSB.Clear();
	var columns=PWXS_XLXSB.columns;
	var values=PWXS_XLXSB.values;
	for(var i=0;i<columns.length;i++){
		var column=columns[i];
		var value=values[i];
		if(column=="线路名称"){
			pageXSRWD.Controls("txtXLMC").Value=value;
		}
		if(value==null)value=" ";
		lstPWXS_XLXSB.AddItem(column,column+"："+value);
	}
}
function initXSRWDForm(){
	thisForm=Applet.Forms("frmXSRWD");
	thisPage=thisForm.Pages("pageXSRWD");
	thisPage.Controls("txtXSRWD").Text=xsrwd_init_Path;
	thisPage.Controls("lstXSRWD").Clear();
	var myfile;
	myfile = Application.CreateAppObject("file");
	var rt=myfile.Open(xsrwd_init_Path,1);
	var list=new Array();
	var i=0;
	if(rt){
		var values=new Array();
		while(!myfile.EOF){
			var valueStr=myfile.ReadLine();
			i++;
			var temp=valueStr.split(",");
			var xsbh=temp[2];
			var xlmc=temp[3];
			thisPage.Controls("lstXSRWD").AddItem(xsbh,"巡视线路"+i+"： "+xlmc);
		}
		xsrwd_FilePath=xsrwd_init_Path.substring(0,xsrwd_init_Path.lastIndexOf("\\")+1);
	}
	myfile.Close();
}
function openFile(){
	var obj=ThisEvent.Object;
	var fileName=CommonDialog.ShowOpen("\\Program Files\\ArcPad\\Applets","Text Files | *.txt","选择巡视任务");
	obj.Parent.Controls("txtXSRWD").Text=fileName;
	obj.Parent.Controls("lstXSRWD").Clear();
	var fileName=obj.Parent.Controls("txtXSRWD").Text;
	var myfile;
	myfile = Application.CreateAppObject("file");
	var rt=myfile.Open(fileName,1);
	var list=new Array();
	var i=0;
	if(rt==false){
		//Application.MessageBox("打开文件失败!");
		str_Message="提示：打开文件失败！！";
		Applet.Forms("frmMessage").Show();
	}
  	else{
		var values=new Array();
		while(!myfile.EOF){
			var valueStr=myfile.ReadLine();
			i++;
			var temp=valueStr.split(",");
			var xsbh=temp[2];
			var xlmc=temp[3];
			thisPage.Controls("lstXSRWD").AddItem(xsbh,"巡视线路"+i+"： "+xlmc);
		}
		xsrwd_FilePath=fileName.substring(0,fileName.lastIndexOf("\\")+1);
	}
	myfile.Close();
}
function getXSRWD(){
	var obj=ThisEvent.Object;
	var xsrwd=obj.Value;
	xsrwd_FilePath=xsrwd_FilePath+xsrwd;
	Application.WaitCursor(1);
	Map.Open(xsrwd_FilePath+"\\map\\ArcPad.apm");
	readPWXS_XLXSB();
	readLISTCONTENT();
	readDetailData();
	makeTablesInfo();	
	obj.Parent.Parent.Close();
	gotoFirstPositionOnInit();
	//清空巡视内容
	clearXunShiJiLu();
	initParm();
	readXunShiTempFile();
	readNoTZSBXS();
	Application.WaitCursor(-1);
	showToolBar();
}
function gotoFirstPositionOnInit(){
	if(DETAILDATA==null || DETAILDATA.length<2){
		return;
	}
	var values=DETAILDATA.values;
	var value=values[0];
	var gisid=value[4];
	var findit=gotoGisPosition(gisid);
	if(!findit){
			value=values[1];
			gisid=value[4];
			findit=gotoGisPosition(gisid);
	}
}
function gotoFirstPosition(){
	if(DETAILDATA==null || DETAILDATA.length<2){
		//Application.MessageBox("未找到关联设备");
		str_Message="提示：没有找到关联的设备！！";
		Applet.Forms("frmMessage").Show();
		return;
	}
	var values=DETAILDATA.values;
	var value=values[0];
	var gisid=value[4];
	var findit=gotoGisPosition(gisid);
	if(!findit){
			value=values[1];
			gisid=value[4];
			findit=gotoGisPosition(gisid);
	}
	if(!findit)
	{
			//Application.MessageBox("设备没有图形!");
			str_Message="提示：此设备没有GIS图形，属于无图形设备！！";
			Applet.Forms("frmMessage").Show();
	}
}
//设备台帐有关
function deviceIdentify_MapTool(){
	curDeviceInfo=new Array();
	var ii=Map.TrackArrow();
	var obj=ThisEvent.Object;
	for(L = 1; L <= Map.Layers.Count; L++){
		var filePath=Map.Layers(L).FilePath;
		if(Map.Layers(L).LayerFormat == "SHAPEFILE" && filePath.lastIndexOf("GEO_")!=-1 && filePath.lastIndexOf("GEO_QX_REGION")==-1){
			var SelectionLayer=Map.Layers(L);
			var selectedRecords=SelectionLayer.Records;
			var findit=selectedRecords.FindNearestXY(Map.PointerX,Map.PointerY,2,Map.Extent);
			if(findit>0){
				selectedRecords.Bookmark=findit;
				var objCenterPoint = selectedRecords.Fields.Shape.Extent.Center;
				gisid=selectedRecords.Fields.Item("ID").Value;
				cur_tzsb_name=getDeviceNameByGISID(gisid);
				curDeviceInfo=getTaiZhangInfo(gisid);
				if(curDeviceInfo==null){
					//Application.MessageBox("未找到关联的台帐");
					str_Message="提示：没有找到对应此设备的台帐信息！！";
					Applet.Forms("frmMessage").Show();
					return;
				}
				SelectionLayer.Highlight(selectedRecords.Bookmark);
				Applet.Forms("frmDeviceInfo").Show();
				break;
			}
		}
	}
}
function deviceIdentifyClick(){
	
}
function getTaiZhangInfo(gisid){
	Application.WaitCursor(1);
	var filename=getTZFileName();
	var myfile;
	var cur_TAIZHANG_INFO;
  	myfile = Application.CreateAppObject("file");
	var rt=myfile.Open(xsrwd_FilePath+"\\data\\"+filename,1);
	if(rt==true){
		var columnStr=myfile.ReadLine();
		var columns=columnStr.split(",");
		var values=new Array();