📄 default.asp

📁 进销存软件源代码
💻 ASP
字号:
<!-- #include virtual="/eB3KTransaction.asp" -->
<!-- #include file="Common.asp" --><%
dim eBD,rs
dim bdTitle, bdIServerFun

Set eBD = Server.CreateObject("eB3KCommon.BillDocument")
if eBD.bdGetDetailByType(Conn, CLng(bdType), rs) = 1 then
	bdTitle = CStr(rs("BillName"))
	bdIServerFun = CStr(rs("ISVRFUN"))
	set rs = nothing
end if
set eBD = Nothing
%>
<HTML><HEAD><meta http-equiv="Content-Type" content="text/html; charset=gb2312"><LINK REL=stylesheet HREF="/Client/All.css" TYPE="text/css"><script src="/Client/ebComm.js"></script></HEAD>
<script>
var RootID='<%=bdIServerFun%>';
</script>
<script src="/client/ebo.js"></script>
<script src="/client/Request.js"></script>
<script src="/client/IClient.js"></script>
<script src="/client/IServer.js"></script>
<script src="/client/grid.js"></script>
<script src="/client/cbLib.js"></script>
<script src="/client/datectrl.js"></script>
<script>
function change(){
	if(parseInt(searchCode.value.length)==0 || parseInt(startNumber.value)<0 || parseInt(startNumber.value)>15){
		startNumber.value=1;
		endNumber.value=1;
	}else{
		endNumber.value=parseInt(startNumber.value)+(parseInt(searchCode.value.length)-1);
	}
}
</script>
<body leftmargin="0" topmargin="20">
<table border="0" width="450" cellspacing="0" cellpadding="0" align="center">
	<tr><td width="100%">
<table border="0" width="450" cellspacing="0" cellpadding="0" align="center">
	<tr><td width="100%">
		<table border="0" width="100%" cellspacing="0" cellpadding="0">
			<tr><td align=center><%=bdTitle%></td></tr>
			<tr><td width="100%" height="18"></td></tr>
			<tr><td width="100%">状态：<input id="ID" type="hidden" NAME="ID"><input id="State" value="新建" size="30" readonly NAME="State">　<input type="button" value="新建" onClick="ID.value='';State.value='新建';" ID="Button1" NAME="Button1"></td></tr>
			<tr height="26"><td width="100%">查询方法：<input id="Name" size="40" NAME="Name">　<input type="button" value="打开"  onClick="openClick(this)" ID="Button2" NAME="Button2">　<input type="button" value="保存" onClick="saveClick(this)" ID="Button3" NAME="Button3"></td></tr>
			<tr><td width="100%">说明：<input id="Memo" style="width:400px" NAME="Memo"></td></tr>
			<tr><td width="100%" height="18">———————————————————————</td></tr>	
			<tr><td width="100%">日期：<input id=bdhDate size=20>&nbsp;<input type=button value="↓" onclick="dateShow(bdhDate)"></td></tr>
			<tr><td width="100%">搜索：<input id=search size=20></td></tr>
			<tr><td width="100%">
				<table>
					<tr><td>搜索编码：<input type="text" id="searchCode" onchange="change()"></td></tr>
					<tr>
						<td>从第<input type="text" id="startNumber" value="1" size=4 onchange="change()">位到第<input type="text" id="endNumber" size=4 disabled value="1">位
						</td>
					</tr>
				</table>
				<table><tr>
					<td width="45%">
					<input type=checkbox id=stockCheck><span onclick="stockCheck.click()">显示仓库</span>	
					</td>
					<td width="10%"></td>
					<td width="45%">
					<input type=checkbox id="codeCheck"><span onclick="codeCheck.click()">显示货号</span>	
					</td></tr><tr>
					<td width="45%"><div id=bdBodysDetail width=100%></div></td>
					<td width="10%"></td>
					<td width="45%"><div id=bdBodycDetail width=100%></div></td>
				</tr></table>	
				<table>
					<tr>						
						<td width="45%"><input type="checkbox" id="productCheck"><span onclick="productCheck.click()">显示产品</span></td>						
					</tr>
					<tr>
						<td width="45%"><div id=bdBodypDetail width=100%></div></td>
					</tr>
				</table>	
			</td></tr>
			
			<tr><td width="100%" height="14"></td></tr>
			<tr><td width="100%" height="18" align="middle"><input type="button" value="查询" onClick="searchClick(this)">　　<input type="button" value="取消" onClick="Reset()"></td></tr>
		</table></td>
	</tr>
