📄 default.asp
字号:
" GROUP BY "& szGroupBy &" [vt].[ProductID]"
'期初数量
szSQLqc = "SELECT "& szSelect &" [vt].[ProductID] AS [ProductID],SUM([vt].[Quantity]) AS [FirstIn],SUM([vt].[Amount]) AS [FirstAmount],0 as [FirstInQu],0 AS [drQu],0 AS [drAmount],0 AS [dcQu],0 AS [dcAmount],0 as [pdyQu],0 as [pdyAmount],0 AS [pdkQu],0 AS [pdkAmount],0 AS [xsQu],0 AS [xsAmount],0 AS [thQu],0 AS [thAmount],0 AS [kcQu],0 AS [kcAmount] " &_
" FROM [resProductStock] AS [vt] "& szFrom &_
" WHERE vt.AuditID<>0 AND (([vt].[CreateDate]<='"& GetDateString(DateFrom) &"' AND [vt].[UpdateDate]>'"& GetDateString(DateFrom) &"') OR ([vt].[CreateDate]<='"& GetDateString(DateFrom) &"' and [vt].isdeleted=0))" & szWhere &_
" GROUP BY "& szGroupBy &" [vt].[ProductID]"
szSQL="( "& szSQLdr &" UNION "& szSQLdc &" UNION "& szSQLxs & " UNION " & szSQLth & " UNION "& szSQLqc & " UNION "& szSQLqc1 & "UNION "& szSQLpd & "UNION "& szSQLpd1 & "UNION "& szSQLkc & ")"
szSQL="SELECT "& ssSelect &" SUM([nv].[FirstIn]) AS [期初库存],SUM([nv].[FirstAmount]) AS [期初金额],SUM([nv].[FirstInQu]) AS [期初录入], SUM([nv].[drQu]) AS [调入数量],SUM([nv].[drAmount]) AS [调入金额],SUM([nv].[dcQu]) AS [调出数量],SUM([nv].[dcAmount]) AS [调出金额],SUM([nv].[pdyQu]) AS [盘赢数量],SUM([nv].[pdyAmount]) AS [盘赢金额],SUM([nv].[pdkQu]) AS [盘亏数量],SUM([nv].[pdkAmount]) AS [盘亏金额], SUM([nv].[xsQu]) AS [销售数量],SUM([nv].[xsAmount]) AS [销售金额], SUM([nv].[thQu]) AS [退货数量],SUM([nv].[thAmount]) AS [退货金额], SUM([nv].[kcQu]) AS [结存数量],SUM([nv].[kcAmount]) AS [结存金额],'' AS [备注]" &_
" FROM "& szSQL &" AS [nv] " & ssGroupBy
eboReg 1, "gridCols", "iCols", "", "cbLocalVariable"
eboReg 1, "gridRows", "iRows", "", "cbLocalVariable"
eboReg 2, "gridTilte_", "szTitle", "", "cbLocalVariable"
dim iCols,iRows,szTitle, szValue
dim i,rs
Response.Write "<script>" & VBCrLf
Set rs = Server.CreateObject("ADODB.RecordSet")
rs.open szSQL,Conn,1,1
IData2d 0,1iCols=rs.Fields.CountiRows=rs.RecordCount defaultPrintRows=GetPrintRows(iRows,defaultPrintRows)
eboGet 1, nothing, nothingIData2d 1,2for i=0 to rs.Fields.Count-1
szTitle=rs.Fields.Item(i).Name eboGet 2, nothing, nothing
next
rawGet rs
Set rs = Nothing
Response.Write "</script>" & VBCrLf
%>
<LINK REL=stylesheet HREF="/Client/All.css" TYPE="text/css"><script src="/Client/ebComm.js"></script><BODY>
<tr><td><div id=sTitle align=center><font size=5><b><u>商 场 进 销 存 汇 总 表</u></b></font></div></td></tr>
<tr><td><div id=sTime>查询时间：<% Response.Write FormatDateTime(DateFrom,1) & " -- " & FormatDateTime(DateAdd("d",-1,DateTo),1) %></div></td></tr>
<tr><td><div id=SelectArea></div></td></tr>
</Table>
<div> <input type=button value="预览" onClick=displayPrint(sTitle,sTime,<%=defaultPrintRows%>,1) ID="Button1" NAME="Button1"> <input type=button value="打印" onClick=displayPrint(sTitle,sTime,<%=defaultPrintRows%>,0) ID="Button2" NAME="Button2"> <input type=button value="Excel" onclick="excelClick()" ID="Button3" NAME="Button1"></div>
</BODY>
<script>
function excelClick(){
arrayToClipboard(gDetail.data,gDetail.title);
PasteToExcel('',true);
}
function ecbDetail(eo,szEvent,x,y){
if (szEvent=='MOUSECLICK'){
}
}
function getGridWidth(titleText){
switch(titleText){
case '产品编码':
return 170;
break;
case '产品名称':
return 130;
break;
case '规格':
return 100;
break;
default:
return 80;
}
}
function getGridNumeric(titleText){
switch(titleText){
case '期初录入':
return 60;
break;
case '盘赢数量':
return 60;
break;
case '盘赢金额':
return 1;
break;
case '盘亏数量':
return 60;
break;
case '盘亏金额':
return 1;
break;
case '期初库存':
return 1;
break;
case '期初金额':
return;
break;
case '调入数量':
return 1;
break;
case '调入金额':
return 1;
break;
case '调出数量':
return 1;
break;
case '调出金额':
return 1;
break;
case '销售数量':
return 1;
break;
case '销售金额':
return 1;
break;
case '退货数量':
return 1;
break;
case '退货金额':
return 1;
break;
case '结存数量':
return 1;
break;
case '结存金额':
return 1;
break;
default:
return 0;
}
}
function getGridAlign(titleText){
switch(titleText){
case '期初录入':
return 'right';
break;
case '盘赢数量':
return 'right';
break;
case '盘赢金额':
return 'right';
break;
case '盘亏数量':
return 'right';
break;
case '盘亏金额':
return 'right';
break;
case '期初库存':
return 'right';
break;
case '期初金额':
return 'right'
break;
case '调入数量':
return 'right'
break;
case '调入金额':
return 'right'
break;
case '销售数量':
return 'right'
break;
case '销售金额':
return 'right'
break;
case '退货数量':
return 'right'
break;
case '退货金额':
return 'right'
break;
case '结存数量':
return 'right'
break;
case '结存金额':
return 'right'
break;
default:
return '';
}
}
function getGridTotal(titleText){
switch(titleText){
case '期初录入':
return 1;
break;
case '盘赢数量':
return 1;
break;
case '盘赢金额':
return 1;
break;
case '盘亏数量':
return 1;
break;
case '盘亏金额':
return 1;
break;
case '期初库存':
return 1;
break;
case '期初金额':
return 1;
break;
case '调入数量':
return 1;
break;
case '调出数量':
return 1;
break;
case '调入金额':
return 1;
break;
case '销售数量':
return 1;
break;
case '销售金额':
return 1;
break;
case '退货数量':
return 1;
break;
case '退货金额':
return 1;
break;
case '结存数量':
return 1;
break;
case '结存金额':
return 1;
break;
default:
return 0;
}
}
function makeGrid(indata){
var gridCols=parseInt(indata.item('gridCols'));
var gDetail = new ZYDGRID(new ZYDGRIDFORIEBUG(),SelectArea,40,gridCols,'100%','',1,testUndefine,IRAWDataEnd(),ecbDetail);
gDetail.title[0].text='№';
for (var i=0;i<gridCols;i++){
gDetail.title[i+1].text=indata.item('gridTilte_'+i);
gDetail.title[i+1].width=getGridWidth(indata.item('gridTilte_'+i));
gDetail.title[i+1].isNumeric=getGridNumeric(indata.item('gridTilte_'+i));
gDetail.title[i+1].formAlign=getGridAlign(indata.item('gridTilte_'+i));
gDetail.title[i+1].isTotal=getGridTotal(indata.item('gridTilte_'+i));
}
gDetail.calcTotal();
gDetail.refreshAll();
return gDetail
}
var gDetail=makeGrid(IDataEnd());
</script>
</HTML>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -