当前位置：工控论坛 > > 产品 > 自动化软件 > 力控(sunwayland)

力控历史报表自动存盘脚本,求指导 点击：3167 | 回复：3



好多第一次

    
  • 精华：0帖
  • 求助：0帖
  • 帖子：1帖 | 249回
  • 年度积分：0
  • 历史总积分：15
  • 注册：2013年12月17日
发表于：2016-11-25 16:15:42
楼主

要求是历史报表记录可自动导出。每周日的24时00分自动导出上一周的数据，数据间隔时间1分钟。导出数据分别存放在D:\DATA\目录的文件夹下。每个机组保存过去六周的数据，超过6周的数据会被删除。下面是自己编的脚本，求指导；

 IF $Week==7&&$Hour==24 THEN 数据记录自动保存.cvs=数据记录自动保存.cvs+1 

else if $Week==1 then 

当前年份X=$year;

当前月份Y=$month; 

当前日期Z=$day;

else if 数据记录自动保存.cvs==6 then

数据记录自动保存.cvs=0

ENDIF 

ENDIF 

ENDIF 


SWITCH (数据记录自动保存.cvs)

CASE 1 :

 #HisReport.SetTime(当前年份X,当前月份Y,当前日期Z,0,0,0);

 #HisReport.SetTimeSpan(604800,60); 

 #HisReport.SaveCSV("d:\data\历史数据记录1.csv")

CASE 2:

#HisReport.SetTime(当前年份X,当前月份Y,当前日期Z,0,0,0); 

#HisReport.SetTimeSpan(604800,60); 

#HisReport.SaveCSV("d:\data\历史数据记录2.csv") 

CASE 3:

#HisReport.SetTime(当前年份X,当前月份Y,当前日期Z,0,0,0); 

#HisReport.SetTimeSpan(604800,60); 

#HisReport.SaveCSV("d:\data\历史数据记录3.csv") 

CASE 4: 

#HisReport.SetTime(当前年份X,当前月份Y,当前日期Z,0,0,0); 

#HisReport.SetTimeSpan(604800,60); 

#HisReport.SaveCSV("d:\data\历史数据记录4.csv") 

CASE 5: 

#HisReport.SetTime(当前年份X,当前月份Y,当前日期Z,0,0,0); 

#HisReport.SetTimeSpan(604800,60);

#HisReport.SaveCSV("d:\data\历史数据记录5.csv")

CASE 6: 

#HisReport.SetTime(当前年份X,当前月份Y,当前日期Z,0,0,0); 

#HisReport.SetTimeSpan(604800,60);

#HisReport.SaveCSV("d:\data\历史数据记录6.csv")


DEFAULT:


ENDSWITCH


分享到：
收藏 邀请回答 回复楼主 举报



好多第一次

  • 精华：0帖
  • 求助：0帖
  • 帖子：1帖 | 249回
  • 年度积分：0
  • 历史总积分：15
  • 注册：2013年12月17日
发表于：2016-11-25 16:18:19
1楼

请教大家如何怎么能测试该脚本？脚本能实现上述功能么？

回复 引用 举报

huttecer

  • 精华：0帖
  • 求助：0帖
  • 帖子：10帖 | 20回
  • 年度积分：0
  • 历史总积分：37
  • 注册：2016年11月25日
发表于：2016-11-25 16:36:00
2楼

坐等答案，帮你顶一下

脉电线切割


回复 引用 举报

好多第一次

  • 精华：0帖
  • 求助：0帖
  • 帖子：1帖 | 249回
  • 年度积分：0
  • 历史总积分：15
  • 注册：2013年12月17日
发表于：2016-11-28 09:12:40
3楼

自己顶一下，求大家帮忙

回复 引用 举报

热门招聘
相关主题

官方公众号
智造工程师