Intouch报表_EXCEL报表制作.pdf

《Intouch报表_EXCEL报表制作.pdf》由会员分享，可在线阅读，更多相关《Intouch报表_EXCEL报表制作.pdf（5页珍藏版）》请在得力文库 - 分享文档赚钱的网站上搜索。

1、用EXCEL打印报表 1.原理 首先根据报表要求，用 INTOUCH 的附件 HISTDATA 软件形成一个有规定数据的.CSV文件（逗号分隔文件，可用 EXCEL 打开）。这个.CSV 文件是英文的，不符合一般报表的要求，只能提供数据。所以需要另设计一个空的 EXCEL 报表模版，再将.CSV 文件的数据复制到报表中，形成完整的报表。通过 INTOUCH 可以自动产生.CSV，再通过 EXCEL 的宏程序打印报表，可以完成招呼打印和定时自动打印。如果有多个报表，需要形成多个.CSV 文件和设计多个 EXCEL 报表。大致步骤如下：2.生成.CSV 文件 Step1:自动生成需要的标记名 在

2、INTOUCH 开发环境中，将向导库中趋势历史趋势向导（HistData）放入窗口。这将自动形成若干标记名（Tag）。有关标记名以 HDW 开头加上它们的 DDE 的 ITEM 命名。这些标记名说明如下：HDWDATADIR 消息型 历史数据文件的目录的路径名，可用函数赋值 例如 HDWDataDir=HTGetLogDirectory();设计报表，确定一个报表的开始时间、时间总长度、个数据之间数据采样间隔，报表参数所对应得的标记名等（如日报表的开始时间为 0 点，时间长度为 24 小时，数据采样间隔时间为小时）在 InTouch 中，按报表的需要，用脚本给一组专用的标记名赋值（如 HDWS

3、TARTTIME 规定日报表的开始时间，HDWDBDIR 规定历史纪录文件的目录，HDWTAGS 规定报表内涵的标记名 用 EXCEL 设计报表的模版。在 EXCEL 中，用记录宏程序，将形成的.CSV 文件中的数据导入 EXCEL 报表模版的数据区，然后打印。最后在 EXCEL 中将该宏程序设置为自动执行宏程序 在 InTouch 脚本中，用 HDWWRITEFILE=1 形成一个.CSV 文件 在生成.CSV 文件的 InTouch 脚本中，加入 StartApp 函数，启动EXCEL 印报表 HDWDBDIR 消息型 InTouch 标记名字典的目录的路径名，可用函数赋值 例如 HDWD

4、BDir=InfoInTouchAppDir();HDWSTARTDATE 消息型 与$DateString相同格式的数据采样开始日期 HDWSTARTTIME 消息型 使用24 小时时钟的HH:MM:SS 格式的数据采样开始时间 HDWDURATION 消息型 数据时间长度（报表时间总长度）可以用星期，天时，分，秒，等来表示下面是有效的字符：w 星期，d 天，h 小时，m 分，s 秒。允许使用小数值例如扩.5s 表示 500 毫秒若只需一个样本请将 DURATION 设为 0 零 HDWINTERVAL 消息型 采样间隔的时间长度 可以用星期日小时分和秒来表示 例如1W 表示一星期允许 使用

5、小数值例如用.25d 来表示6小时 有效字符与HDDURATION 相同 注意DURATION 和 INTERVAL 允许的最大时间长度均为 6 周 这适用于所有请求类型日秒等 例如如果使用日则最大值为 42，7 天 x 6 周=42 HDWTAGS 消息型 历史数据的标记名列表（报表中需要的标记名）以TagA,TagB,TagZ 格式输入，此外采样日期和或时间可以通过使用内部系统标记名$Date 和$Time 来请求 例如$Date,TagA,TagB 或$Time,TagA,TagB 或$Date,$Time,TagA,TagB HDWTAGS1,TAGS2,.消息型 HDWTAGS 字符

6、串在 WindowViewer 中的长度可以为131 个字符在Excel 中的长度可以为255 个字符字符串，可以通过迭加标记名项目Tags1 Tags2 等来延长以适应更长字符串的要求，如果标记名需附加额外的标记名文本请在字符串末输入一个加号（+）例如，TAGS=$Date,ProdLevel,ProdTemp,+TAGS1=ReactLevel,Temp,GasLevel,+TAGS2=MotorStatus 注意不允许使用重复标记名，每个标记字符串的最大长度为 512字节 HDWFILENAME 消息型 规定生成的.CSV文件的路径和名称 例如，C:INTOUCH HDWWRITEFIL

7、E 整型 当设置为1 时HistData 会将请求数据写入由FILENAME 项目名指定的文件，当文件更新完成后WRITEFILE 会自动重置为0零 STATUS 离散型 显示最后一次操作的状态1 表示成功，0 零表示出错 ERROR 消息型 包含上次错误说明的字符串，如 STATUS 为1 则显示无，如STATUS 为 0 零则显示错误消息字符串 前9个TAG规定数据的内容，HDWWRITEFILE=1是写.CSV文件的命令，最后两个用于检查状态和错误。写脚本时应注意：HDWDBDir、HDWDataDir这两个标记名是规定路径的，可以用函数赋值。可以写在应用程序脚本内。HDWFilenam