</table>
<iframe id=bdSelectArea width=500 height=500 style="DISPLAY: none" border=0 frameborder=0 framespacing=0 marginheight=0 marginwidth=0></iframe></td></tr></table>
<iframe id=bdSelectArea2 width=500 height=500 style="DISPLAY: none" border=0 frameborder=0 framespacing=0 marginheight=0 marginwidth=0></iframe></td></tr></table>
<iframe id=bdLoadSave width=0 height=0 style="DISPLAY: none" border=0 frameborder=0 framespacing=0 marginheight=0 marginwidth=0></iframe>
<div id=bdPanel width=100 height=60 style="position:absolute; display:none; border:1 solid #000000">
<div id=bdPanelProduct><input type=button value="删除" onclick="panelDelete()"></div>
</div>
</body>
<script>
var flag;
flag=1;
function RadioClick(){
	if (RadioCheck.value=='1') flag=1;
	else flag=0;
}

var sDetail;
var iPanelx=0,iPanely=0,detailName;
bdPanel.style.left=0;
bdPanel.style.top=0;
bdPanel.style.backgroundColor=document.bgColor;

function panelShow(idCtrl,idPanel,idChild,dir){
	var coll=idPanel.all.tags('div');
	for (i=0;i<coll.length;i++){
		if (coll(i)==idChild)
			coll(i).style.display='block';
		else
			coll(i).style.display='none';
	}
	idPanel.style.display='block';
	var rect=idCtrl.getBoundingClientRect();
	var rectPanel=idPanel.getBoundingClientRect();
	idPanel.style.left=rect.right-(rectPanel.right-rectPanel.left);
	idPanel.style.top=idCtrl.getBoundingClientRect().top;
	idPanel.style.left=parseInt(idPanel.style.left)+document.body.scrollLeft;
	idPanel.style.top=parseInt(idPanel.style.top)+document.body.scrollTop;

}
function panelHide(){bdPanel.style.display='none';}
function panelDelete(){
	panelHide();
	detailName.remove(iPanelx);
	detailName.refreshAll(1,0);
}


function cbStockSelect(ifrid, fun, data){
	if (fun=='data'){
		var i
		for (i=0;i<sDetail.data.length;i++){
			if (sDetail.data[i][0]==data[0]){
			alert ("该仓库已选择！！");
			return;}
		}
		sDetail.append(data[0],data[1]);
		sDetail.refreshAll();
		return;
	}
	search.value='';
	return defcbiFrame(ifrid, fun, data);
}
function cbProductSelect(ifrid, fun, data){
	if (fun=='data'){
		var i
		for (i=0;i<pDetail.data.length;i++){
			if (pDetail.data[i][0]==data[0]){
			alert ("该产品已选择！！");
			return;}
		}
		pDetail.append(data[0],data[1],data[2]);
		pDetail.refreshAll();
		return;
	}
	search.value='';
	return defcbiFrame(ifrid, fun, data);
}

function cbCodeSelect(ifrid, fun, data){
	if (fun=='data'){
		var i
		for (i=0;i<cDetail.data.length;i++){
			if (cDetail.data[i][0]==data[0]){
			alert ("该货号已选择！！");
			return;}
		}
		cDetail.append(data[0],data[1]);
		cDetail.refreshAll(1,0);
		return;
	}
	search.value='';
	return defcbiFrame(ifrid, fun, data);
}
function ecbpDetail(eo,szEvent,x,y){
	if (szEvent=='MOUSECLICK'){
		iPanelx=eo.showpos+x;
		detailName=eo;
		if (pDetail.data.length>=pDetail.rows-1)pDetail.btnPageDown_onclick();
		if (iPanelx>=eo.data.length){
			followControl(eo.grid.rows(x+1).cells(y),getFrameElement(bdSelectArea2));
			IServer(bdSelectArea2,'Product.Open','Find='+search.value,cbProductSelect);
		}
		else panelShow(eo.grid.rows(x+1).cells(y+1),bdPanel,bdPanelProduct,1);
	}
}

