- 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
- 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
- 4、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
- 5、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们。
- 6、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 7、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
技术培训 Technical TrainingPresented by:Eric Zheng, Technology ConsulterBIC Software培训提纲水晶报表相关应用客户化、.NET编程水晶报表水晶报表的安装,设计。BAQ报表设计者的使用如何修改系统自带报表。连接外部水晶报表客户化调用水晶报表、.NET程序调用水晶报表。客户化、.NET编程1、客户化界面功能介绍。2、客户化里使用VB.NET如何操作数据库、调用水晶报表、调用外挂程序以及系统自定义表开发方法等。3、.NET编程操作数据库;调用水晶报表等。4、外挂程序与系统结合的常用作法。水晶报表EPICOR系统有大量专业水晶报表供使用,并提供了水晶报表的开发环境,有专项功能与之衔接(BAQ报表设计者)。对于水晶报表的使用,有以下几点。 一、水晶报表数据源①、ODBC为数据源连接。操作步骤:新建报表→标准报表创建向导→创建新连接→ODBC点击ODBC节点后出现如下图所示,选择建立好的ODBC数据源。点击NEXT。输入用户ID,密码,点击Finish。进入数据库专家界面,如下图。点击添加命令。出现输入SQL语句界面,输入SQL语句,点击确定。回到数据库专家界面,点击OK,至此完成数据源的设置。下图为设置好数据源后的水晶报表设计界面。将字段插入水晶报表中,点击预览可看到报表效果。②、A(xml)为数据源。 Epicor系统中BAQ报表设计者使用的就是此种方式。首先生成XML文件,再建立水晶报表以之作为数据源。 操作步骤:新建报表→标准报表创建向导→创建新连接→ADO.NET(XML)。双击进入如下界面,输入XML文件路径。点击完成→标准报表创建向导→选中如下右图所示a,选至右边选定的表一栏。点击完成结束数据源设置。下图为设置好数据源后的水晶报表设计界面。插入字段到报表,点击预览可看到报表效果。二、水晶报表公式,程序应用①、插入汇总、节专家、组专家、选择专家等等的使用。组专家。如下图,进入组专家后,选取要以之分组的字段到右边栏位。选项设置属性。确定后按所选字段分组,右图为分组效果。分组项节专家使用。节专家界面的设置可以对报表进行灵活的控制。插入汇总。插入汇总项可进行数据求和、求平均、最大、最小值等功能。公式编辑框②、公式字段、参数字段使用公式字段。水晶报表公式编辑可使用Basic 语法和 Crystal 语法。如下图,建立公式字段“数量和”,编辑写入公式,保存后退出公式编辑器。使用“数量和”字段。得到如下结果。数量和=加工数量+不合格数量三、程序调用水晶报表程序里添加1个FORM窗体。拖入水晶报表控件。如下图所示。水晶报表控件编写水晶报表使用函数,有2种方式传入数据源。①、传入SQL语句。Sub PrintView(ByVal server As String, ByVal Port As String, ByVal path As String, ByVal sql As String) Dim constr As String Dim database As String = mfgsys Dim username As String = sysprogress Dim password As String = sysprogress constr = Driver={Progress OpenEdge 10.1C driver};DB= _ database ;UID= username ;PWD= password ;HOST= server ;PORT= Port Dim rptdoc As New CrystalDecisions.CrystalReports.Engine.ReportDocument Try rptdoc.Load(path) rptdoc.SetDataSource(Query(sql, constr)) Me.CrystalReportViewer1.ReportSource = rptdoc Me.CrystalReportViewer1.RefreshReport() Me.Show() Catch ex As Exception MessageBox.Show(ex.Message, Error) End Try End Sub传入参数为 服务器名/IP、端口号、水晶报表路径、SQL语句。其中也使用到open(constr),query(sql,constr)函数。②、传入 dt (DATATABLE)。 Public Sub PrintViewXML(ByVal path As String, ByVal dt As DataTable) Dim rptdoc As New CrystalDecisions
文档评论(0)