📄 default.asp

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

Set eBI = Server.CreateObject("eB3KCommon.BaseInfo")
if eBI.biGetDetailByType(Conn, CLng(biType), rs) = 1 then
	biTitle = CStr(rs("InfoName"))
	biIServerFun = CStr(rs("ISVRFUN"))
	set rs = nothing
end if
set eBI = 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='<%=biIServerFun%>';
	</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>
	<BODY>
		<div id="bdMenu">
		</div>
		<div id="bdHead">
			<table border="0" width="100%" cellspacing="0" cellpadding="0" align="center">
				<tr>
					<td colspan="4" align="middle" height="18"><%=biTitle%></td>
				</tr>
				<tr>
					<td colspan="4" height="18"><input id="hidVar" value="0" type="hidden"></td>
				</tr>
				<tr width="100%">
					<td width="25%">仓库：<input id="Stock" type="hidden"><input id="StockText" size="25">&nbsp;<input type="button" value="搜索" onClick="stockClick(this,StockText,Stock)"></td>
					<td width="25%">已设定产品编号：<input id="ProductCode" size="25">&nbsp;<input type="button" value="读入" onclick="readClick(this)"></td>
					<td width="25%">已设定产品名称：<input id="ProductTitle" size="25">&nbsp;<input type="button" value="读入" onclick="readClick(this)"></td>
				<tr>
					<td colspan="4">
						搜索：<input id="search" size="25"></td>
				</tr>
			</table>
		</div>
		<br>
		<div id="bdBodyDetail" width="100%"></div>
		<br>
		<div id="bdControl">
			<table border="0" width="100%" cellspacing="0" cellpadding="0" align="Center">
				<tr>
				    <td width="5%" align=left>集体设置：</td>
					<td width="20%" align="left">一级期限：<input id="OneDay" size="10"></td>
					<td width="20%" align="left">二级期限：<input id="TwoDay" size="10"></td>
					<td width="20%" align="left">三级期限：<input id="ThreeDay" size="10"></td>
				</tr>
				<tr>
				     <td width="5%" align=left>&nbsp;</td>
					<td width="20%" align="left">一级销售比率：<input id="OneSaleRate" size="10"></td>
					<td width="20%" align="left">二级销售比率：<input id="TwoSaleRate" size="10"></td>
					<td width="20%" align="left">三级销售比率：<input id="ThreeSaleRate" size="10"></td>
				</tr>
			</table>
			<br>
			<table border="0" width="100%" cellspacing="0" cellpadding="0" align="Center">
				<tr>
					<td width="100%" height="18" align="middle">
					    <input type="button" value="保存" onClick="saveClick(this,Stock)">
						<input type="button" value="重置" onClick="Reset()"> <input type="button" value="个别设置" id="set" onclick="changeClick(this)" ID="Button6" NAME="Button6">
					</td>
				</tr>
			</table>
		</div>
		<iframe id="bdSelectArea2" width="500" height="500" style="DISPLAY: none" border="0" frameborder="0" framespacing="0" marginheight="0" marginwidth="0"></iframe>
		<iframe id="bdSelectArea" width="500" height="500" style="DISPLAY: none" border="0" frameborder="0" framespacing="0" marginheight="0" marginwidth="0"></iframe>
		<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="bdPanelMemo"><input id="txtMemo" size="30" OnFocus="this.select()" OnKeyPress="EnterKeyDo(panelMemoModify)" NAME="txtMemo">&nbsp;<input type="button" value="确定" onclick="panelMemoModify()" ID="Button1" NAME="Button1">&nbsp;<input type="button" value="删除" onclick="panelDelete()" ID="Button2" NAME="Button2"></div>
			<div id="bdPanelNumeric"><input id="txtNumeric" size="10" OnFocus="this.select()" OnKeyPress="EnterKeyDo(panelNumericModify)" NAME="txtNumeric">&nbsp;<input type="button" value="确定" onclick="panelNumericModify()" ID="Button3" NAME="Button3">&nbsp;<input type="button" value="删除" onclick="panelDelete()" ID="Button4" NAME="Button4"></div>
			<div id="bdPanelProduct"><input type="button" value="删除" onclick="panelDelete()"></div>
		</div>
	</BODY>
	<script>
function changehidVar(){
     if (hidVar.value==0){
         set.value='个别设置';
     }
     else{
         set.value=='集体设置';
     }
}

function changeClick(){
	if (set.value=='集体设置'){
		set.value='个别设置';
		hidVar.value=0;
	}
	else{
		set.value='集体设置';
		hidVar.value=1;
	}
}
function cbRead(ifrid, fun, data){
	if (fun=='data'){	
	        gDetail.data.length=0;		
		for(var i=0;i<data.length;i=i+10){
			for (var j=0;j<gDetail.data.length;j++){
				if (gDetail.data[j][0]==data[i] ){
					alert('记录重复！');
					return;
				}
			}
			gDetail.append(data[i],data[i+1],data[i+2],data[i+3],data[i+4],data[i+5],data[i+6],data[i+7],data[i+8],data[i+9]);		
			gDetail.refreshAll(1,0);
		}
		gDetail.calcTotal();
		gDetail.refreshAll(1,0);
		return;
	}
}

function readClick(obj){
	 if (Stock.value.length==0){
			alert ('请选择仓库！');
			return;
	}
	obj.disabled=true;	
	IServer(bdLoadSave,RootID+'.Read','Stock='+Stock.value +'&ProductCode='+ProductCode.value+'&ProductTitle='+ProductTitle.value,cbRead);
	obj.disabled=false;
}

function EnterKeyDo(doFun){if (window.event.keyCode==13)doFun();}

var gDetail,iPanelx=0,iPanely=0;
	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();
	switch(dir){
		case 1:
			idPanel.style.left=rect.right-(rectPanel.right-rectPanel.left);
			idPanel.style.top=idCtrl.getBoundingClientRect().top;
			break;
		case 2:
			idPanel.style.left=rect.left;
			idPanel.style.top=rect.bottom;
			break;
		case 3:
			idPanel.style.left=rect.right-rectPanel.right-rectPanel.left;
			idPanel.style.top=rect.bottom;
			break;
		default:
			idPanel.style.left=rect.left;
			idPanel.style.top=rect.top;
	}
}

function ecbDetail(eo,szEvent,x,y){
	if (szEvent=='MOUSECLICK'){
		if (bdPanel.style.display=='block') return panelHide();
		iPanelx=gDetail.showpos+x;
		iPanely=y;
		if (iPanelx>=gDetail.data.length)
		{
			if (y==2 || y==3)				
			switch(y){
				case 2:	
				case 3:		
					followControl(eo.grid.rows(x+1).cells(y+1),getFrameElement(bdSelectArea2));
					IServer(bdSelectArea2,'Product.Openv4','find='+escape(search.value),cbProductSelect);
					break;
				}
		}
		else
		{		//有数据
			switch(y){
				case 2:	
				case 3:		
				     panelShow(eo.grid.rows(x+1).cells(y+1),bdPanel,bdPanelProduct,1);
				     break;
				case 4:
				case 5:
				case 6:
				case 7:
				case 8:
				case 9:
					txtNumeric.value=gDetail.data[iPanelx][iPanely];
					panelShow(eo.grid.rows(x+1).cells(y+1),bdPanel,bdPanelNumeric);
					txtNumeric.focus();
					break;
			}
		}//if
	}//if
}


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

function cbProductSelect1(ifrid, fun, data){
	if (fun=='data'){
		var i		
		gDetail.data[iPanelx][3]=data[0];
		gDetail.data[iPanelx][4]=data[1];
		gDetail.data[iPanelx][5]=data[2];		
		gDetail.refreshAll();
		return;
	}
	search.value='';
	return defcbiFrame(ifrid, fun, data);
}


function panelHide(){bdPanel.style.display='none';}
function panelDelete(){
	panelHide();
	gDetail.remove(iPanelx);
	gDetail.refreshAll(1,0);
}
function panelMemoModify(){
	panelHide();
	if (iPanelx<gDetail.data.length){
		gDetail.data[iPanelx][iPanely]=txtMemo.value;
		gDetail.refreshAll(1,0);
	}
}
function panelNumericModify(){
	panelHide();
	if (iPanelx<gDetail.data.length){
		if (isNaN(parseFloat(txtNumeric.value)))
			gDetail.data[iPanelx][iPanely]=0;
		else
			gDetail.data[iPanelx][iPanely]=txtNumeric.value;
	
		gDetail.calcTotal();
		gDetail.refreshAll(1,0);
	}
}


gDetail = new ZYDGRID(new ZYDGRIDFORIEBUG(),bdBodyDetail,10,10,'100%','',1,testUndefine,testUndefine,ecbDetail);
gDetail.title[0].text='№';
gDetail.title[1].text='序号';
gDetail.title[1].width=1;
gDetail.title[2].text='产品ID';
gDetail.title[2].width=1;
gDetail.title[3].text='产品编号';
gDetail.title[3].width=100;
gDetail.title[4].text='产品名称';
gDetail.title[4].width=120;
gDetail.title[4].formAlign='right';
gDetail.title[5].text='一级期限';
gDetail.title[5].width=80;
gDetail.title[5].formAlign='right';
gDetail.title[6].text='一级销售比率（%）';
gDetail.title[6].width=140;
gDetail.title[6].formAlign='right';
gDetail.title[7].text='二级期限';
gDetail.title[7].width=80;
gDetail.title[7].formAlign='right';
gDetail.title[8].text='二级销售比率（%）';
gDetail.title[8].width=140;
gDetail.title[8].formAlign='right';
gDetail.title[9].text='三级期限';
gDetail.title[9].width=80;
gDetail.title[9].formAlign='right';
gDetail.title[10].text='三级销售比率（%）';
gDetail.title[10].width=140;
gDetail.title[10].formAlign='right';
gDetail.refreshAll();


function cbSave(ifrid, fun, data){
	if (fun=='data'){
		for (var i=0;i<data.length;i++)
			if (isNaN(parseInt(data[i]))||parseInt(data[i])==0){
				alert('保存失败！');
				break;
			}
			else{
				gDetail.data[i][0]=data[i];			
			}
		if (i>=data.length)
			alert('保存成功！');
		gDetail.calcTotal();
		gDetail.refreshAll(1,0);
		return;
	}
}
function saveClick(obj,Stock){
    if (Stock.value.length==0){
			alert ('请选择仓库！');
			return;
	}
 if (gDetail.data.length==0){
			alert ('请选择产品！');
			return;
	}
	obj.disabled=true;
	eboGet();	
	IServer(bdLoadSave,RootID+'.Save',outdata,cbSave);
	outdata=new Array();
	obj.disabled=false;
}

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

var userSaveCtrl, userSaveHidden;
function cbCommonSelect(ifrid, fun, data){
	if (fun=='data'){
		userSaveHidden.value=data[0];
		userSaveCtrl.value=data[1];
		return;
	}
	return defcbiFrame(ifrid, fun, data);
}

function cbCommonSelect1(ifrid, fun, data){
	if (fun=='data'){
		userSaveHidden.value=data[0];
		userSaveCtrl.value=data[2];
		return;
	}
	return defcbiFrame(ifrid, fun, data);
}

function stockClick(obj,idCtrl,idCtrlHidden){
	obj.disabled=true;
	followControl(idCtrl,getFrameElement(bdSelectArea2));
	userSaveCtrl=idCtrl;
	userSaveHidden=idCtrlHidden;
	IServer(bdSelectArea2,'Stock.OpenChildOutStock','find='+escape(idCtrl.value),cbCommonSelect);
	obj.disabled=false;
}

function productClick(obj,idCtrl,idCtrlHidden){
	obj.disabled=true;
	followControl(idCtrl,getFrameElement(bdSelectArea2));
	userSaveCtrl=idCtrl;
	userSaveHidden=idCtrlHidden;
	IServer(bdSelectArea2,'Product.Open','find='+escape(idCtrl.value),cbCommonSelect1);
	obj.disabled=false;
}

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

function unshowFrameElement(){
	for (var i=0;i<document.all.length;i++)
		if (document.all(i).tagName=='IFRAME')
			document.all(i).style.display='none';
}
document.onclick=unshowFrameElement;
	</script>
	<script Title="eboReg">
eboReg('Stock',Stock,'',deftextproc);
eboReg('StockText',StockText,'',deftextproc);
eboReg('ProductCode',ProductCode,'',deftextproc);
eboReg('ProductTitle',ProductTitle,'',deftextproc);
eboReg('hidVar',hidVar,'',deftextproc);//隐藏变量
eboReg('OneDay',OneDay,'',deftextproc);
eboReg('TwoDay',TwoDay,'',deftextproc);
eboReg('ThreeDay',ThreeDay,'',deftextproc);
eboReg('OneSaleRate',OneSaleRate,'',deftextproc);
eboReg('TwoSaleRate',TwoSaleRate,'',deftextproc);
eboReg('ThreeSaleRate',ThreeSaleRate,'',deftextproc);
eboReg('Detail',gDetail,'',defdetailproc);
	</script>
</HTML>
⌨️ 快捷键说明

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