function ecbCodeDetail(eo,szEvent,x,y){
	if (szEvent=='MOUSECLICK'){
		iPanelx=eo.showpos+x;
		detailName=eo;
		if (cDetail.data.length>=cDetail.rows-1)cDetail.btnPageDown_onclick();
		if (iPanelx>=eo.data.length){
			followControl(eo.grid.rows(x+1).cells(y+1),getFrameElement(bdSelectArea2));
			IServer(bdSelectArea2,'GoodsCode.Open','find='+escape(search.value),cbCodeSelect);
		}
		else panelShow(eo.grid.rows(x+1).cells(y+1),bdPanel,bdPanelProduct,1);
	}
}
function ecbsDetail(eo,szEvent,x,y){
	if (szEvent=='MOUSECLICK'){
		iPanelx=eo.showpos+x;
		detailName=eo;
		if (sDetail.data.length>=sDetail.rows-1)sDetail.btnPageDown_onclick();
		if (iPanelx>=eo.data.length){
			followControl(eo.grid.rows(x+1).cells(y+1),getFrameElement(bdSelectArea2));
			IServer(bdSelectArea2,'Stock.OpenJXB','flag='+flag+'&Find='+search.value,cbStockSelect);
		}
		else panelShow(eo.grid.rows(x+1).cells(y+1),bdPanel,bdPanelProduct,1);
	}
}


sDetail = new ZYDGRID(new ZYDGRIDFORIEBUG(),bdBodysDetail,4,2,'100%','',1,testUndefine,testUndefine,ecbsDetail);
sDetail.title[0].text='№';
sDetail.title[1].text='序号';
sDetail.title[1].width=1;
sDetail.title[2].text='仓库';
sDetail.title[2].width=120;
sDetail.refreshAll();

pDetail = new ZYDGRID(new ZYDGRIDFORIEBUG(),bdBodypDetail,4,3,'100%','',1,testUndefine,testUndefine,ecbpDetail);
pDetail.title[0].text='№';
pDetail.title[1].text='序号';
pDetail.title[1].width=1;
pDetail.title[2].text='编号';
pDetail.title[2].width=130;
pDetail.title[3].text='商品';
pDetail.title[3].width=250;
pDetail.refreshAll();

cDetail = new ZYDGRID(new ZYDGRIDFORIEBUG(),bdBodycDetail,4,2,'100%','',1,testUndefine,testUndefine,ecbCodeDetail);
cDetail.title[0].text='№';
cDetail.title[1].text='序号';
cDetail.title[1].width=1;
cDetail.title[2].text='货号';
cDetail.title[2].width=150;
cDetail.refreshAll();

var userSaveCtrl
function cbCommonSelect(ifrid, fun, data){
	if (fun=='data'){
		var i
		for (i=0;i<gDetail.data.length;i++){
			if (gDetail.data[i][0]==data[0]){
			alert ("该权限已选择！！");
			return;}
		}
		gDetail.append(data[0],data[1]);
		gDetail.refreshAll();
		return;
	}
	return defcbiFrame(ifrid, fun, data);
}

function purClick(obj,idCtrl){
	obj.disabled=true;
	followControl(idCtrl,getFrameElement(bdSelectArea2));
	userSaveCtrl=idCtrl;
	IServer(bdSelectArea2,'Privilege.Open','find='+escape(idCtrl.value),cbCommonSelect);
	obj.disabled=false;
}


var indata;

function cbLoad(ifrid, fun, data){
	if (fun=='data'){
		indata=data;
		eboSet();
		sDetail.refreshAll(1,0);
		pDetail.refreshAll(1,0);
		cDetail.refreshAll(1,0);
		return;
	}
}

function loadClick(id){
	if (!isNaN(parseInt(id)) && parseInt(id)!=0)
		IServer(bdLoadSave,RootID+'.Load','ID='+id,cbLoad);
}

