📄 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 type=hidden id=bdID>
<TABLE cellSpacing=1 cellPadding=1 width=100%>
<TR><TD colspan=3 align=center><%=bdTitle%></TD></TR>
<TR><TD colspan=2>供应商：<input id=bdhSource type=hidden><input id=bdhSourceText  size=30>&nbsp;<INPUT type="button" value="搜索" onclick="corpSCCClick(this,bdhSourceText,bdhSource)"></TD>
<TD>自编号：<INPUT id=bdhUserID size=6></TD></TR>
<TR><TD width=33%>业务员：<input type=hidden id=bdhOperator><input id=bdhOperatorText size=10>&nbsp;<INPUT type="button" value="搜索" onclick="operatorClick(this,bdhOperatorText,bdhOperator)"></TD>
<TD width=33%>出纳：<input type=hidden id=bdhAccAnt><input id=bdhAccAntText size=20></TD>
<TD width=34%>日期：<input id=bdhDate size=20>&nbsp;<input type=button value="↓" onclick="dateShow(bdhDate)"></TD></TR>
<TR><TD width=33%>付款方式：<input id=bdhSetMoney type=hidden><input id=bdhSetMoneyText style="width:158px">&nbsp;<INPUT type="button" value="搜索" onclick="paymentClick(this,bdhSetMoneyText,bdhSetMoney)"></TD><TD width=33%>票据号：<input id=bdhNoteCode size=30></TD><TD width=34%>金额：<input id=bdhAmount readonly></TD></TR>
<TR><TD colspan=3>备注：<input id=bdhMemo size=100></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=text size=40 id=txtSearchInput>&nbsp;<input type=button value="Go" onclick="receiveClick(this,txtSearchInput)">
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<input type=button value="保存" onclick="saveClick(this)">&nbsp;<input type=button value="打开" onclick="openClick(this)">&nbsp;<input type=button value="审核" onclick="auditClick(this)">
</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=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)">&nbsp;<input type=button value="确定" onclick="panelMemoModify()">&nbsp;<input type=button value="删除" onclick="panelDelete()"></div>
<div id=bdPanelNumeric><input id=txtNumeric size=10 OnFocus="this.select()" OnKeyPress="EnterKeyDo(panelNumericModify)">&nbsp;<input type=button value="确定" onclick="panelNumericModify()">&nbsp;<input type=button value="删除" onclick="panelDelete()"></div>
<div id=bdPanelProduct><input type=button value="删除" onclick="panelDelete()"></div>
</div>
</BODY>
<script src="/Client/billPlan.js"></script>
<script>
function cbProduct(ifrid, fun, data){
	if (fun=='data'){
		gDetail.append(data[0],data[1],data[2],data[3],fixFloat(parseFloat(data[5])/(parseFloat(data[4])+1)),data[5],data[4],data[6],fixFloat((parseFloat(data[5])*parseFloat(data[6]))/(parseFloat(data[4])+1)),fixFloat(parseFloat(data[5])*parseFloat(data[6])),'');
		gDetail.refreshAll(1,0);
		return;
	}
	return defcbiFrame(ifrid, fun, data);
}

function receiveClick(obj,idCtrl){
	obj.disabled=true;
	followControl(bdhMemo,getFrameElement(bdSelectArea));
	IServer(bdSelectArea,RootID+'.Search','find='+escape(idCtrl.value),cbProduct);
	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 paymentClick(obj,idCtrl,idCtrlHidden){
	obj.disabled=true;
	followControl(idCtrl,getFrameElement(bdSelectArea2));
	userSaveCtrl=idCtrl;
	userSaveHidden=idCtrlHidden;
	IServer(bdSelectArea2,'payment.Open','find='+escape(idCtrl.value),cbCommonSelect);
	obj.disabled=false;
}
</script>
<script title=eboReg>
eboReg('ID',bdID,'',deftextproc);
eboReg('UserID',bdhUserID,'',deftextproc);
eboReg('Source',bdhSource,'',deftextproc);
eboReg('SourceText',bdhSourceText,'',deftextproc);
eboReg('Operator',bdhOperator,'',deftextproc);
eboReg('OperatorText',bdhOperatorText,'',deftextproc);
eboReg('AccAnt',bdhAccAnt,'',deftextproc);
eboReg('AccAntText',bdhAccAntText,'',deftextproc);
eboReg('SetMoney',bdhSetMoney,'',deftextproc);
eboReg('SetMoneyText',bdhSetMoneyText,'',deftextproc);
eboReg('NoteCode',bdhNoteCode,'',deftextproc);
eboReg('Amount',bdhAmount,'',deftextproc);
eboReg('Date',bdhDate,'',deftextproc);
eboReg('Memo',bdhMemo,'',deftextproc);
eboReg('Owner',bdfOwner,'',deftextproc);
eboReg('Auditor',bdfAuditor,'',deftextproc);
eboReg('Detail',gDetail,'',productdetailproc);
</script>
</HTML>
⌨️ 快捷键说明

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