📄 default.asp
字号:
szSQLscth = "SELECT "& szSelect &" [vl].[ProductID] AS [ProductID], 0 AS [FirstIn],0 AS [FirstAmount],0 AS [phQu],0 AS [phAmount],0 AS [thQu],0 AS [thAmount], 0 AS [dcQu],0 AS [dcAmount],0 AS [drQu],0 AS [drAmount],0 as [pdyQu],0 as [pdyAmount],0 AS [pdkQu],0 AS [pdkAmount],0 AS [drscQu],0 AS [drscAmount],SUM([vl].[Quantity]) AS [scthQu],0 AS [scthAmount],0 AS [zxQu],0 AS [zxAmount],0 AS [zpQu],0 AS [kcQu],0 AS [kcAmount]" &_
" FROM [BdMoveStockJXB] AS [vt],[BdMoveStockJXBList] AS [vl] "& szFrom &_
" WHERE vt.AuditID<>0 and [vt].[id]=[vl].[id] AND [bistock].[Parentid]=0 AND ([vt].[UpdateDate]>='"& DateFrom &"' AND [vt].[UpdateDate]<'"& DateTo &"') " & szCgscthTj & szWhereOther &_
" GROUP BY "& szGroupBy &" [vl].[ProductID]"
'直销单
szSQLzx = "SELECT "& szSelect &" [vl].[ProductID] AS [ProductID], 0 AS [FirstIn],0 AS [FirstAmount],0 AS [phQu],0 AS [phAmount],0 AS [thQu],0 AS [thAmount], 0 AS [dcQu],0 AS [dcAmount],0 AS [drQu],0 AS [drAmount],0 as [pdyQu],0 as [pdyAmount],0 AS [pdkQu],0 AS [pdkAmount],0 AS [drscQu],0 AS [drscAmount],0 AS [scthQu],0 AS [scthAmount],SUM([vl].[Quantity]) AS [zxQu],SUM([vl].[Amount]) AS [zxAmount],0 AS [zpQu],0 AS [kcQu],0 AS [kcAmount]" &_
" FROM [BdDirectSale] AS [vt],[BdDirectSaleList] AS [vl] "& szFrom &_
" WHERE vt.AuditID<>0 and [vt].[id]=[vl].[id] AND ([vt].[UpdateDate]>='"& DateFrom &"' AND [vt].[UpdateDate]<'"& DateTo &"') AND [vt].[AccountID]<>1 " & szCgzxTj & szWhereOther1 &_
" GROUP BY "& szGroupBy &" [vl].[ProductID]"
'赠品单
szSQLzp = "SELECT "& szSelect &" [vl].[ProductID] AS [ProductID], 0 AS [FirstIn],0 AS [FirstAmount],0 AS [phQu],0 AS [phAmount],0 AS [thQu],0 AS [thAmount], 0 AS [dcQu],0 AS [dcAmount],0 AS [drQu],0 AS [drAmount],0 as [pdyQu],0 as [pdyAmount],0 AS [pdkQu],0 AS [pdkAmount],0 AS [drscQu],0 AS [drscAmount],0 AS [scthQu],0 AS [scthAmount],0 AS [zxQu],0 AS [zxAmount],SUM([vl].[Quantity]) AS [zpQu],0 AS [kcQu],0 AS [kcAmount]" &_
" FROM [BdOrder] AS [vt],[BdOrderList] AS [vl] "& szFrom &_
" WHERE vt.AuditID<>0 and [vt].[id]=[vl].[id] AND ([vt].[UpdateDate]>='"& DateFrom &"' AND [vt].[UpdateDate]<'"& DateTo &"') AND [vt].[AccountID]<>1 " & szCgzpTj & szWhereOther1 &_
" GROUP BY "& szGroupBy &" [vl].[ProductID]"
'期初数量
szSQLqc = "SELECT "& szSelect &" [vt].[ProductID] AS [ProductID],SUM([vt].[Quantity]) AS [FirstIn],0 AS [FirstAmount],0 AS [phQu],0 AS [phAmount],0 AS [thQu],0 AS [thAmount], 0 AS [dcQu],0 AS [dcAmount],0 AS [drQu],0 AS [drAmount],0 as [pdyQu],0 as [pdyAmount],0 AS [pdkQu],0 AS [pdkAmount],0 AS [drscQu],0 AS [drscAmount],0 AS [scthQu],0 AS [scthAmount],0 AS [zxQu],0 AS [zxAmount],0 AS [zpQu],0 AS [kcQu],0 AS [kcAmount] " &_
" FROM [resProductStock] AS [vt] "& szFrom &_
" WHERE (([vt].[CreateDate]<='"& GetDateString(DateFrom) &"' AND [vt].[UpdateDate]>'"& GetDateString(DateFrom) &"') OR ([vt].[IsDeleted]=0 AND [vt].[CreateDate]<='"& GetDateString(DateFrom) &"' ))" & szWhere &_
" GROUP BY "& szGroupBy &" [vt].[ProductID]"
'期末数量
szSQLkc = "SELECT "& szSelect &" [vt].[ProductID] AS [ProductID],0 AS [FirstIn],0 AS [FirstAmount],0 AS [phQu],0 AS [phAmount],0 AS [thQu],0 AS [thAmount], 0 AS [dcQu],0 AS [dcAmount],0 AS [drQu],0 AS [drAmount],0 as [pdyQu],0 as [pdyAmount],0 AS [pdkQu],0 AS [pdkAmount],0 AS [drscQu],0 AS [drscAmount],0 AS [scthQu],0 AS [scthAmount],0 AS [zxQu],0 AS [zxAmount],0 AS [zpQu],SUM([vt].[Quantity]) AS [kcQu],SUM([vt].[Amount]) AS [kcAmount] " &_
" FROM [resProductStock] AS [vt] "& szFrom &_
" WHERE (([vt].[CreateDate]<='"& GetDateString(DateTo) &"' AND [vt].[UpdateDate]>'"& GetDateString(DateTo) &"') OR ([vt].[IsDeleted]=0 AND [vt].[CreateDate]<='"& GetDateString(DateTo) &"' ))" & szWhere &_
" GROUP BY "& szGroupBy &" [vt].[ProductID]"
szSQL="( "& szSQLph &" UNION "& szSQLth & " UNION " & szSQLdc &" UNION "& szSQLdr &" UNION "& szSQLdrsc & " UNION " & szSQLscth &" UNION " & szSQLzx & " UNION " & szSQLzp & "UNION "& szSQLpd & "UNION "& szSQLpd1 & "UNION " & szSQLqc & " UNION " & szSQLqc1 & "UNION "& szSQLkc & " )"
szSQL="SELECT "& ssSelect &" sum([nv].[FirstIn]) AS [期初库存],sum([nv].[FirstAmount]) AS [期初录入], SUM([nv].[phQu]) AS [配货数量],sum([nv].[thQu]) AS [退货数量], SUM([nv].[dcQu]) AS [调拨调出数量], SUM([nv].[drQu]) AS [调拨调入数量],SUM([nv].[pdyQu]) AS [盘赢数量],SUM([nv].[pdyAmount]) AS [盘赢金额],SUM([nv].[pdkQu]) AS [盘亏数量],SUM([nv].[pdkAmount]) AS [盘亏金额], SUM([nv].[drscQu]) AS [调入商场数量],SUM([nv].[scthQu]) AS [商场退货数量], SUM([nv].[zxQu]) AS [直销数量],SUM([nv].[zpQu]) AS [赠品数量], SUM([nv].[kcQu]) 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 1;
break;
case '期初录入':
return 60;
break;
case '盘赢数量':
return 60;
break;
case '盘赢金额':
return 1;
break;
case '盘亏数量':
return 60;
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;
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;
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 + -