计算机中的密码外，还要根据密码手册按照规定的算法计算另三个密码，只有四个密码 全为真值方可进入系统。所以，即使有人能够破译数据库中的密码数据，但因无法破译 另三个密码仍然无法登录到计算机系统中，或者碰巧进入系统，并利用系统功能成功修 改了密码，仍然无法再次进入系统。从而实现了对系统的安全性保护。 4．2．2密钥的死锁与解锁
当用户登录系统时，系统会自动检查密码是否正确，状态是否是1，三次密码输错， 自动将状态改为0并退出系统。当操作员状态为0时，将不能再进入系统。如需要进入 系统，需要一个会计主管对其进行解锁维护。当主管密码输错，需要本级另一个主管或 上级主管对其进行解锁维护阎。 4．3主控操作菜单设计与实现 4．3．1普通操作员菜单
大连理工火学专业学位硕士学位论文
当操作员操作号和密码输入正确后，进入图4．3主操作菜单。 图4．3主操作菜单
Fig．4．3 The lord operates menu
输入正确后，系统将根据操作员级别，自动关闭和显示相应的菜单供使用者使用。 在图中所显示的这四个菜单中，各个菜单具体功能如下：
(1)环境设置包括以下子菜单①使用部门设置。②资产类别设置。③资产性质 设置。④增减方式设置。⑤下辖单位设置。
(2)日常处理包括以下子菜单①数据移植。②移植数据审核。③资产增加。④增 加数据审核。⑤当前已审核数据移行。⑥资产减少。⑦资产停用修理及恢复。⑧资 产转移。⑨月末计提。⑩年终结转。
(3)综合查询包括以下子菜单①操作员查询。②日志查询。③增加资产查询。④ 减少资产查询。⑤停用修复资产查询。⑥资产明细查询。⑦资产明细查询可按照字 段进行单项选择或多项选择定位查询。
(4)报表分析包括以下子菜单①固定资产明细表。②固定资产情况表。⑧折旧
提取情况表。④固定资产配备表。⑤固定资产登记薄。⑥固定资产卡片表。⑦固定 资产动态分析。
固定资产信息管理系统的设计与实现 4．3．2会计主管用户菜单
当会计主管操作号和密码输入正确后，进入会计主管操作菜单如图4．4所示。具体 主菜单为：
(1)初始化／／首次使用该管理系统时录入基本参数 (2)操作员维护 (3)数据恢复 (4)数据备份
(5)建立上报／／向上级数据库传送数据
(6)接收数据／／接收下级数据库传送来的数据
值得提一下的是，系统时间并非当前计算机时间。操作员维护可由管理员直接在屏 幕上修改操作员代码、姓名、级别和密码重置，操作号为全国维一，由上级行核准，本 级更改无效【23】。 l至QQZ生至旦一
图4．4会计主管操作菜单
Fig．4．4 The accountancy’s supervisor operates menu
大连理工大学专业学位硕士学位论文
4．4数据移植模块设计与实现
因篇幅关系，不可能对每个模块都进行详细介绍，所以本文只对重要事项进行简要 和必要的说明，其它输入事项省去(下同)。图4．5为简化后的数据移植菜单。 翻
目【I生：玛 ————
I环境设置日常处理综合查询
_《冀礴礴霾疆 一 豳‘圈 麓l 豳_ _ l 圈 圈| 豳 ■附J■■眦，。 ～．-—～二lr
编号789. 名称潞息时实系统使用部门；营业部 ·{ { 誉 { §
资产性质其他3原值百嚣丽前r数据}1 i
{
年初折IH....～“”残值率r..使用日期2006．5 · l 折IH标志”‘楚.一.j使用标志}前‘一蔓备注
{
。～.一一..一.—*..一。..．...～.m一～，一．．一一.～～一.一..～一.一.～u.”..一一√ -侧除；一壹煞鱼重剖翼．熏墼删～退山-{ 2007年2月
固定资产信息管理系统的设计与实现 图4．6数据移植模块流程图
Fig．4．6 1k data aflcr silIlpli黟ing柏nsplaIlts menu 本模块程序主要代码为
皿va：te void add』：lick(object sender’SyStem．Event心gse)／／此方法向移植临时库 添加一条新记录。
dv曲js．BindiIlgCon觚[dv】．Posi!tion”始用日期”】= 鹏wDateTiIIle(syrq．Value．Year，syrq．Vmue．Montll'1)； dv陋is．BindingContIeXt[dv】．Position】[”审核¨】-’’否’’； dv[Ⅱlis．BindingCon：te妣【dv】．Position】【”使用部门”】= 丫窗
大连理工大学专业学位硕士学位论文 sybnl．Text；
’zc)【z．Te赋；
dv【this．BindiIlgComeXt【dv】．Position】【”资产性质”】= dV[t11is．BindiIlgContIIXt【dv】．Position】．EndE娅tO； da．Update(ds)；∥数据回填到原数据库。 ds．ClearO；
da．Fill(ds)；
“s．Bind抽gContextM．AddNew()；
bh．Text =
Convert．ToString(Convert．ToInt32(dv【tllis．BindiIlgConteXt[dv】．Position-1】【II 编号 ”】．TOStringO)+1)；
) 研Vate void(1eLSlick(objeCt sender，Syst锄．EventArgs e)／／此方法删除移植临 时库中的当前记录。
{
if(MessageBox．Show( 是否删除
”，t11is．TeXt，MessageBo)(Bu的珊．YeSNo，MessageB0xIcon．Asterisk)=-DialogResult．YeS) {
dv【tllis．BindingContcxt【dV】．Position】．DeleteO；∥删除数据集中的当前记 录。
da．U-pdate(ds)；／／数据回填到原数据库。
dv．RowFilter=¨审核=。否.；／／检查是否还有待审核记录，如果有继续审 核下一条记录，如果没有则退出此窗体。
if(dv．Comt—o) {
MessageBox．Show(”当前己无待审核数据 ”，this．TeXt，MessageBoxB吡ons．OK，MessageBoXIcon．Asterisk)； tllis．CloseO；
)
dv．R-owFilter=¨审核=’否川；／／检查是否还有待审核记录，如果有继续审 核下一条记录，如果没有则退出此窗体。 if(dv．Co嘶一O)
{
同定资产信息管理系统的设计与实现
MessageBox．Show(”当前已无待审核数据
，this．Text，MessageBoxButtons．0K，MessageBoxIcon．Asterisk)； this．Close()；
)
4．5数据增加模块与实现
数据增加模块与数据移植模块的设计基本相近，数据存放在“数据增加临时数据库”
中，当审核通过后，会自动记入“增加数量、增加金额、月折旧额”等数据。数据增加模 块与数据移植模块在面向对象的菜单设计和录入窗体及审核设计是基本相同的，只不过 增加了增加方式的选项和一些必要的内部数据处理，所以这里不再作重复表述。 4．6数据移行模块设计与实现
数据移行模块主要功能是将审核过的“资产移植临时数据库”和“资产增加数据库”中 的数据经过相关处理之后移入固定资产数据库之中，图4．7为已审核数据移行窗体。 图4．7已审核数据移行界面
Fig．4．7 HaVe already ex锄ined a data to moVe to go a window body
大连理工大学专业学位硕士学位论文
点击开始移行后，系统会自动对数据移植临时数据库和资产增加I晦时数据库内容进 行检索，对审核标志为“是”的数据依次进行移行处理，即转入固定资产数据库。在转入 固定资产数据库的同时，根据数据移植和数据增加两种方式，对数据进行不同的处理， 这些处理都是不显示的，操作都所能见到的只是如图4．6已审核数据移行界面的移行 进度情况。
在隐形的数据处理中，有一些数据是根据已录入数据进行相关计算，新生成一些相
关数据与原始录入数据一起存入固定资产库中【24】。这样做的目的和意义是： (1)减少操作员录入量。
(2)对于有共同特性和规律的数据进行自动计算。 (3)增加一些将来用于统计分析的数据。
4．6．1 数据移植移行需要自动计算的主要数据
在数据内容审核通过后，除自动动写入一些基本数据外，计算机还要自动计算以下 内容，并连同基础数据一并写入数据库。 (1)残值=原值×残值率／100 (2)年初原值=原值 (3)年初数量=数量 (4)累计折旧=年初折旧 (5)建卡日期=系统时间 (6)年末数量=数量 (7)年末原值=原值
(8)月折旧额=原值一(年初折旧一原值×残值率／100))／(使用年限×12一始用日 期至今月数)
注：使用年限来自于资产性质数据库，始用日期至今月数始用日期一系统时间，月 以下时间不记。
4．6．2数据移植移行程序代码的实现
根据数据移植移行主要功能确定编写代码如下： t11is．TeXt=¨数据移行(正在检索移植临时库.)\；
jd．Value=O；／／计数器归零。
Cmd=new OleDbCommand(”select奎f-rom移植临B寸库
¨，maimm．Co姗)；／／执行数据库查询命令。mail怕姗．CollIl为数据库连接对象，提供
数据库路径等信息。
固定资产信息管理系统的设计与实现
da=new OleDbDataAdapte“Cnld)；／／填充数据库容器da。
cb=new OleDbCo删呦mBuilder(da)；／／cb为数据库命令列表。 ds．ClearO；
da．Fill(ds)；
dv=new Dat“iew(ds．Tables[0])：／／由da填充生成dv数据集对象以便其后对 dv操作。所有操作完成后再由dv将数据返回da。
dV．RowFilter=¨审核=’是.：／／查找当前数据集中相应记录。 jd．Ma)【im啪=dv．Count；／／给计数器附最大值。 for(i=0；i { tIdv．R．owFilter=”编号=川+dv[i】【II编号”】+.”；／／检查有无重复记录。tIdv代表固定资产 库的数据集。 if(tdv．Count一0) {