摘要:利用Excel函数和VBA功能,构建了招标采购相关法规数据模型、数据库以及多功能查询系统,可以实现招标采购相关法规的基本信息、条款、全文、招标方式、时限事项、企业类型、关键字词等多种查询功能,可为招标采购活动的相关参与者提供方便、快捷、实用的法规自主咨询服务,减少或避免违规违法的情况,对维护招标活动的合法性、维护招标采购参与者的正当利益等方面具有积极的指导作用和良好的实用价值。
关键词:Excel函数;招标;法规;系统;开发
《工程数学学报》(双月刊)创刊于1984年,由教育部主管、西安交通大学和中国工业与应用数学学会合办,是中国工业与应用数学学会会刊。
1 系统概述
系统功能及用途
本系统是基于Excel函数和VBA功能设计开发,收录了近200个招标投标及政府采购相关法律、规章和制度,可随时添加新法规。系统功能包括基本信息、法规条款、法规全文、招标方式、企业类型、时限事项、关键字词等查询功能,详见表1,系统界面如图1所示。
系统可為招标人、投标人、采购人、供应商、评审专家、代理机构、财政审批监管部门等主体提供方便、快捷、准确的自主法规查询,减少和避免招标采购过程中的违法违规情况。
系统数据分析及编码
系统数据为招标采购相关法规,包括综合法规、建设工程、政府采购、产权交易、地矿交易(土地矿产交易)、拍卖交易等六个类型,共180多个,每类不超过100个。兼顾现状与未来,每类预设100个存储单元,共600个。分别赋予系统编号(类型号+序号)1001、1002、1003……1100;2001、2002、2003……2100;3001、3002、3003……3100;4001、4002、4003……4100;5001、5002、5003……5100;6001、6002、6003……6100。
系统查询功能的基础是与之对应的数据库,所以数据库的建立非常关键,必须保证所有数据的正确性和完整性。系统基本结构如图2所示。
信息查询基本原理
系统信息元都是置于某库(表)的某一单元格,查询原理是利用Excel函数和VBA完成“三定”,即确定信息所在库(定表)、信息所在行(定行)、信息所在列(定列)。
2 系统功能的设计与实现
2.1 基本信息查询功能的设计与实现
按类分别建立一个基本信息数据库,各数据库容量为100个法规,信息源于法规全文库,区域域A1:P101。为数据库与查询界面之间建立一个“基本信息查询辅助表”作为桥梁,辅助表中各类法规的名称“粘贴链接”自法规全文数据库对应信息,并放置查询界面的类型选择、名称选择2个控件的单元格链接数,为基本信息查询函数提供查询参数。
控件设置,基本信息查询包括类型选择和名称选择,分别通过一个组合框控件来实现。两个控件的参数设置如表2。法规类型控件确定拟查信息所在的数据库(表),法规名称控件确定拟查信息所在的行号,各信息的列号是固定已知的,这样便可利用INDEX函数查询出每个法规的各个基本信息。
2.2 法规条款查询功能的设计与实现
将原文按名称、题注、第一条、第二条、第三条......分割成信息元,每个信息元占据一个单元格。数据库第一列为条款顺序号,从第四行开始,即第一条、第二条、第三条….第四百二十八条,是法规条款序号选择控件数据源。第一行从第二列开始为系统编号,第二行为法规名称,其数据引用自法规条款查询辅助表,引用函数式为=OFFSET('2.0辅助表'!$A$1:$A$101,COLUMN(A1),0,1,100)。第三行为条款总数统计,分别统计各个法规条款总数,统计函数式为="共"&COUNTA(B$5:B$450)&"条"。其他单元格存放相应的法规条款,以备查询系统调用。每个数据库容纳100个法规(目前最多75个法规),法规条款容量500条(合同法426条,最多),因此数据区域为A1:CW500。
建立“法规条款查询辅助表”,作为数据库和查询界面之间的桥梁,其中各类法规的名称“粘贴链接”(='1.1全文库E'!$B2)自法规全文数据库对应信息,待查法规由类型选择控件决定,并放置查询界面的类型选择、法规选择、条款选择三个控件的单元格链接数,为条款查询函数提供查询参数。设置类型选择、名称选择、条款选择三个控件,各控件参数设置见表3。
2.3 法规全文查询功能的设计与实现
首先建立word版全文库,每个法规一个word文件,文件名与正文标题相同,都是由系统编号+法规名称+文号组成,如“1001-中华人民共和国招标投标法-主席令第21号”。然后将word版全文,逐一复制粘贴到Excel版数据库的法规全文列,库容量为100个法规,数据区域为A1:D101。文件名称列的内容,通过函数=MID(C2,1,FIND("号",C2,1))从法规全文列中提取而来,不需要单独输入,这样既能提高建库速度,也能保证信息的正确性。
下载地址是由地址路径和文件名组成,提供超链接打开或下载word版法规全文。其中路径是通过word “文档信息域-filename” 域产生并“粘贴链接”(=Word.Document.12|'E:\法规查询系统\全文库\全文库基本信息.docx'!'!OLE_LINK3')到辅助表的I6单元格,再利用Excel的left函数(=LEFT($I$6,14))提取而来,将此路径与B列法规文件名连接(=3.0辅助表!$I$7&$B23&".docx")便得到了下载地址,且此路径会跟随文件位置变动自动更新。
论文指导 >
SCI期刊推荐 >
论文常见问题 >
SCI常见问题 >