- 1、本文档共5页,可阅读全部内容。
- 2、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
- 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
- 5、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
- 6、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们。
- 7、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 8、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
利用科技经费项目绩的效档案实现辅助决策系统
利用科技经费项目绩效档案实现辅助决策系统
[摘要]科技经费的有效管理和分配使用对地区科技发展具有重要作用。本文阐述了如何利用科技经费项目绩效档案来实现科技经费辅助决策支持系统的设计,重点阐述了MS GRAPH技术的应用和系统实现的基本方法。 [关键词]科技经费 绩效评价 辅助决策系统 一、引言 对一个地区来讲,科技行政管理部门希望能全面掌握本地区科技经费使用情况、科研投入与产出情况,科技经费在国民经济各行业中所占比重以及投入产出比,并有效指导财政科技经费的管理和分配,使之在国民经济中发挥更有效作用,促进当地经济更好地发展。可以考虑,通过阶段性立项项目绩效档案数据的统计分析,即能得到有效的决策参考数据,为科技经费管理者在行业扶持和经费划拨时提供重要决策依据。 二、科技经费项目绩效档案信息的抽取 为保证统计决策数据能真实反映科技绩效情况,增强信息的可用性,应选取一定的时间范围(5年为一个统计时间区间,如国家十一五规划期间)结题项目的集合作为研究分析的对象。为准确把握并抽取已批准结题项目的绩效信息,要求项目承担单位在项目绩效档案中详细提供项目基本信息(含项目类别、所属国民经济行业、所在地、所属技术领域、预期成果形式等分类信息)、参与人员状况、计划投资、到位资金、资金支出、省市区(县)三级财政科技拨款支出情况、项目效益及项目成果情况。 三、系统总体设计 科技经费辅助决策支持系统功能设计包括:课题绩效信息管理、课题信息统计、项目总体分析、按项目类别分析、按项目所属国民经济行业分析、按项目所在地分析、按单位性质分析、按项目所属技术领域分析、按预期成果形式分析。通过不同角度以图表和统计表形式透视参与项目的人员结构情况、到位资金情况、资金支出情况,包括资金支出合计、省市区(县)三级财政科技拨款支出、项目效益情况、项目成果情况以及投入与产出的比较分析。 四、系统技术实现 1.基础数据采集 科技经费项目绩效档案基础数据的采集可通过手工填报和互联网两种方式完成。采用互连网方式时,前台采用ASP和HTML技术实现设计基于B/S架构的科技经费绩效档案数据填报系统,后台采用ADO技术实现与项目绩效档案信息数据库的挂接,项目承担单位通过互联网即可实现财政科技经费绩效信息的填报。 2.图表技术应用 只有对绩效档案数据进行有效的统计分析,多侧面多角度加工汇总并辅以图表形式展现,才能更好地为科技经费管理者的决策提供重要参考依据。考虑到系统的复杂度,科技经费辅助决策支持系统采用关系型数据库技术附以MS GRAPH图表技术实现。 Graph是微软发布的嵌入式作图程序,它支持OLE,且具有AutoMation功能,在Visual系列开发工具中可使用OLE容器控件嵌入MS Graph的Chart对象,使用OLE绑定控件在表单上以可视方式查看数据;在应用程序中合并MS Graph应用程序的功能,通过编程和交互方式结合运用实现图表处理。人为地对MS Graph进行干预控制,更能让其达到预想的效果。如展现分国民经济行业资金支出与收益比较信息,如图1,用户可根据展现的数据对象特点选择使用不同的图形方式。 代码如下: *******1—圆饼图 2—圆环图 3—直方图***** if tubiao=1 typ=#39;-4102#39; else if tubiao=2typ=#39;-4120#39; else typ=#39;-4100#39; endif endif ********图表形成代码****** #DEFINE CRLF CHR(13)+CHR(10) #DEFINE TAB CHR(9) #define bartype amp;typ Local lcData sele 1 use 17zc2sy lcData=#39;#39;+TAB for i=1 to 2 IF Igt;1 lcData=lcData+crlf+field(I)+tab ENDI go top do while not eof() q=field(I) if VARtype(amp;Q)=#39;C#39; q1=ALLT(amp;Q) else q1=ALLT(str(amp;q)) endi lcData=lcData+q1+tab skip endd endf If Not Used(#39;tu#39;) SELECT 0 Use SYS(5)+SYS(2003)+#39;tu#39; EndIf S
文档评论(0)