8、e这个标记名是规定.CSV文件的路径和文件名。如果只打一种报表，也可以写在应用程序脚本内，否则应在形成.CSV文件前指定。HDWTags和后续的HDWTags1、HDWTags2这些标记名是规定.CSV文件的包含的标记名。如果只打一种报表，也可以写在应用程序脚本内，否则应在形成.CSV文件前指定。HDWStartDate、HDWStartTime这两标记名是规定.CSV文件数据的起始日期和起始时间的。如果是招呼打印报表，人工输入时格式一定要正确。如果是自动打印报表可以计算得到，一般可以在条件脚本内规定。HDWInterval、HDWDuratione这两标记名是规定.CSV文件的数据时间间隔和

9、数据时间的总长度，如日报表分别为：1H（小时）和1D（1天）。HDWWRITEFILE=1为生成.CSV文件，只有上述标记名义赋值后，才执行他。ERROR这个标记名可以显示生成.CSV文件时是否有错误，调试时非常重要。例如：下面脚本生成一个日期由StartDate1规定，包括两个标记名PI-101,TI-101，日报表。可以复制在你的脚本中，修改一下就可以形成所需的.CSV文件。HDWStartDate=StartDate1;HDWStartTime=”00:00:00”;HDWDBDir=InfoInTouchAppDir();HDWDataDir=HTGetLogDirectory();H

10、DWFilename=C:;HDWTags=$Date,$Time,PI-101,TI-101;HDWInterval=1H;HDWDuration=1D;HDWWRITEFILE=1；HDWDataDir=HTGetLogDirectory();HDWDBDir=InfoInTouchAppDir();HDWStartDate=#;时间控件名称 HDWStartTime=00:00:00;开始时间 HDWFilename=C:;HDWTags=$Date,$Time,zj_AO1,zj_AO2;HDWInterval=1H;HDWDuration=1D;HDWWRITEFILE=1;Step

11、2:招呼打印报表的情况 如果是招呼打印（不定期打印，人工输入打印日期和时间的报表打印），则可以在INTOUCH 中开一个窗口输入 HDWStartDate1，HDWStartTime，HDWInterval，HDWDuration的参数。并做一个按钮，在动作脚本中给固定的参数赋值和最后令 HDWWRITEFILE=1；脚本的例子 形成的.CSV 文件的例子 Step3:定时自动打印的情况 如果是定时自动打印，需要在条件脚本（或数据改变脚本）中写代码完成。这里需要特别注意起始日期和时间。如：日报表示在 0 点以后打印的，所以需要通过计算得到前一天的日期，可以用下面语句 HDWStartDate=

12、StringFromTime($Date-1)*86400,1)。举例：Step4:运行 INTOUCH，检查生成的.CSV 文件。3.建立 EXCEL 报表 Step1:设计一个报表格式。例如：先画出报头 在 EXCEL 导入相应.CSV 文件。找到相应.CSV 文件，一步步导入 选逗号分割，指定导入区域起点单元，为了更直观，可以用 EXCEL 的功能加一个趋势图。Step2:做一个宏 选菜单 工具宏录制新宏，起一个宏名（如 mr1），确认。由于 EXCEL 不允许在有数据的区域导入数据，所以先删除前面导入的数据。选择数据区，按 Del 键 在 EXCEL 重新导入相应.CSV 文件。重复刚

13、才的步骤 打印和保存（报表需要打印时）或另存(报表不需要打印时)。停止记录宏 写 VBA 脚本，让宏自动执行 菜单 工具宏VB 编辑器 双击 ThisWorkBook 在代码区选 WorkBook 在 Private Sub _Open()函数中，加入 Run(“宏名”)关闭 VB 编辑器，返回 Workbook，确定报表的路径和文件名(如 c:,保存报表。这样，我们的报表就完成了。一打开这个报表，就会执行宏，然后退出。在调试时，可以迅速按 Atrl+Break 键停止宏执行。注：在另存的情况下，在宏中找到另存的路径和文件名，用 date,tim 等变量加到文件名中。Step3:用 INTOU

14、CH 打开报表 在 INTOUCH 的相应脚本中加一条语句，启动 EXCEL：StartApp C:Program FilesMicrosoft OfficeOffice c:;这里，C:Program FilesMicrosoft OfficeOffice 是EXCEL的路径和文件名，注意EXCEL的版本不同路径不一样。c:是报表的路径和文件名，之间有一个空格。一个日报表的例子。语句说明：1）规定报表起始日期，2）规定报表起始时间，3）InTouch 的路径，4）存储历史数据文件的路径，5）.CSV 文件的路径和文件名，6）报表包含的标记名，7）报表的采样间隔，8）报表的时间总长度，9）生成报表，10）启动相应的 EXCEL 文件。4.参考应用程序的使用 将文件和复制到 C 盘根目录下。测试时可以用 Ctrl+Brack，停止 EXCEL 的宏程序执行，以便观察宏程序是如何写的。为了顺利运行 EXCEL 报表，EXCEL 的宏的安全级别已设的最低。