Question

求一份数据库大作业 高手

基本任务：数据库需求分析、概念结构设计、逻辑结构设计、数据库实施、数据库应用设计。

内容为
医院药品进销存系统
主要功能：
（1）新药品的入库。
（2）过期药品的出库登记、处理记录。
（3）药品库存检索。
（4）供货商信息检索。
（5）药品采购记录管理。
（6）药品用药说明信息管理。
（7）输出相应的数据报表。
（8）具有数据备份和数据恢复功能。
主要的数据表有药品分类代码表，药品库存表，供货商信息表，采购信息表等。
设计要求：
具体项目内容去医院进行调研，药品编码也应参考国家统一编码方法。

Answer 1

有现成的系统，主要完成药品进货管理、供货商管理、采购记录入库、出货查询、过期药品管理、库存查询、新药品管理、出货管理等功能。
--------------------------------------------
附上数据库脚本：
CREATE VIEW [dbo].[详细药品]
AS
SELECT dbo.药品分类代码表.ypcode, dbo.药品分类代码表.ypname, dbo.药品信息表.guige,
dbo.药品信息表.[function], dbo.药品信息表.chengfen, dbo.药品信息表.yongliang,
dbo.药品信息表.referenceprice
FROM dbo.药品信息表 INNER JOIN
dbo.药品分类代码表 ON dbo.药品信息表.ypcode = dbo.药品分类代码表.ypcode
GO
/****** 对象: View [dbo].[库存信息] 脚本日期: 05/25/2012 14:32:37 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
CREATE VIEW [dbo].[库存信息]
AS
SELECT dbo.药品库存表.ypcode, dbo.药品库存表.productdate, dbo.药品库存表.kcamount,
dbo.药品分类代码表.ypname, dbo.药品信息表.referenceprice,
dbo.药品库存表.yxqz
FROM dbo.药品分类代码表 INNER JOIN
dbo.药品库存表 ON
dbo.药品分类代码表.ypcode = dbo.药品库存表.ypcode INNER JOIN
dbo.药品信息表 ON dbo.药品库存表.ypcode = dbo.药品信息表.ypcode
GO
/****** 对象: StoredProcedure [dbo].[gqyp_insert] 脚本日期: 05/25/2012 14:32:19 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
create proc [dbo].[gqyp_insert]
@ypcode char(50),
@yxqz smalldatetime,
@deal char(50)='焚烧'
as
insert into 过期药品出库登记(ypcode,yxqz,deal,ckamount)
select 药品库存表.ypcode,药品库存表.yxqz,@deal,药品库存表.kcamount
from 药品库存表
where 药品库存表.ypcode=@ypcode and 药品库存表.yxqz=@yxqz

delete from 药品库存表
where ypcode=@ypcode and yxqz=@yxqz
GO
/****** 对象: Table [dbo].[药品分类代码表] 脚本日期: 05/25/2012 14:32:32 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
SET ANSI_PADDING ON
GO
CREATE TABLE [dbo].[药品分类代码表](
[ypcode] [char](12) NOT NULL,
[ypname] [char](50) NULL,
CONSTRAINT [PK_药品分类代码表] PRIMARY KEY CLUSTERED
(
[ypcode] ASC
)WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
) ON [PRIMARY]
GO
SET ANSI_PADDING OFF
GO
/****** 对象: Table [dbo].[供货商信息表] 脚本日期: 05/25/2012 14:32:27 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
SET ANSI_PADDING ON
GO
CREATE TABLE [dbo].[供货商信息表](
[ghno] [char](50) NOT NULL,
[ghname] [char](50) NULL,
[city] [char](50) NULL,
[phone] [char](50) NULL,
CONSTRAINT [PK_供货商信息表] PRIMARY KEY CLUSTERED
(
[ghno] ASC
)WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
) ON [PRIMARY]
GO
SET ANSI_PADDING OFF
GO
/****** 对象: StoredProcedure [dbo].[insert_采购信息表_1] 脚本日期: 05/25/2012 14:32:20 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER OFF
GO
CREATE PROCEDURE [dbo].[insert_采购信息表_1]
(@采购单号_1 [int],
@采购时间_2 [smalldatetime],
@药品代码_3 [char](50),
@供货商号_4 [char](50),
@进价_5 [float],
@采购数量_6 [int],
@金额_7 [float],
@采购员编号_8 [char](50))

AS INSERT INTO [医院药品进销存系统].[dbo].[采购信息表]
( [采购单号],
[采购时间],
[药品代码],
[供货商号],
[进价],
[采购数量],
[金额],
[采购员编号])

VALUES
( @采购单号_1,
@采购时间_2,
@药品代码_3,
@供货商号_4,
@进价_5,
@采购数量_6,
@金额_7,
@采购员编号_8)
GO
/****** 对象: StoredProcedure [dbo].[kcsearch] 脚本日期: 05/25/2012 14:32:20 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
create proc [dbo].[kcsearch]
@no char(50)
as
select 药品库存表.ypcode,ypname,kcamount,productdate,yxqz
from 药品库存表,药品分类代码表
where 药品库存表.ypcode=药品分类代码表.ypcode and 药品库存表.ypcode=@no
GO
/****** 对象: StoredProcedure [dbo].[kcsearch_name] 脚本日期: 05/25/2012 14:32:20 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
create proc [dbo].[kcsearch_name]
@name char(50)
as
select 药品库存表.ypcode,ypname,kcamount,productdate,yxqz
from 药品库存表,药品分类代码表
where 药品库存表.ypcode=药品分类代码表.ypcode and ypname=@name
GO
/****** 对象: Table [dbo].[采购人员信息] 脚本日期: 05/25/2012 14:32:22 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
SET ANSI_PADDING ON
GO
CREATE TABLE [dbo].[采购人员信息](
[cgyno] [char](50) NOT NULL,
[cgyname] [char](50) NULL,
[sex] [char](10) NULL,
[cgyphone] [char](50) NULL,
[email] [char](50) NULL,
CONSTRAINT [PK_采购人员信息] PRIMARY KEY CLUSTERED
(
[cgyno] ASC
)WITH (PAD_INDEX = OFF, STATISTICS_NORECOMPUTE = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS = ON, ALLOW_PAGE_LOCKS = ON) ON [PRIMARY]
) ON [PRIMARY]
GO
SET ANSI_PADDING OFF
-----------------------------------
需要可与本人联系。

追问

怎么联系啊 我要那种有E-R图、关系模式、表结构及表间关系。的word啊 有吗？

Answer 2

加百度hi账户：sweetboy2004