开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > 行业应用 > 企业管理 > 查看源码
生产管理系统实例程序.sql
资源名称：VCSDB.rar　[点击查看]
上传用户：hjieqiu
上传日期：2013-05-11
资源大小：16494k
文件大小：21k
源码类别：

企业管理

开发平台：

C#

生产管理系统实例程序.sql：源码内容
  1. if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[mrp物料需求计算_物料编号_fk]') and OBJECTPROPERTY(id, N'IsForeignKey') = 1)
  2. ALTER TABLE [dbo].[mrp物料需求计算] DROP CONSTRAINT mrp物料需求计算_物料编号_fk
  3. GO
  5. if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[mrp物料需求计算结果_物料编号_fk]') and OBJECTPROPERTY(id, N'IsForeignKey') = 1)
  6. ALTER TABLE [dbo].[mrp物料需求计算结果] DROP CONSTRAINT mrp物料需求计算结果_物料编号_fk
  7. GO
  9. if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[mrp物料需求历史_物料编号_fk]') and OBJECTPROPERTY(id, N'IsForeignKey') = 1)
  10. ALTER TABLE [dbo].[mrp物料需求历史] DROP CONSTRAINT mrp物料需求历史_物料编号_fk
  11. GO
  13. if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[物料清单_物料编号_fk]') and OBJECTPROPERTY(id, N'IsForeignKey') = 1)
  14. ALTER TABLE [dbo].[物料清单] DROP CONSTRAINT 物料清单_物料编号_fk
  15. GO
  17. if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[主生产计划_物料编号_fk]') and OBJECTPROPERTY(id, N'IsForeignKey') = 1)
  18. ALTER TABLE [dbo].[主生产计划] DROP CONSTRAINT 主生产计划_物料编号_fk
  19. GO
  21. if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[主生产计划历史_物料编号_fk]') and OBJECTPROPERTY(id, N'IsForeignKey') = 1)
  22. ALTER TABLE [dbo].[主生产计划历史] DROP CONSTRAINT 主生产计划历史_物料编号_fk
  23. GO
  25. if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[主需求计划_物料编号_fk]') and OBJECTPROPERTY(id, N'IsForeignKey') = 1)
  26. ALTER TABLE [dbo].[主需求计划] DROP CONSTRAINT 主需求计划_物料编号_fk
  27. GO
  29. if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[主需求计划历史_物料编号_fk]') and OBJECTPROPERTY(id, N'IsForeignKey') = 1)
  30. ALTER TABLE [dbo].[主需求计划历史] DROP CONSTRAINT 主需求计划历史_物料编号_fk
  31. GO
  32. -------------------------------------------------------
  33. if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[物料主文件]') and OBJECTPROPERTY(id, N'IsUserTable') = 1)
  34. drop table [dbo].[物料主文件]
  35. GO
  36. if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[物料清单]') and OBJECTPROPERTY(id, N'IsUserTable') = 1)
  37. drop table [dbo].[物料清单]
  38. GO
  39. if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[工厂日历]') and OBJECTPROPERTY(id, N'IsUserTable') = 1)
  40. drop table [dbo].[工厂日历]
  41. GO
  42. if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[主需求计划]') and OBJECTPROPERTY(id, N'IsUserTable') = 1)
  43. drop table [dbo].[主需求计划]
  44. GO
  45. if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[主需求计划历史]') and OBJECTPROPERTY(id, N'IsUserTable') = 1)
  46. drop table [dbo].[主需求计划历史]
  47. GO
  48. if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[主生产计划]') and OBJECTPROPERTY(id, N'IsUserTable') = 1)
  49. drop table [dbo].[主生产计划]
  50. GO
  51. if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[主生产计划历史]') and OBJECTPROPERTY(id, N'IsUserTable') = 1)
  52. drop table [dbo].[主生产计划历史]
  53. GO
  54. if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[mrp物料需求计算]') and OBJECTPROPERTY(id, N'IsUserTable') = 1)
  55. drop table [dbo].[mrp物料需求计算]
  56. GO
  57. if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[mrp物料需求计算结果]') and OBJECTPROPERTY(id, N'IsUserTable') = 1)
  58. drop table [dbo].[mrp物料需求计算结果]
  59. GO
  60. if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[mrp物料需求历史]') and OBJECTPROPERTY(id, N'IsUserTable') = 1)
  61. drop table [dbo].[mrp物料需求历史]
  62. GO
  63. if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[物料状态类别]') and OBJECTPROPERTY(id, N'IsUserTable') = 1)
  64. drop table [dbo].[物料状态类别]
  65. GO
  66. if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[物料计划类别]') and OBJECTPROPERTY(id, N'IsUserTable') = 1)
  67. drop table [dbo].[物料计划类别]
  68. GO
  70. -------------------------------------------
  71. CREATE TABLE [dbo].[物料主文件] (
  72. [物料编号] [char] (14) NOT NULL ,
  73. [条码] [char] (14) NULL ,
  74. [物料名称] [varchar] (50) NOT NULL ,
  75. [拼音编码] [char] (10) NULL ,
  76. [计量单位] [char] (10) NOT NULL ,
  77. [规格型号] [char] (20) NULL ,
  78. [计划类别] [char] (5) NULL ,
  79. [状态类别] [char] (5) NULL ,
  80. [归属类别] [char] (5) NULL ,
  81. [价值类别] [char] (1) NULL ,
  82. [物料特性a] [varchar] (40) NULL ,
  83. [物料特性b] [varchar] (40) NULL ,
  84. [物料特性c] [varchar] (40) NULL ,
  85. [物料特性d] [varchar] (40) NULL ,
  86. [长] [decimal](18, 3) NULL ,
  87. [宽] [decimal](18, 3) NULL ,
  88. [高] [decimal](18, 3) NULL ,
  89. [净重] [decimal](18, 3) NULL ,
  90. [品牌] [char] (10) NULL ,
  91. [颜色] [char] (10) NULL ,
  92. [等级] [char] (10) NULL ,
  93. [进货提前期] [int]  NULL ,
  94. [准备周期] [int]  NULL ,
  95. [生产周期] [int]  NULL ,
  96. [最小包装量] [decimal](18, 3) NULL ,
  97. [最低销售量] [decimal](18, 3) NULL ,
  98. [批量] [decimal](18, 4) NULL ,
  99. [最高库存] [decimal](18, 3) NULL ,
  100. [最低库存] [decimal](18, 3) NULL ,
  101. [库存期限] [int] NULL ,
  102. [录入者] [char] (8) NULL ,
  103. [录入日期] [int] NULL ,
  104. [低层码] [int] NULL ,
  105. [指定供货商] [char] (10) NULL ,
  106. [定货策略] [char] (10) NULL ,
  107. [生产车间] [char] (10) NULL 
  108. ) ON [PRIMARY]
  109. GO
  111. CREATE TABLE [dbo].[物料清单] (
  112. [父项编号] [char] (14) NOT NULL ,
  113. [物料编号] [char] (14) NOT NULL ,
  114. [需要数量] [decimal](18, 4) NOT NULL ,
  115. [领料车间] [char] (10) NULL ,
  116. [领料库房] [char] (10) NULL ,
  117. [损耗率] [decimal](5, 4) NULL ,
  118. [bom状态] [char] (1) NULL ,
  119. [bom信息状态] [char] (1) NULL ,
  120. [审核者] [char] (8) NULL ,
  121. [审核日期] [int] NULL ,
  122. [其它事项] [text] NULL ,
  123. [低层码] [int] NULL ,
  124. [展开标记] [bit] NULL 
  125. ) ON [PRIMARY] TEXTIMAGE_ON [PRIMARY]
  126. GO
  128. CREATE TABLE [dbo].[工厂日历] (
  129. [年份] [int] NOT NULL ,
  130. [计划期] [int] NOT NULL ,
  131. [开始日期] [int] NOT NULL ,
  132. [结束日期] [int] NOT NULL ,
  133. [备注] [varchar] (255) NULL 
  134. ) ON [PRIMARY]
  135. GO
  137. CREATE TABLE [dbo].[主需求计划] (
  138. [编号] [char] (14) NULL ,
  139. [物料编号] [char] (14) NOT NULL ,
  140. [年份] [int] NOT NULL ,
  141. [计划期] [int] NOT NULL ,
  142. [开始日期] [int] NULL ,
  143. [结束日期] [int] NULL ,
  144. [需求数量] [decimal] (15,2) NOT NULL ,
  145. [记帐人] [varchar] (10) NULL ,
  146. [修改日期] [int] NULL ,
  147. [状态] [char] (10) NULL default '有效',
  148. [备注] [varchar] (40) NULL 
  149. ) ON [PRIMARY]
  150. GO
  152. CREATE TABLE [dbo].[主需求计划历史] (
  153. [编号] [char] (14) NULL ,
  154. [物料编号] [char] (14) NOT NULL ,
  155. [年份] [int] NOT NULL ,
  156. [计划期] [int] NOT NULL ,
  157. [开始日期] [int] NULL ,
  158. [结束日期] [int] NULL ,
  159. [需求数量] [decimal] (15,2) NULL ,
  160. [记帐人] [varchar] (10) NULL ,
  161. [修改日期] [int] NULL ,
  162. [状态] [char] (10) NULL ,
  163. [备注] [varchar] (40) NULL 
  164. ) ON [PRIMARY]
  165. GO
  167. CREATE TABLE [dbo].[主生产计划] (
  168. [物料编号] [char] (14) NOT NULL ,
  169. [编号] [char] (14) NULL ,
  170. [年份] [int] NOT NULL ,
  171. [计划期] [int] NOT NULL ,
  172. [开始日期] [int] NULL ,
  173. [结束日期] [int] NULL ,
  174. [期初库存] [decimal] (15,2) NULL ,
  175. [需求数量] [decimal] (15,2) NULL ,
  176. [MPS数量] [decimal] (15,2) NOT NULL ,
  177. [生产单数量] [decimal] (15,2) NULL ,
  178. [预计库存] [decimal] (15,2) NULL ,
  179. [记帐人] [varchar] (10) NULL ,
  180. [修改日期] [int] NULL ,
  181. [审核人] [varchar] (10) NULL ,
  182. [审核日期] [int] NULL ,
  183. [状态] [char] (10) NULL default '有效',
  184. [备注] [varchar] (40) NULL 
  185. ) ON [PRIMARY]
  186. GO
  188. -- 对主生产计划进行编号
  189. CREATE trigger INSERT_主生产计划
  190. on  主生产计划
  191. for INSERT
  192. AS
  193. declare @bh1 varchar(16)
  194. declare @bh2 varchar(16)
  195. select @bh1 = isnull(max(编号),'MPS0000000000') from 主生产计划
  196. select @bh2 = isnull(max(编号),'MPS0000000000') from 主生产计划历史
  197. if(@bh2>@bh1) select @bh1 = @bh2
  198. declare @no varchar(10)
  199. select @no = substring(@bh1,4,10)
  200. select @no = convert(char(10),convert(int,@no)+1)
  201. select @no = REPLICATE('0',10-LEN(@no))+@no
  202. update 主生产计划 set 编号='MPS' + @no where 编号 is null
  203. GO
  205. CREATE TABLE [dbo].[主生产计划历史] (
  206. [物料编号] [char] (14) NOT NULL ,
  207. [编号] [char] (14) NULL ,
  208. [年份] [int] NOT NULL ,
  209. [计划期] [int] NOT NULL ,
  210. [开始日期] [int] NULL ,
  211. [结束日期] [int] NULL ,
  212. [期初库存] [decimal] (15,2) NULL ,
  213. [需求数量] [decimal] (15,2) NULL ,
  214. [MPS数量] [decimal] (15,2) NULL ,
  215. [生产单数量] [decimal] (15,2) NULL ,
  216. [预计库存] [decimal] (15,2) NULL ,
  217. [记帐人] [varchar] (10) NULL ,
  218. [修改日期] [int] NULL ,
  219. [审核人] [varchar] (10) NULL ,
  220. [审核日期] [int] NULL ,
  221. [状态] [char] (10) NULL ,
  222. [备注] [varchar] (40) NULL 
  223. ) ON [PRIMARY]
  224. GO
  226. CREATE TABLE [dbo].[mrp物料需求计算] (
  227. [物料编号] [char] (14) NOT NULL ,
  228. [年份] [int] NOT NULL ,
  229. [计划期] [int] NOT NULL ,
  230. [期初库存] [decimal](18, 4) NULL ,
  231. [毛需求] [decimal](18, 4) NULL ,
  232. [预计入库] [decimal](18, 4) NULL ,
  233. [预计出库] [decimal](18, 4) NULL ,
  234. [预计库存] [decimal](18, 4) NULL ,
  235. [净需求] [decimal](18, 4) NULL ,
  236. [计划产出] [decimal](18, 4) NULL ,
  237. [计划投入] [decimal](18, 4) NULL 
  238. ) ON [PRIMARY]
  239. GO
  241. CREATE TABLE [dbo].[mrp物料需求历史] (
  242. [发布编号] [char] (20) NULL ,
  243. [发布时间] [datetime] NULL ,
  244. [物料编号] [char] (14) NOT NULL ,
  245. [年份] [int] NOT NULL ,
  246. [计划期] [int] NOT NULL ,
  247. [期初库存] [decimal](18, 4) NULL ,
  248. [毛需求] [decimal](18, 4) NULL ,
  249. [预计入库] [decimal](18, 4) NULL ,
  250. [预计出库] [char] (10) NULL ,
  251. [预计库存] [decimal](18, 4) NULL ,
  252. [净需求] [decimal](18, 4) NULL ,
  253. [计划产出] [decimal](18, 4) NULL ,
  254. [计划投入] [decimal](18, 4) NULL 
  255. ) ON [PRIMARY]
  256. GO
  258. --- 这个视图是为了查询时显示物料名称可以用table控件,而不必使用query控件
  259. if exists (select * from sysobjects where id = object_id(N'[dbo].[vmrp物料需求历史]') and OBJECTPROPERTY(id, N'IsView') = 1)
  260. drop view [dbo].[vmrp物料需求历史]
  261. GO
  262. create view vmrp物料需求历史
  263. as
  264. select a.*, b.物料名称 from mrp物料需求历史 as a,
  265. 物料主文件 as b where a.物料编号=b.物料编号
  266. go
  268. CREATE TABLE [dbo].[物料状态类别] (
  269. [类别代码] [char] (5) NOT NULL Primary key,
  270. [状态描述] [char] (20) NOT NULL ,
  271. [说明] [varchar] (50) NULL 
  272. ) ON [PRIMARY]
  273. GO
  275. CREATE TABLE [dbo].[物料计划类别] (
  276. [类别代码] [char] (5) NOT NULL Primary key,
  277. [类别名称] [char] (20) NOT NULL 
  278. ) ON [PRIMARY]
  279. GO
  280. -----------------------------------------
  281. ALTER TABLE [dbo].[物料主文件] WITH NOCHECK ADD 
  282. CONSTRAINT [DF__物料主文件__进货提前期__160F4887] DEFAULT (0) FOR [进货提前期],
  283. CONSTRAINT [DF__物料主文件__准备周期__17036CC0] DEFAULT (0) FOR [准备周期],
  284. CONSTRAINT [DF__物料主文件__生产周期__17F790F9] DEFAULT (0) FOR [生产周期],
  285. CONSTRAINT [PK__物料主文件__151B244E] PRIMARY KEY  CLUSTERED 
  286. (
  287. [物料编号]
  288. )  ON [PRIMARY] 
  289. GO
  291. ALTER TABLE [dbo].[物料清单] WITH NOCHECK ADD 
  292. CONSTRAINT [DF_物料清单_展开标记] DEFAULT (0) FOR [展开标记],
  293. CONSTRAINT [PK_物料清单] PRIMARY KEY  CLUSTERED 
  294. (
  295. [父项编号],
  296. [物料编号]
  297. )  ON [PRIMARY] 
  298. GO
  300. ALTER TABLE [dbo].[工厂日历] WITH NOCHECK ADD 
  301. CONSTRAINT [PK__工厂日历__1F98B2C1] PRIMARY KEY  CLUSTERED 
  302. (
  303. [年份],
  304. [计划期]
  305. )  ON [PRIMARY] 
  306. GO
  308. ALTER TABLE [dbo].[主需求计划] WITH NOCHECK ADD 
  309. CONSTRAINT [PK_主需求计划] PRIMARY KEY  CLUSTERED 
  310. (
  311. [物料编号],
  312. [年份],
  313. [计划期]
  314. )  ON [PRIMARY] 
  315. GO
  317. ALTER TABLE [dbo].[主需求计划历史] WITH NOCHECK ADD 
  318. CONSTRAINT [PK_主需求计划历史] PRIMARY KEY  CLUSTERED 
  319. (
  320. [物料编号],
  321. [年份],
  322. [计划期]
  323. )  ON [PRIMARY] 
  324. GO
  326. ALTER TABLE [dbo].[主生产计划] WITH NOCHECK ADD 
  327. CONSTRAINT [PK_主生产计划] PRIMARY KEY  CLUSTERED 
  328. (
  329. [年份],
  330. [计划期],
  331. [物料编号]
  332. )  ON [PRIMARY] 
  333. GO
  335. ALTER TABLE [dbo].[主生产计划历史] WITH NOCHECK ADD 
  336. CONSTRAINT [PK_主生产计划历史] PRIMARY KEY  CLUSTERED 
  337. (
  338. [年份],
  339. [计划期],
  340. [物料编号]
  341. )  ON [PRIMARY] 
  342. GO
  344. ALTER TABLE [dbo].[mrp物料需求计算] WITH NOCHECK ADD 
  345. CONSTRAINT [PK_mrp物料需求计算] PRIMARY KEY  CLUSTERED 
  346. (
  347. [物料编号],
  348. [年份],
  349. [计划期]
  350. )  ON [PRIMARY] 
  351. GO
  353. ALTER TABLE [dbo].[mrp物料需求历史] WITH NOCHECK ADD 
  354. CONSTRAINT [PK_mrp物料需求历史] PRIMARY KEY  CLUSTERED 
  355. (
  356. [物料编号],
  357. [年份],
  358. [计划期]
  359. )  ON [PRIMARY] 
  360. GO
  362. ALTER TABLE [dbo].[mrp物料需求历史] ADD 
  363. CONSTRAINT [mrp物料需求历史_物料编号_fk] FOREIGN KEY 
  364. (
  365. [物料编号]
  366. ) REFERENCES [dbo].[物料主文件] (
  367. [物料编号]
  368. )
  369. GO
  371. ALTER TABLE [dbo].[mrp物料需求计算] ADD 
  372. CONSTRAINT [mrp物料需求计算_物料编号_fk] FOREIGN KEY 
  373. (
  374. [物料编号]
  375. ) REFERENCES [dbo].[物料主文件] (
  376. [物料编号]
  377. )
  378. GO
  380. ALTER TABLE [dbo].[mrp物料需求计算结果] ADD 
  381. CONSTRAINT [mrp物料需求计算结果_物料编号_fk] FOREIGN KEY 
  382. (
  383. [物料编号]
  384. ) REFERENCES [dbo].[物料主文件] (
  385. [物料编号]
  386. )
  387. GO
  389. ALTER TABLE [dbo].[主生产计划] ADD 
  390. CONSTRAINT [主生产计划_物料编号_fk] FOREIGN KEY 
  391. (
  392. [物料编号]
  393. ) REFERENCES [dbo].[物料主文件] (
  394. [物料编号]
  395. )
  396. GO
  398. ALTER TABLE [dbo].[主生产计划历史] ADD 
  399. CONSTRAINT [主生产计划历史_物料编号_fk] FOREIGN KEY 
  400. (
  401. [物料编号]
  402. ) REFERENCES [dbo].[物料主文件] (
  403. [物料编号]
  404. )
  405. GO
  407. ALTER TABLE [dbo].[主需求计划] ADD 
  408. CONSTRAINT [主需求计划_物料编号_fk] FOREIGN KEY 
  409. (
  410. [物料编号]
  411. ) REFERENCES [dbo].[物料主文件] (
  412. [物料编号]
  413. )
  414. GO
  416. ALTER TABLE [dbo].[主需求计划历史] ADD 
  417. CONSTRAINT [主需求计划历史_物料编号_fk] FOREIGN KEY 
  418. (
  419. [物料编号]
  420. ) REFERENCES [dbo].[物料主文件] (
  421. [物料编号]
  422. )
  423. GO
  425. ALTER TABLE [dbo].[物料清单] ADD 
  426. CONSTRAINT [物料清单_物料编号_fk] FOREIGN KEY 
  427. (
  428. [物料编号]
  429. ) REFERENCES [dbo].[物料主文件] (
  430. [物料编号]
  431. )
  432. GO
  434. ---------------------下面是间接使用的数据表
  435. if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[库存库]') and OBJECTPROPERTY(id, N'IsUserTable') = 1)
  436. drop table [dbo].[库存库]
  437. GO
  438. if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[采购订单]') and OBJECTPROPERTY(id, N'IsUserTable') = 1)
  439. drop table [dbo].[采购订单]
  440. GO
  441. if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[生产订单]') and OBJECTPROPERTY(id, N'IsUserTable') = 1)
  442. drop table [dbo].[生产订单]
  443. GO
  444. CREATE TABLE [dbo].[库存库] (
  445. [货号] [char] (14) NOT NULL ,
  446. [批号] [varchar] (20) NOT NULL ,
  447. [部门] [varchar] (20) NOT NULL ,
  448. [组别] [varchar] (20) NOT NULL ,
  449. [货位] [varchar] (20) NULL ,
  450. [库存数量] [decimal] (15,2) NOT NULL ,
  451. [库存金额] [decimal] (15,2) NOT NULL ,
  452. [库存单价] [decimal] (15,2) NOT NULL ,
  453. [最新进价] [decimal] (15,2) NULL ,
  454. [扣率] [decimal] (15,2) NULL 
  455. ) ON [PRIMARY]
  456. GO
  457. CREATE TABLE [dbo].[采购订单] (
  458. [编号] [char] (14) NOT NULL primary key,
  459. [合同编号] [char] (14) NULL ,
  460. [单据号] [char] (14) NULL ,
  461. [申请编号] [char] (14) NULL ,
  462. [供货商号] [char] (10) NULL ,
  463. [物料编号] [char] (14) NULL ,
  464. [订货数量] [decimal](24, 4) NULL ,
  465. [进价] [money] NULL ,
  466. [不含税价] [money] NULL ,
  467. [税率] [decimal](5, 4) NULL ,
  468. [税额] [money] NULL ,
  469. [税价合计] [money] NULL ,
  470. [交货方式] [varchar] (20) NULL ,
  471. [订货日期] [int] NULL ,
  472. [年份] [int] NULL ,
  473. [计划期] [int] NULL ,
  474. [订货地点] [varchar] (20) NULL ,
  475. [订货人] [char] (8) NULL ,
  476. [送货日期] [int] NULL ,
  477. [送货数量] [real] NULL ,
  478. [剩余数量] [decimal](18, 4) NULL ,
  479. [有效起日] [int] NULL ,
  480. [有效止日] [int] NULL ,
  481. [记帐日期] [int] NULL ,
  482. [记帐人] [char] (8) NULL ,
  483. [审单人] [char] (8) NULL ,
  484. [作废标记] [char] (1) NULL ,
  485. [打印标记] [char] (1) NULL ,
  486. [订单状态] [char] (6) NULL ,
  487. [订单说明] [varchar] (40) NULL 
  488. ) ON [PRIMARY]
  489. GO
  490. CREATE TABLE [dbo].[生产订单] (
  491. [MPS编号] [char] (14) NULL ,
  492. [编号] [char] (14) Not NULL Primary key,
  493. [单据号] [char] (14) NULL ,
  494. [生产批号] [char] (20) NULL ,
  495. [物料编号] [char] (14) NULL ,
  496. [年份] [int] NULL ,
  497. [计划期] [int] NULL ,
  498. [数量] [decimal] (15,2) NULL ,
  499. [生产部门] [char] (10) NULL ,
  500. [下达日期] [int] NULL ,
  501. [要求完成日期] [int] NULL ,
  502. [完成数量] [decimal] (15,2) NULL ,
  503. [剩余数量] [decimal] (15,2) NULL ,
  504. [记帐人] [varchar] (10) NULL ,
  505. [记帐日期] [int] NULL ,
  506. [审核人] [varchar] (10) NULL ,
  507. [审核日期] [int] NULL ,
  508. [状态] [char] (10) NULL ,
  509. [备注] [varchar] (40) NULL 
  510. ) ON [PRIMARY]
  511. GO
  513. ALTER TABLE [dbo].[库存库] WITH NOCHECK ADD 
  514. CONSTRAINT [DF__库存库__库存数量__6C43F744] DEFAULT (0) FOR [库存数量],
  515. CONSTRAINT [DF__库存库__库存金额__6D381B7D] DEFAULT (0) FOR [库存金额],
  516. CONSTRAINT [DF__库存库__库存单价__6E2C3FB6] DEFAULT (0) FOR [库存单价],
  517. CONSTRAINT [库存库_货号部门组别_FK] PRIMARY KEY  CLUSTERED 
  518. (
  519. [货号],
  520. [批号],
  521. [部门],
  522. [组别]
  523. )  ON [PRIMARY] 
  524. GO
  525. ALTER TABLE [dbo].[生产订单] WITH NOCHECK ADD 
  526. CONSTRAINT [DF_生产订单_完成数量] DEFAULT (0) FOR [完成数量],
  527. CONSTRAINT [DF_生产订单_剩余数量] DEFAULT (0) FOR [剩余数量]
  528. GO
  530. ALTER TABLE [dbo].[生产订单] ADD 
  531. CONSTRAINT [生产订单_物料编号_fk] FOREIGN KEY 
  532. (
  533. [物料编号]
  534. ) REFERENCES [dbo].[物料主文件] (
  535. [物料编号]
  536. )
  537. GO
  539. ALTER TABLE [dbo].[采购订单] ADD 
  540. CONSTRAINT [采购订单_物料编号_fk] FOREIGN KEY 
  541. (
  542. [物料编号]
  543. ) REFERENCES [dbo].[物料主文件] (
  544. [物料编号]
  545. )
  546. GO
  548. -------------------------存储过程
  549. if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[sf_mrp结果发布]') and OBJECTPROPERTY(id, N'IsProcedure') = 1)
  550. drop procedure [dbo].[sf_mrp结果发布]
  551. GO
  552. if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[sf_mrp计算]') and OBJECTPROPERTY(id, N'IsProcedure') = 1)
  553. drop procedure [dbo].[sf_mrp计算]
  554. GO
  556. --------mrp计算存储过程
  557. CREATE PROCEDURE sf_mrp计算 ( @考虑库存等  bit=1, 
  558. @考虑提前期 bit=1, @考虑损耗 bit=1)
  559. AS
  560. begin tran
  561. --清除
  562. delete from mrp物料需求计算
  563. -- 更新物料清单底层码,计算时使用
  564. update 物料清单 set 低层码 = 0 where 父项编号 = 0
  565. -- 循环10次,根据情况,这里默认bom物料的层级不超过10级
  566. declare @i int
  567. select @i = 1
  568. while (@i<=10)
  569. begin 
  570. update 物料清单 set 低层码 = b.低层码+1 from 物料清单 as a,
  571. (select * from 物料清单) as b 
  572. where a.父项编号 = b.物料编号
  573. select @i = @i + 1
  574. end
  575. --重新生成物料需求计算表,并计算毛需求
  576. -- 低层码代表物料的层级,使用他来循环
  577. insert into mrp物料需求计算(物料编号,年份,计划期,毛需求)
  578. select 物料编号,年份,计划期,sum(MPS数量)
  579. FROM 主生产计划 group by 物料编号,年份,计划期
  580. select @i = 1
  581. while (@i<=10)
  582. begin 
  583. -- 没有的先查入记录,因为一个物料可以对应多个父项
  584. insert into mrp物料需求计算(物料编号,年份,计划期,毛需求)
  585. select distinct b.物料编号,年份,计划期,0
  586. FROM mrp物料需求计算 as a, 物料清单 as b
  587. where rtrim(b.物料编号)+convert(char(4),年份)+
  588. convert(char(2),计划期) not in(select rtrim(物料编号)+
  589. convert(char(4),年份)+convert(char(2),计划期) 
  590. from mrp物料需求计算)
  591. and b.父项编号=a.物料编号 and b.低层码=@i
  592. -- 计算毛需求
  593. -- 注意考虑损耗的情况
  594. update mrp物料需求计算 set 毛需求 = c.毛需求 + d.需求
  595. from mrp物料需求计算 as c, 
  596. (select b.物料编号,年份,计划期,
  597. sum((a.毛需求*b.需要数量)/(1-(case when @考虑损耗=1 then 
  598. isnull(损耗率,0) else 0 end))) as 需求
  599. FROM mrp物料需求计算 as a, 物料清单 as b
  600. where b.父项编号=a.物料编号 and b.低层码=@i
  601. group by b.物料编号,a.年份,a.计划期
  602. ) as d
  603. where c.物料编号=d.物料编号 and c.年份=d.年份 and c.计划期=d.计划期
  605. select @i = @i + 1
  606. end
  607. --------------- 不考虑提前期的毛需求计算完成
  608. -- 考虑提前期,计算提前期
  609. --if (@考虑提前期=1) 
  610. --begin
  611. -- 这里不在计算,具体计算方法为将当前计划期的数量移到提前期
  612. -- 注意跨年度计划期的
  613. --end
  615. if (@考虑库存等=1)      
  616. begin   
  617. -- 第一次计算,设置期初库存
  618. -- 这里统一设置起初库存为100
  619. -- 实际系统应该和库存库及上期情况结合
  620. update mrp物料需求计算 set 期初库存=100 
  622. update mrp物料需求计算 set 预计入库 = isnull(预计入库,0) + 
  623. 数量 from mrp物料需求计算 as a, (select sum(剩余数量) as 数量, 
  624. 物料编号,年份,计划期 from 采购订单 
  625. group by 物料编号,年份,计划期) as b, 物料主文件 as c
  626. where a.物料编号=b.物料编号 and a.年份=b.年份 
  627. and a.计划期=b.计划期 and a.物料编号 = c.物料编号 
  628. and c.计划类别='wg'    -- 外购产品
  629.   
  630. update mrp物料需求计算 set 预计入库 = isnull(预计入库,0) + 
  631. 数量 from mrp物料需求计算 as a, (select sum(剩余数量) as 数量, 
  632. 物料编号,年份,计划期 from 生产订单 
  633. group by 物料编号,年份,计划期) as b, 物料主文件 as c
  634. where a.物料编号=b.物料编号 and a.年份=b.年份 
  635. and a.计划期=b.计划期 and a.物料编号 = c.物料编号 
  636. and c.计划类别='bcp'    -- 半成品
  638. -- 这里计算预计出库的情况   
  639. update mrp物料需求计算 set 预计出库 = isnull(预计出库,0)
  640.     end
  642. -- 按照计划期循环计算各个计划期的物料需求
  643. declare @年份 int, @计划期 int
  644. declare mycur cursor for select 年份,计划期 from mrp物料需求计算
  645. order by 年份,计划期
  646. open mycur
  647. fetch next from mycur into @年份, @计划期
  648. WHILE (@@FETCH_STATUS = 0 )
  649. BEGIN
  650. -- 如果不是最小的计划期, 计算期初库存
  651. -- 注意跨年度的计算,这里先不考虑
  652. update mrp物料需求计算 set 期初库存=b.预计库存 from 
  653. mrp物料需求计算  as a, (select * from mrp物料需求计算) 
  654. as b where a.年份=@年份 and a.计划期=@计划期
  655. and a.年份=b.年份 and a.计划期=b.计划期+1 and a.物料编号=b.物料编号
  657. -- 计算净需求
  658. update mrp物料需求计算 set 预计库存 = isnull(期初库存,0) - 
  659. isnull(毛需求,0) + isnull(预计入库,0) - isnull(预计出库,0)
  660. where 年份=@年份 and 计划期=@计划期
  661. update mrp物料需求计算 set 净需求=0  where 年份=@年份 and 计划期=@计划期
  662. -- 预期(期末库存)小于0的存在净需求
  663. update mrp物料需求计算 set 净需求=-预计库存, 预计库存=0 
  664. where 年份=@年份 and 计划期=@计划期 and 预计库存<0
  665. fetch next from mycur into @年份, @计划期
  666. END
  667. close mycur
  668. deallocate mycur
  669. commit
  670. GO
  672. CREATE PROCEDURE sf_mrp结果发布
  673. AS
  674. begin tran
  675. insert into mrp物料需求历史(发布时间, 物料编号, 年份, 计划期,
  676. 期初库存, 毛需求, 预计入库, 预计出库, 预计库存, 净需求, 
  677. 计划产出, 计划投入) select getdate(), 物料编号, 
  678. 年份, 计划期, 期初库存, 毛需求, 预计入库, 预计出库, 预计库存, 
  679. 净需求, 计划产出, 计划投入 from mrp物料需求计算
  680. delete from mrp物料需求计算
  681. insert into 主生产计划历史 select * from 主生产计划
  682. delete from 主生产计划
  683. commit
  684. GO