?? default.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 width=33%>倉庫：<input type=hidden id=bdhStock><input id=bdhStockText size=20> <INPUT type="button" value="搜索" onclick="stockClick(this,bdhStockText,bdhStock)"></TD>
<TD width=33%>自編號：<INPUT id=bdhUserID size=6></TD></TR>
<TR><TD colspan=3>備注：<input id=bdhMemo size=60> 日期：<input id=bdhDate size=20> <input type=button value="↓" onclick="dateShow(bdhDate)"></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> <input type=button value="Go" onclick="productClick(this,txtSearchInput)">
<input type=button value="保存" onclick="saveClick(this)"> <input type=button value="打開" onclick="openClick(this)"> <input type=button value="審核" onclick="auditClick(this)"> <input type="button" value="預覽" onclick="printClick(1)"> <input type="button" value="打印" onclick="printClick(0)">
<br>
文件位置：<input type=file size=30 name=myfile ID="File1"> <input type=button value="讀入" onclick="readClick(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)"> <input type=button value="確定" onclick="panelMemoModify()"> <input type=button value="刪除" onclick="panelDelete()"></div>
<div id=bdPanelNumeric><input id=txtNumeric size=10 OnFocus="this.select()" OnKeyPress="EnterKeyDo(panelNumericModify)"> <input type=button value="確定" onclick="panelNumericModify()"> <input type=button value="刪除" onclick="panelDelete()"></div>
<div id=bdPanelProduct><input type=button value="刪除" onclick="panelDelete()"></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');
}
var b=new Array();
var a=new Array();
function readClick(){
var f,r,i;
i=0;
var fso = new ActiveXObject("Scripting.FileSystemObject");
f=fso.OpenTextFile(myfile.value );
while (!f.AtEndOfLine){
r=f.ReadLine();
a[a.length ]='Product' ;
a[a.length ]=r.substring(0,20);
b[b.length ]=r.substring(20,25);
}
f.Close();
IServer(bdLoadSave,'Product.Read',a,cbRead);
}
function cbRead(ifrid, fun, data){
if (fun=='data'){
for (var i=0;i<data.length;i+=7){
gDetail.append(data[i],data[i+1],data[i+2],data[i+3],data[i+5],data[i+6],parseInt(b[i/7]),fixFloat(parseFloat(data[i+6])*parseInt(b[i/7]),2),'');
}
a.length =0;
gDetail.calcTotal();
gDetail.refreshAll();
return;
}
}
function EnterKeyDo(doFun){if (window.event.keyCode==13)doFun();}
var wzjbutton;
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)
return;
//有數據
switch(y){
case 0:
case 1:
case 2:
case 3:
panelShow(eo.grid.rows(x+1).cells(y+1),bdPanel,bdPanelProduct,1);
break;
case 4:
case 5:
case 6:
txtNumeric.value=gDetail.data[iPanelx][iPanely];
panelShow(eo.grid.rows(x+1).cells(y+1),bdPanel,bdPanelNumeric);
txtNumeric.focus();
break;
case 7:
txtMemo.value=gDetail.data[iPanelx][iPanely];
panelShow(eo.grid.rows(x+1).cells(y+1),bdPanel,bdPanelMemo);
txtMemo.focus();
break;
}
}
}
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;
switch(iPanely){
case 5:
gDetail.data[iPanelx][5]=fixFloat(gDetail.data[iPanelx][5]);
gDetail.data[iPanelx][7]=fixFloat(gDetail.data[iPanelx][6]*gDetail.data[iPanelx][5],2);
break;
case 6:
gDetail.data[iPanelx][6]=fixFloat(gDetail.data[iPanelx][6],2);
gDetail.data[iPanelx][7]=fixFloat(gDetail.data[iPanelx][6]*gDetail.data[iPanelx][5],2);
break;
}
gDetail.calcTotal();
gDetail.refreshAll(1,0);
}
}
function firindetailproc(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==1||j==2||j==3||j==8||j==9) continue;
outdata[outdata.length]=ebo.id.title[j+1].param+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++){
if (j==8||j==9) ebo.id.data[i][j]=fixFloat(parseFloat(ebo.id.data[i][j-4])*parseFloat(ebo.id.data[i][7]));
else ebo.id.data[i][j]=indata.item(ebo.id.title[j+1].param+i);
}
}
break;
default:
break;
}
return (true);
}
gDetail = new ZYDGRID(new ZYDGRIDFORIEBUG(),bdBodyDetail,10,9,'100%','',1,testUndefine,testUndefine,ecbDetail);
function InitTitle(t){
t[0].text='№';
t[1].text='序號';
t[1].width=1;
t[1].param='Detail_0_';
t[2].text='編號';
t[2].width=120;
t[2].param='Detail_1_';
t[3].text='名稱';
t[3].width=240;
t[3].param='Detail_2_';
t[4].text='規格';
t[4].width=80;
t[4].param='Detail_3_';
t[5].text='稅率';
t[5].width=1;
t[5].isNumeric=1;
t[5].formAlign='right';
t[5].param='Detail_4_';
t[6].text='銷價';
t[6].width=50;
t[6].isNumeric=1;
t[6].formAlign='right';
t[6].param='Detail_5_';
t[7].text='數量';
t[7].width=60;
t[7].isNumeric=1;
t[7].isTotal=1;
t[7].formAlign='right';
t[7].param='Detail_6_';
t[8].text='金額';
t[8].width=100;
t[8].isNumeric1;
t[8].isTotal=1;
t[8].formAlign='right';
t[8].param='Detail_7_';
t[9].text='備注';
t[9].width=240;
t[9].param='Detail_8_';
}
InitTitle(gDetail.title);
gDetail.refreshAll();
function cbAudit(ifrid, fun, data){
if (fun=='data'){
if (data=='1')
alert('成功！');
else
alert('失?。?#039;);
wzjbutton.disabled=false;
return;
}
wzjbutton.disabled=false;
}
function auditClick(obj){
obj.disabled=true;
wzjbutton=obj;
IServer(bdLoadSave,RootID+'.Audit','ID='+bdID.value,cbAudit);
}
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('保存成功！');
}
wzjbutton.disabled=false;
return;
}
wzjbutton.disabled=false;
}
function saveClick(obj){
obj.disabled=true;
wzjbutton=obj;
eboGet();
IServer(bdLoadSave,RootID+'.Save',outdata,cbSave);
outdata=new Array();
}
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;
}
function cbProduct(ifrid, fun, data){
if (fun=='data'){
gDetail.append(data[0],data[1],data[2],data[3],data[5],data[6],data[7],fixFloat((parseFloat(data[7])*parseFloat(data[6])*(1-parseFloat(data[5]))),2),'');
gDetail.refreshAll(1,0);
return;
}
return defcbiFrame(ifrid, fun, data);
}
function productClick(obj,idCtrl){
obj.disabled=true;
followControl(bdhMemo,getFrameElement(bdSelectArea));
IServer(bdSelectArea,'Product.Openv2','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 userClick(obj,idCtrl,idCtrlHidden){
obj.disabled=true;
followControl(idCtrl,getFrameElement(bdSelectArea2));
userSaveCtrl=idCtrl;
userSaveHidden=idCtrlHidden;
IServer(bdSelectArea2,'Operator.Open','type=2&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','type=1&find='+escape(idCtrl.value),cbCommonSelect);
obj.disabled=false;
}
function stockClick(obj,idCtrl,idCtrlHidden){
obj.disabled=true;
followControl(idCtrl,getFrameElement(bdSelectArea2));
userSaveCtrl=idCtrl;
userSaveHidden=idCtrlHidden;
IServer(bdSelectArea2,'Stock.Open','find='+escape(idCtrl.value),cbCommonSelect);
obj.disabled=false;
}
</script>
<script title=eboReg>
eboReg('ID',bdID,'',deftextproc);
eboReg('UserID',bdhUserID,'',deftextproc);
//eboReg('StockOp',bdfStockOp,'',deftextproc);
//eboReg('StockOpText',bdfStockOpText,'',deftextproc);
eboReg('Stock',bdhStock,'',deftextproc);
eboReg('StockText',bdhStockText,'',deftextproc);
eboReg('Date',bdhDate,'',deftextproc);
eboReg('Memo',bdhMemo,'',deftextproc);
eboReg('Owner',bdfOwner,'',deftextproc);
eboReg('Auditor',bdfAuditor,'',deftextproc);
eboReg('Detail',gDetail,'',firindetailproc);
</script>
</HTML>?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -