inst_goods_site.sql

用VC编写的立体仓库的管理软件源程序和设计说明书。

/*
	货位状态：0(空)	1()
*/





USE WuHan
GO

DELETE FROM T_Goods_Site_Manage

DECLARE @row	int		--行
DECLARE @col	int		--排
DECLARE @line	int		--列

DECLARE @max_row	int		
DECLARE @max_col	int		
DECLARE @max_line	int		

DECLARE @sql varchar(500)

set @max_line 	= 2;
set @max_row 	= 7;
set @max_col	= 16;


set @line = 1;
while ( @line <= @max_line )
begin
	set @col = 1;
	while ( @col <= @max_col )
	begin
		set @row 	= 1;
		while ( @row <= @max_row )
		begin
			set @sql = ' INSERT INTO T_Goods_Site_Manage (F_SiteIndex)' +
				  	   ' VALUES ('''+ right( '0' + ltrim( rtrim( str( @line  ) ) ) , 1 ) + '-'
							 		+ right( '00' + ltrim( rtrim( str( @col   ) ) ) , 2 ) + '-'
							 		+ right( '0' + ltrim( rtrim( str( @row   ) ) ) , 1 ) + ''')' 
			execute(@sql)
			set @row = @row + 1;
		end
	set @col = @col + 1;
	end
set @line = @line + 1;
end


--AGV出/入库保留货位
delete T_Goods_Site_Manage where F_SiteIndex = '2-05-1'
delete T_Goods_Site_Manage where F_SiteIndex = '2-06-1'
delete T_Goods_Site_Manage where F_SiteIndex = '2-11-1'
delete T_Goods_Site_Manage where F_SiteIndex = '2-12-1'
/*
update T_Goods_Site_Manage set F_SiteState = 5 where F_SiteIndex = '2-05-1'
update T_Goods_Site_Manage set F_SiteState = 5 where F_SiteIndex = '2-06-1'
update T_Goods_Site_Manage set F_SiteState = 5 where F_SiteIndex = '2-11-1'
update T_Goods_Site_Manage set F_SiteState = 5 where F_SiteIndex = '2-12-1'
*/

DELETE FROM T_Salver_Manage

DECLARE @iNumber	int
DECLARE @max_salver	int				
DECLARE @s varchar(500)

set @iNumber = 1;
set @max_salver = 220;
while ( @iNumber <= @max_salver )
begin	
	set @s = ' INSERT INTO T_Salver_Manage (F_Index)  VALUES ('''+ 'P1208016' + right( '0000' + ltrim( rtrim( str( @iNumber))),4) + ''')' 
	execute(@s)
	set @iNumber = @iNumber + 1;
end

--系统用户表
INSERT INTO T_Password (F_User,F_Pass,F_Popedom) VALUES ('Admin','1','超级用户')

--编码管理表
INSERT INTO T_Code_Manage (F_TotalBits,F_InfoBits,F_NumBits) VALUES (128,125,3)

--商品信息表
insert into T_Products(F_Type,F_Code,F_Name,F_Color,F_Price,F_Spec,F_Weight,F_Unit,F_Supplier,F_ReadInTime,F_UpdateTime,F_Operator)values(1,'GR','货物A','红色','50','22*22*16','3','个','供货商A','2005-10-31','2005-10-31','Admin')
insert into T_Products(F_Type,F_Code,F_Name,F_Color,F_Price,F_Spec,F_Weight,F_Unit,F_Supplier,F_ReadInTime,F_UpdateTime,F_Operator)values(2,'GY','货物B','黄色','50','22*22*16','3','个','供货商B','2005-10-31','2005-10-31','Admin')
insert into T_Products(F_Type,F_Code,F_Name,F_Color,F_Price,F_Spec,F_Weight,F_Unit,F_Supplier,F_ReadInTime,F_UpdateTime,F_Operator)values(3,'GC','货物C','青色','50','22*22*16','3','个','供货商C','2005-10-31','2005-10-31','Admin')

--商品库存设置表
insert into T_Stock (F_Type,F_Code,F_Name,F_MaxNum,F_MinNum,F_Area)values(1,'GR','货物A',224,10,2)
insert into T_Stock (F_Type,F_Code,F_Name,F_MaxNum,F_MinNum,F_Area)values(2,'GY','货物B',224,10,4)
insert into T_Stock (F_Type,F_Code,F_Name,F_MaxNum,F_MinNum,F_Area)values(3,'GC','货物C',224,10,5)

--客户信息表
insert into T_Customers (F_Index,F_CompanyName,F_ContactName,F_Address,F_City,F_PostalCode,F_Phone,F_Fax,F_HomePage,F_Email,F_ReadInTime,F_UpdateTime,F_Operator)values	('C0001','客户A','张三','沈阳市东陵区南塔街114号','沈阳','110016','024-23815071','024-23815071','www.siasun.com','[e-mail]','2005-10-19','2005-10-19','Admin')
insert into T_Customers (F_Index,F_CompanyName,F_ContactName,F_Address,F_City,F_PostalCode,F_Phone,F_Fax,F_HomePage,F_Email,F_ReadInTime,F_UpdateTime,F_Operator)values	('C0002','客户B','李四','沈阳市东陵区南塔街114号','沈阳','110016','024-23815071','024-23815071','www.siasun.com','[e-mail]','2005-10-19','2005-10-19','Admin')
insert into T_Customers (F_Index,F_CompanyName,F_ContactName,F_Address,F_City,F_PostalCode,F_Phone,F_Fax,F_HomePage,F_Email,F_ReadInTime,F_UpdateTime,F_Operator)values	('C0003','客户C','金庸','沈阳市东陵区南塔街114号','沈阳','110016','024-23815071','024-23815071','www.siasun.com','[e-mail]','2005-10-19','2005-10-19','Admin')

--供货商信息表
insert into T_Suppliers (F_Index,F_CompanyName,F_ContactName,F_Address,F_City,F_PostalCode,F_Phone,F_Fax,F_HomePage,F_Email,F_ReadInTime,F_UpdateTime,F_Operator)values	('S0001','供货商A','张三','沈阳市东陵区南塔街114号','沈阳','110016','024-23815071','024-23815071','www.siasun.com','[e-mail]','2005-10-19','2005-10-19','Admin')
insert into T_Suppliers (F_Index,F_CompanyName,F_ContactName,F_Address,F_City,F_PostalCode,F_Phone,F_Fax,F_HomePage,F_Email,F_ReadInTime,F_UpdateTime,F_Operator)values	('S0002','供货商B','李四','沈阳市东陵区南塔街114号','沈阳','110016','024-23815071','024-23815071','www.siasun.com','[e-mail]','2005-10-19','2005-10-19','Admin')
insert into T_Suppliers (F_Index,F_CompanyName,F_ContactName,F_Address,F_City,F_PostalCode,F_Phone,F_Fax,F_HomePage,F_Email,F_ReadInTime,F_UpdateTime,F_Operator)values	('S0003','供货商C','金庸','沈阳市东陵区南塔街114号','沈阳','110016','024-23815071','024-23815071','www.siasun.com','[e-mail]','2005-10-19','2005-10-19','Admin')

--承运商信息表
insert into T_Carriers (F_Index,F_CompanyName,F_ContactName,F_Address,F_City,F_PostalCode,F_Phone,F_Fax,F_HomePage,F_Email,F_ReadInTime,F_UpdateTime,F_Operator)values	('CA0001','承运商A','张三','沈阳市东陵区南塔街114号','沈阳','110016','024-23815071','024-23815071','www.siasun.com','[e-mail]','2005-10-19','2005-10-19','Admin')
insert into T_Carriers (F_Index,F_CompanyName,F_ContactName,F_Address,F_City,F_PostalCode,F_Phone,F_Fax,F_HomePage,F_Email,F_ReadInTime,F_UpdateTime,F_Operator)values	('CA0002','承运商B','李四','沈阳市东陵区南塔街114号','沈阳','110016','024-23815071','024-23815071','www.siasun.com','[e-mail]','2005-10-19','2005-10-19','Admin')
insert into T_Carriers (F_Index,F_CompanyName,F_ContactName,F_Address,F_City,F_PostalCode,F_Phone,F_Fax,F_HomePage,F_Email,F_ReadInTime,F_UpdateTime,F_Operator)values	('CA0003','承运商C','金庸','沈阳市东陵区南塔街114号','沈阳','110016','024-23815071','024-23815071','www.siasun.com','[e-mail]','2005-10-19','2005-10-19','Admin')

--货位分区信息表
INSERT INTO T_Goods_Area_Manage(F_Index,F_Line, F_BeginSite, F_EndSite, F_nRed,  F_nGreen, F_nBlue, F_Remark) VALUES(1,  1,  1,  6,  204, 51,255, '杂货区')
INSERT INTO T_Goods_Area_Manage(F_Index,F_Line, F_BeginSite, F_EndSite, F_nRed,  F_nGreen, F_nBlue, F_Remark) VALUES(2,  1,  7,  10, 255,153,153, '货物A区')
INSERT INTO T_Goods_Area_Manage(F_Index,F_Line, F_BeginSite, F_EndSite, F_nRed,  F_nGreen, F_nBlue, F_Remark) VALUES(3,  1,  11, 16, 255,255,204, '托盘垛区')
INSERT INTO T_Goods_Area_Manage(F_Index,F_Line, F_BeginSite, F_EndSite, F_nRed,  F_nGreen, F_nBlue, F_Remark) VALUES(4,  2,  9,  12, 255,255,102, '货物B区')
INSERT INTO T_Goods_Area_Manage(F_Index,F_Line, F_BeginSite, F_EndSite, F_nRed,  F_nGreen, F_nBlue, F_Remark) VALUES(5,  2,  13, 16, 204,255,255, '货物C区')

--管理任务索引表
insert into T_Manager_Task_Index(F_ManagerIndex)values(1)

--订单编号索引表
insert into T_Order_Form_Index(F_Type,F_Index,F_Year)values(1,'00001','2005')	--1:出库单号
insert into T_Order_Form_Index(F_Type,F_Index,F_Year)values(2,'00001','2005')	--2:入库单号