EIRC信息化平台开发规范.pdfVIP

EIRC 信息化平台“企业业务类”模块开发规范 西安长大科技有限责任公司 一、EIRC 平台简介 EIRC 企业信息资源平台全部采用 Borland Delphi 2006 系统进行编码。系统 运行全部采用 bpl 集成形式的模块化设计方式。数据库端设计主要的技术有：三 层 Midas 技术，用户链接池技术，SQL Server 存储过程、触发器、视图等优化方 法。系统核心模块主要包括：核心基础类、角色权限管理模块、模块注册管理、 全局信息设置（数据库链接方式、登陆用户、日志、系统设置、用户设置）、信 息服务中心、报表设计器。EIRC 平台将常用操作全部封装成函数的形式供开发 人员使用。主要为开发人员开发提供十大关键函数和五大数据操作函数。通过这 些高度集成的函数使用，开发人员可以不用考虑常规的数据库操作和程序设计问 题，而将全部精力集中于企业业务逻辑的开发之中。 注：此文档中的统一约定： 黑体表示系统自动生成的代码，斜体下划线表示用户自己定义的名称，普通体表示规范的代码形式 二、EIRC 模块开发方法及其函数 1、系统关键函数 （1） 获取数据接口 GetConnection （2） 从数据源获取数据 GetDataFormServer （3） 写入系统日志 CSysLog （4） 得到本地字段布局设置 LoadFieldLayout （5） 得到系统统一颜色信息 Title/Grid等对像 （6） 读取用户操作权限 SetActionStatus （7） 从数据字典解析中文字段名称 SetFieldProerty （8） 打印数据至报表 SelRepPrint （9） 保存字段布局到本地 SetFieldsLayout （10）导出表数据到本地 ExportData 2、数据操作集成函数 （1） 提交编辑数据信息 EditData （2） 提交删除数据信息 DeleteData －1－ （3） 提交插入数据信息 InsertData （4） 通过关键字得到数据 GetSqlData （5） 通过sql语句得到数据 GetDataFormServer 三、代码段操作方式 1、Create 事件设计 procedure TFrmDayReportMaster.FormCreate(Sender: TObject); begin IFmMain:=Application.MainForm as IMainForm; SvrSysManage:=IFmMain.GetConnection(Handle,,ReportServer.untPooler); SetGressHint(正在连接到生产日报管理服务器...); SetGressHint(正在读取用户操作权限...); csyslog(SvrSysManage,c_Succeed,Self.Name, 日报,IFmMain.IFmMainEx.LogonInfo.UserID); KeyField :=ID; sTableNames :=ProductionDayMaster; end; 2 、Show 事件设计 procedure TFrmDayReportMaster.FormShow(Sender: TObject); begin SetGressHint(初始化本地环境...); PostMessage(handle,WM_USER_GETDATA,0,0); Application.ProcessMessages; SysFieldXml(CdsFieldProPerty,sFieldProPerty,TProductionDayMaster.Xml); SetFieldProperty(CdsFieldProPerty,CdsProctionDay,sTableNames); SetGressHint( 读取历史单据...); CdsProctionDay .Open; FreeGressForm; Color := FormBackColor ; DBGridEh1 .FixedColor := GridFixColor; end; procedur