GEIP帮助中石化在仪表隐患治理工程中实现控制系统改造,以催化剂奥达分公司为例,三台Cimplicity HMI 直接通过以太网联接Rx3i, Rx3i cpu 通过本地以太网扩展方式连接远程机架,即可以保持用户原有的传统DCS下的操作习惯,并且使用快速先进的PAC实现优化的工艺控制。
中石化从2008年起,对下属分公司的老旧控制系统系统进行了一系列的改造工作。2011年,由GEIP公司负责,分别对胜利油田石化总厂、催化剂奥达分公司,催化剂长岭分公司,燕山石化化工二厂,扬州石化,润滑油北京、茂名、重庆分公司的老旧控制系统进行了成功的改造,使用的产品为GEIP Rx3i及Cimplicity软件。
项目名称
GEIP在中石化仪表隐患治理工程实现控制系统改造
解决方案
以催化剂奥达分公司为例,三台Cimplicity HMI 直接通过以太网联接Rx3i, Rx3i cpu 通过本地以太网扩展方式连接远程机架。用户之前使用的是传统的DCS, 希望保持一些使用习惯,例如:普通oper 用户不可以看到和运行非HMI软件,也看不到桌面;弹出的PID, AUTO_MANUAL等多个回路调节窗口一直在主画面之上,除非用户关闭它们;系统管理员可以不受限制等等。工艺回路调节希望使用串级PID模式但reset 辅助级可以根据工艺特点调整斜率。
在GE智能平台 professional service工程师的帮助下系统集成商实现了用户的期望。
1, 在windows 启动目录下设置快捷方式执行cimplicity 命令行指令
/autostart /captive /nomenutitle /alwaysmaximized c:\Projects\TEST\screens\
用户只可以使用cimplicity HMI的内容
2, 弹出的回路调节窗口添加script 调用windows的窗体
Declare Function SetWindowPos Lib "user32" _
(ByVal hwnd As Long, ByVal hWndInsertAfter As Long, _
ByVal x As Long, ByVal y As Long, ByVal cx As Long, _
ByVal cy As Long, ByVal wFlags As Long) As Long
Const SWP_NOSIZE = &H1
Const SWP_NOMOVE = &H2
Const HWND_TOPMOST = -1
Sub OnScreenOpen()
Dim oCimScr As GefScreen
Set oCimScr = CimGetScreen
ret = SetWindowPos(, HWND_TOPMOST, _
0, 0, 0, 0, SWP_NOMOVE Or SWP_NOSIZE)
isible = True
End Sub
这样多个PID, AUTO_MANUAL等回路调节窗口一直在主画面之上。
3, 热键退出按钮
Declare Function ExitWindowsEx Lib "user32" (ByVal dwOptions As Long, ByVal dwReserved As Long) As Long
Const EWX_LogOff As Long = 0
Const EWX_SHUTDOWN As Long = 1
Const EWX_REBOOT As Long = 2
Const EWX_FORCE As Long = 4
Const EWX_POWEROFF As Long = 8
Sub CheckRole
Dim Role As New Point
TEMP$ = "$ROLE"
= TEMP$
If (Right$(,3) Like "MGR") Then
Begin Dialog SYSMGR_LOGOUT_BOX ,,183,60,"Exiting PMC System",,,1
Text 20,5,150,8,"You are about to Exit the PMC system."
Text 20,15,150,8,"You have a choice of Logging off the system "
Text 20,24,150,8,"or entering the Windows NT Desktop."
PushButton 24,36,40,14,"Logout"
PushButton 76,36,40,14,"Desktop"
CancelButton 128,36,40,14
End Dialog
[DividePage:NextPage]
Dim SYSMGR_LOGOUT As SYSMGR_LOGOUT_BOX
ans% = Dialog(SYSMGR_LOGOUT)
Select Case ans%
Case 0
Exit Sub
Case 1
CimLogout "TEST"
WinClose("OVERVIEW")
stuff = ExitWindowsEx (EWX_LogOff Or EWX_FORCE, 0)
Case 2
CimLogout "TEST"
WinClose("OVERVIEW")
End Select
Else
Begin Dialog OPER_USER_LOGOUT_BOX ,,167,60,"Exiting PMC System",,,1
Text 16,4,150,8,"You are about to Exit the PMC system."
Text 16,15,150,8,"Click OK to Exit PMC"
Text 16,25,150,8,"Click Cancel to return to PMC"
OKButton 20,40,40,14
CancelButton 72,40,40,14
End Dialog
Dim OPER_USER_LOGOUT As OPER_USER_LOGOUT_BOX
ans% = Dialog(OPER_USER_LOGOUT)
Select Case ans%
Case 0
Exit Sub
Case -1
CimLogout "TEST"
WinClose("OVERVIEW")
stuff = ExitWindowsEx (EWX_LogOff Or EWX_FORCE, 0)
End Select
End If
End Sub
这样根据CIMPLICITY用户的角色可以选择退出windows 或回到desktop。
4, 斜率调节下一级主PID回路的设定值。
模拟量输入直接使用32位浮点数,精度较之前的系统大为提高,小于10ms的PID回路运算输出使得PID的调节工作大为简化。同时,根据具体回路的调节经验获得斜率曲线,调整主PID回路的给定值,简单有效的实现了工艺的PID整定。这得益于27Mbps的PCI背板带宽和1GHz可运行纯符号变量的cpu的能力.
实施结果
保持了用户原有的传统DCS下的操作习惯,使用了快速先进的PAC实现优化的工艺控制,使得石化行业的用户对在其他行业广为使用的Cimplicity HMI/SCADA plus PACs system 有了更准确的理解。
关于GE智能平台
GE智能平台是一个提供高新技术的企业,它为世界各地的用户提供用于自动化控制的软件、硬件和技术服务以及嵌入式计算。我们为用户提供一个独特的,灵活的,超可靠的技术基础,使得他们在包括能源、水处理、消费品、国防和防御,以及通讯等产业领域获得持续的优势。GE智能平台是一家总部设在美国弗吉尼亚州的夏洛茨维尔的全球性企业,是GE企业解决方案集团公司的一员。想获取更多信息,请访问:。
(转载)