loadClick(request('ID'));

function cbSave(ifrid, fun, data){
	if (fun=='data'){
		if (isNaN(parseInt(data[0]))||parseInt(data[0])==0)
			alert('保存失败！');
		else{
			ID.value=data[0];
			alert('保存成功！');
			State.value='修改';
		}
		return;
	}
}

function saveClick(obj){
	obj.disabled=true;
	eboGet();
	IServer(bdLoadSave,RootID+'.Save',outdata,cbSave);
	outdata=new Array();
	obj.disabled=false;
}

function cbOpen(ifrid, fun, data){
	if (fun=='data'){
		loadClick(data[0]);
		State.value='修改';
		return;
	}
	return defcbiFrame(ifrid, fun, data);
}

function openClick(obj){
	obj.disabled=true;
	followControl(Name,getFrameElement(bdSelectArea));
	IServer(bdSelectArea,RootID+'.Open','',cbOpen);
	obj.disabled=false;
}

function cbSearch(ifrid, fun, data){
	if (fun=='start')
		ifrid.document.title=getMainTitle();
}

function searchClick(obj){
	obj.disabled=true;
	eboGet();
	var newindow=window.open('', 'liwei','toolbar=no,directories=no menubar=no,scrollbars=yes,resizable=yes,location=no,width=780,height=496,left=0,top=44');
	IServer(newindow,'StockReport.Search',outdata,cbSearch);
	outdata=new Array();
	obj.disabled=false;
}


function Reset(){
	var i;
	for (i=0;i<_ebo.length;i++){
		_ebo[i].id.value='';
		sDetail.data.length=0;
		sDetail.refreshAll(1,0);
		pDetail.data.length=0;
		pDetail.refreshAll(1,0);
		cDetail.data.length=0;
		cDetail.refreshAll(1,0);
	}
}

function ssdetailproc(method,ebo){
	switch (method){
		case EBO_GET:
			outdata[outdata.length]=ebo.serversidename+'_rows';
			outdata[outdata.length]=ebo.id.data.length;
			outdata[outdata.length]=ebo.serversidename+'_cols';
			outdata[outdata.length]=ebo.id.data.length;
			for (var i=0;i<ebo.id.data.length;i++){
				for (var j=0;j<ebo.id.data[i].length;j++){
					outdata[outdata.length]=ebo.serversidename+'_'+j+'_'+i;
					outdata[outdata.length]=ebo.id.data[i][j];
				}
			}
			break;
		case EBO_SET:
			var rows=parseInt(indata.item('Detail_rows'));
			var cols=parseInt(indata.item('Detail_cols'));
			ebo.id.data.length=0;
			for (var i=0;i<rows;i++){
				if (indata.item('Switch_'+i)==ebo.userData){
					var icount=ebo.id.data.length
					ebo.id.data[icount]=new Array();
					for (var j=0;j<cols;j++)
						ebo.id.data[icount][j]=indata.item('Detail_'+j+'_'+i);
				}
			};
		default:
			break;
	}
	return (true);
}

</script>

<script Title="eboReg">

eboReg('ID',ID,'',deftextproc);
eboReg('Name',Name,'',deftextproc);
eboReg('Date',bdhDate,'',deftextproc);
eboReg('Memo',Memo,'',deftextproc);

eboReg('stockCheck',stockCheck,'',defcheckproc);
eboReg('productCheck',productCheck,'',defcheckproc);
eboReg('codeCheck',codeCheck,'',defcheckproc);
eboReg('sDetail',sDetail,'0',ssdetailproc);
eboReg('pDetail',pDetail,'1',ssdetailproc);
eboReg('cDetail',cDetail,'2',ssdetailproc);
eboReg('searchCode',searchCode,'',deftextproc);
eboReg('startNumber',startNumber,'',deftextproc);
eboReg('endNumber',endNumber,'',deftextproc);

</script>


</html>
💿 文件大小 4916 K
👤 上传用户 heyuyutu
📂 所属分类 Java编程
🏷️ 相关标签

#进销 #软件源代码
⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -