⭐ 欢迎来到虫虫下载站！ | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站
📤 上传资源

📄 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>
<BODY>
<div id=bdMenu>
</div>

<div id=bdHead>
<INPUT id=bdID type=hidden>
<TABLE cellSpacing=1 cellPadding=1 width="100%">
<TR><TD colspan=3 align=middle><%=bdTitle%></TD></TR>
<TR><TD width="33%">日期：<input id=bdhDate 
     >&nbsp;<input type=button value="↓" onclick="dateShow(bdhDate)"></TD>
<TD>附件数：<INPUT id=bdhAttachment size=6></TD>
<TD width="33%">自编号：<INPUT id=bdUserID size=6></TD></TR>
<TR><TD colspan=2>凭证摘要：<input id=bdhMemo size=60></TD><TD>搜索：<input id=search></TD></TR>
</TABLE>
</div>

<div id=bdBodyDetail width="100%"></div>

<div id=bdFoot>
<TABLE cellSpacing=1 cellPadding=1 width="100%">
<TR><TD width="33%">制单：<input id=bdfOwner size=10></TD>
<TD width="33%">审核：<input id=bdfAuditor size=10></TD><TD width="33%"></TD></TR>
</TABLE>
</div>
<br>
<div id=bdControl>
<input type=button value="保存" onclick="saveClick(this)">&nbsp;<input type=button value="打开" onclick="openClick(this)">&nbsp;<input type=button value="审核" onclick="auditClick(this)">&nbsp;<input type=button value="预览" onclick="printClick(1)">&nbsp;<input type=button value="打印" onclick="printClick(0)">
</div>
<iframe id=bdSelectArea width=500 height=500 style="DISPLAY: none" border=0 frameborder=0 framespacing=0 marginheight=0 marginwidth=0></iframe>
<iframe id=bdSelectArea2 width=500 height=500 style="DISPLAY: none" border=0 frameborder=0 framespacing=0 marginheight=0 marginwidth=0></iframe>
<iframe id=bdLoadSave width=500 height=500 style="DISPLAY: none" border=0 frameborder=0 framespacing=0 marginheight=0 marginwidth=0></iframe>
<div id=bdPanel width="100" height="60" style="BORDER-BOTTOM: #000000 1px solid; BORDER-LEFT: #000000 1px solid; BORDER-RIGHT: #000000 1px solid; BORDER-TOP: #000000 1px solid; DISPLAY: none; POSITION: absolute">
<div id=bdPanelMemo><input id=txtMemo size=15 OnKeyPress="EnterKeyDo(panelMemoModify)">&nbsp;<input type=button value="确定" onclick="panelMemoModify()">&nbsp;<input type=button value="删除" onclick="panelDelete()"></div>
<div id=bdPanelNumeric><input id=txtNumeric size=10 OnKeyPress="EnterKeyDo(panelNumericModify)">&nbsp;<input type=button value="确定" onclick="panelNumericModify()">&nbsp;<input type=button value="删除" onclick="panelDelete()"></div>
<div id=bdPanelSubject><input type=button value="选择科目">&nbsp;<input type=button value="删除" onclick="panelDelete()"></div>
<div id=bdPanelButton><input type=button value="查看" onclick="panelSee()"></div>
</div>
</BODY>
<script>
function printClick(fun){
	if (bdID.value.length==0) alert ('请打开要打印的单据！！');
	else
		if (!fun) window.open('/server/'+RootID+'/Print/default.asp?ID='+bdID.value+'&t='+new Date().valueOf(),'_blank');
		else window.open('/server/'+RootID+'/Print/default.asp?Preview=1&ID='+bdID.value+'&t='+new Date().valueOf(),'_blank');
}

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;
	}
	idPanel.style.left=parseInt(idPanel.style.left)+document.body.scrollLeft;
	idPanel.style.top=parseInt(idPanel.style.top)+document.body.scrollTop;
}

function cbSubjectSelect(ifrid, fun, data){
	if (fun=='data'){
		gDetail.data[iPanelx][1]=data[0];
		gDetail.data[iPanelx][2]=data[1];
		if (data[2].indexOf("-")!=-1){
			gDetail.data[iPanelx][3]=data[2].slice(0,data[2].indexOf("-"));
		}else{
			gDetail.data[iPanelx][3]=data[2];
		}
		if (data[2].indexOf("-")!=-1){
			gDetail.data[iPanelx][4]=data[2].slice(data[2].indexOf("-")+1);
		}else{
			gDetail.data[iPanelx][4]='';
		}
		gDetail.refreshAll(1,0);
		return;
	}
	search.value='';
	return defcbiFrame(ifrid, fun, data);
}

function cbPaymentSelect(ifrid, fun, data){
	if (fun=='data'){
		gDetail.data[iPanelx][8]=data[0];
		gDetail.data[iPanelx][9]=data[1];
		gDetail.refreshAll(1,0);
		return;
	}
	search.value='';
	return defcbiFrame(ifrid, fun, data);
}

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){
			iPanelx=gDetail.data.length;
			gDetail.append('','','','','','','','');
		}
		//有数据
		switch(y){
			case 0:
				txtMemo.value=gDetail.data[iPanelx][iPanely];
				panelShow(eo.grid.rows(x+1).cells(y+1),bdPanel,bdPanelMemo);
				txtMemo.focus();
				break;
			case 1:
			case 2:
			case 3:
			case 4:
				followControl(eo.grid.rows(x+1).cells(y+1),getFrameElement(bdSelectArea2));
				IServer(bdSelectArea2,'Subject.Open','DisPlay=1&Find='+search.value,cbSubjectSelect);
				break;
			case 5:
			case 6:
			case 7:
				txtNumeric.value=gDetail.data[iPanelx][iPanely];
				panelShow(eo.grid.rows(x+1).cells(y+1),bdPanel,bdPanelNumeric);
				txtNumeric.focus();
				break;
			case 8:
			case 9:
				followControl(eo.grid.rows(x+1).cells(y+1),getFrameElement(bdSelectArea2));
				IServer(bdSelectArea2,'Payment.Open','Find='+search.value,cbPaymentSelect);
				break;
			case 10:
				txtMemo.value=gDetail.data[iPanelx][iPanely];
				panelShow(eo.grid.rows(x+1).cells(y+1),bdPanel,bdPanelMemo);
				txtMemo.focus();
				break;
		}
		return true;
	}
	if (szEvent=='RIGHTCLICK'){
		iPanelx=eo.showpos+x;
		detailName=eo;
		panelShow(eo.grid.rows(x+1).cells(y+1),bdPanel,bdPanelButton,1);
		return true;
	}
}
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))){
			if (txtNumeric.value.length==0)
				gDetail.data[iPanelx][iPanely]='';
			else
				gDetail.data[iPanelx][iPanely]=0;
		}
		else
			gDetail.data[iPanelx][iPanely]=txtNumeric.value;
		gDetail.calcTotal();
		gDetail.refreshAll(1,0);
	}
}
function cbSeeLoad(ifrid, fun, data){
	if (fun=='start')
		ifrid.document.title=getMainTitle();
}

function panelSee(){
	panelHide();
	if (gDetail.data[iPanelx][12].length!=0){
		if (gDetail.data[iPanelx][11].length!=0){
			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');
			if (gDetail.data[iPanelx][12]==1) IServer(newindow,'OutStock','ID='+gDetail.data[iPanelx][11],cbSeeLoad);
			if (gDetail.data[iPanelx][12]==15) IServer(newindow,'InStockJXB','ID='+gDetail.data[iPanelx][11],cbSeeLoad);
		}
	}
}

function voucherdetailproc(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++){
					if (j==3||j==2||j==4||j==9) continue;
					outdata[outdata.length]=ebo.serversidename+'_'+j+'_'+i;
					outdata[outdata.length]=ebo.id.data[i][j];
				}
			}
			break;
		case EBO_SET:
			var rows=parseInt(indata.item(ebo.serversidename+'_rows'));
			var cols=parseInt(indata.item(ebo.serversidename+'_cols'));
			ebo.id.data.length=0;
			for (var i=0;i<rows;i++){
				ebo.id.data[i]=new Array();
				for (var j=0;j<cols;j++){
					switch(j){
						case 3:
							ebo.id.data[i][j]=indata.item(ebo.serversidename+'_'+j+'_'+i);
							if (indata.item(ebo.serversidename+'_'+j+'_'+i).indexOf('-')!=-1)
								ebo.id.data[i][j]=indata.item(ebo.serversidename+'_'+j+'_'+i).slice(0,indata.item(ebo.serversidename+'_'+j+'_'+i).indexOf('-'));
							else
								ebo.id.data[i][j]=indata.item(ebo.serversidename+'_'+j+'_'+i);
							break;
						case 4:
							if (indata.item(ebo.serversidename+'_'+j+'_'+i).indexOf('-')!=-1)
								ebo.id.data[i][j]=indata.item(ebo.serversidename+'_'+j+'_'+i).slice(indata.item(ebo.serversidename+'_'+j+'_'+i).indexOf('-')+1);
							else
								ebo.id.data[i][j]='';
							break;
						case 5:
							if (parseFloat(indata.item(ebo.serversidename+'_'+j+'_'+i))==0)
								ebo.id.data[i][j]='';
							else
								ebo.id.data[i][j]=indata.item(ebo.serversidename+'_'+j+'_'+i);
							break;
						case 6:
							if (parseFloat(indata.item(ebo.serversidename+'_100_'+i))==0)
								ebo.id.data[i][j]=indata.item(ebo.serversidename+'_'+j+'_'+i);
							else
								ebo.id.data[i][j]='';
							break;
						case 7:
							if (parseFloat(indata.item(ebo.serversidename+'_100_'+i))!=0)
								ebo.id.data[i][j]=indata.item(ebo.serversidename+'_'+j+'_'+i);
							else
								ebo.id.data[i][j]='';
							break;
						default:
							ebo.id.data[i][j]=indata.item(ebo.serversidename+'_'+j+'_'+i);
					}
				}
			}
			break;
		default:
			break;
	}
	return (true);
}

gDetail = new ZYDGRID(new ZYDGRIDFORIEBUG(),bdBodyDetail,10,11,'100%','',1,testUndefine,testUndefine,ecbDetail);
gDetail.title[0].text='№';
gDetail.title[1].text='备注';
gDetail.title[1].width=150;
gDetail.title[2].text='编号';
gDetail.title[2].width=1;
gDetail.title[3].text='编码';
gDetail.title[3].width=80;
gDetail.title[4].text='一级科目';
gDetail.title[4].width=80;
gDetail.title[5].text='明细科目';
gDetail.title[5].width=120;
gDetail.title[6].text='数量';
gDetail.title[6].width=40;
gDetail.title[6].isNumeric=1;
gDetail.title[6].formAlign='right';
gDetail.title[7].text='借方';
gDetail.title[7].width=80;
gDetail.title[7].isNumeric=1;
gDetail.title[7].isTotal=1;
gDetail.title[7].formAlign='right';
gDetail.title[8].text='贷方';
gDetail.title[8].width=80;
gDetail.title[8].isNumeric=1;
gDetail.title[8].isTotal=1;
gDetail.title[8].formAlign='right';
gDetail.title[9].text='结算代码';
gDetail.title[9].width=1;
gDetail.title[10].text='结算方式';
gDetail.title[10].width=80;
gDetail.title[11].text='票据号码';
gDetail.title[11].width=120;
gDetail.refreshAll();

function cbAudit(ifrid, fun, data){
	if (fun=='data'){
		if (data=='1')
			alert('成功！');
		else
			alert('失败！');
		return;
	}
}

function auditClick(obj){
	obj.disabled=true;
	IServer(bdLoadSave,RootID+'.Audit','ID='+bdID.value,cbAudit);
	obj.disabled=false;
}

function cbAuditUndo(ifrid, fun, data){
	if (fun=='data'){
		if (data=='1')
			alert('成功！');
		else
			alert('失败！');
		return;
	}
}

function auditUndoClick(obj){
	obj.disabled=true;
	IServer(bdLoadSave,RootID+'.AuditUndo','ID='+bdID.value,cbAuditUndo);
	obj.disabled=false;
}

function cbLoad(ifrid, fun, data){
	if (fun=='data'){
		indata=data;
		eboSet();
		gDetail.calcTotal();
		gDetail.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{
			bdID.value=data[0];
			alert('保存成功！');
		}
		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]);
		return;
	}
	return defcbiFrame(ifrid, fun, data);
}

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

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 userClick(obj,idCtrl){
	obj.disabled=true;
	followControl(idCtrl,getFrameElement(bdSelectArea2));
	userSaveCtrl=idCtrl;
	IServer(bdSelectArea2,'User','find='+escape(idCtrl.value),cbCommonSelect);
	obj.disabled=false;
}
function operatorClick(obj,idCtrl,idCtrlHidden){
	obj.disabled=true;
	followControl(idCtrl,getFrameElement(bdSelectArea2));
	userSaveCtrl=idCtrl;
	userSaveHidden=idCtrlHidden;
	IServer(bdSelectArea2,'Operator.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('ID',bdID,'',deftextproc);
eboReg('UserID',bdUserID,'',deftextproc);
eboReg('Date',bdhDate,'',deftextproc);
eboReg('Memo',bdhMemo,'',deftextproc);
eboReg('Attachment',bdhAttachment,'',deftextproc);
eboReg('Owner',bdfOwner,'',deftextproc);
eboReg('Auditor',bdfAuditor,'',deftextproc);
eboReg('Detail',gDetail,'',voucherdetailproc);
</script>
</HTML>
<html></html>

⌨️ 快捷键说明

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