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

📄 default.asp

📁 进销存软件源代码
💻 ASP
📖 第 1 页 / 共 2 页
字号:
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>&nbsp;<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">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<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 + -