欢迎来到天天文库
浏览记录
ID:24555310
大小:55.00 KB
页数:4页
时间:2018-11-15
《职称评审评委随机抽取系统的设计与实现》由会员上传分享,免费在线阅读,更多相关内容在工程资料-天天文库。
1、职称评审评委随机抽取系统的设计与实现杨东风1,冯海燕2(1.延安大学计算机学院,陕西延安716000;2.杨家岭福州希望小学,陕西延安716000)摘要:针对高校职称评审评委抽取中存在人为干扰因素多、不透明、因手工操作而缺乏规范性等问题,提出一种随机抽取评委的应用系统。该系统首先根据一定条件组建学院评委库,再由各学院评委库组成校级大评委库;然后从校级大评委库中使用随机函数随机抽取评委,形成各学院当年临时评委库;最后将每个学院临时评委库中的评委与该学院近三年抽取评委库中的评委进行对比,看是否存在连续三年均被抽为评委或当年有直系亲属参评现象,如不存在,则该评委就入当年校级终审评委库,否则,该学院
2、评委需另行抽取。采用该系统,就可避免评委选取中的人为因素,使评委的产生真正做到公开、公平与公正,体现评委抽取的严肃性。.jyqk1第二组代码:随机产生一个1到该学院评委总数之间的随机数,并经这个值作为该界面上与该学院相联系的标签的标题值。thisform.label1.caption=str((rand()*(m1?1))+1)第三组代码:实现该学院评委的抽取,形成当年该学院临时评委库。IFFILE("cqp.check1.Value=1SELECT*FROMp.label1.Caption)==ALLTRIM(编号)AND学院="马克思主义学院"INTOTABLEls1useENDIF第四
3、组代码:检测某学院抽取的评委是否在近3年的评委库中均出现(该系统的关键所在)。以2014年某学院抽取评委为例,让他与2011年,2012年,2013年抽取评库中的评委对比。SettalkoffClearSELECT*FROMp.label1.Caption)==ALLTRIM(编号)AND学院="计算机学院"INTOTABLEtmp1当年计算机学院抽取的评委N=0N1=0N2=0N3=0Select姓名,学院fromtmp1intoarrayxxUsecqpp;检查该评委在2011年的评委库中是否存在Iffound()N1=1ElseN1=0EndifUseUsecqpp;检查该评委在201
4、2年的评委库中是否存在Iffound()N2=1ElseN2=0EndifUseUsecqpp;检查该评委在2013年的评委库中是否存在Iffound()N3=1ElseN3=0EndifUseN=n1+n2+n3Ifn>=3messagebox(“该评委已连续3年被抽取,今年不可再担任评委,请另行抽取!”,1+48)elseUsecqpls1将该评委追加在当年校级终审评委库中UseDroptablels1endif终审评委随机抽取出来后就可以保存、打印或被分为历史名单库,以便及时通知评委和今后参考。3结语经过2013年,2014年两年职称评定工作的试运行,证明该系统是稳定、可靠、可信
5、和公正的,受到人事处和广大职称参评人员的好评。..
此文档下载收益归作者所有