超碰激情 I 成人福利网站 I 淫国产 I 曰批视频免费30分钟成人 I 刘亦菲裸体视频一区二区三区 I 午夜久 I 尤物综合 I 亚洲一区av在线观看 I 欧美亚洲国产精品久久高清 I 欧美老熟妇乱子伦视频 I 无码中出人妻中文字幕av I 久久美女福利视频 I 精品无人区乱码1区2区3区在线 I 性饥渴的农村熟妇 I 色综合综合色 I 少妇人妻88久久中文字幕 I 久久夜色精品国产噜噜av I 老熟妇仑乱视频一区二区 I 男女做爰猛烈叫床视频动态图 I 日本大片一区二区 I 人成午夜免费视频在线观看 I 激情婷婷av I 男女下面一进一出免费视频网站 I 久久影视一区 I 午夜污网站 I 先锋人妻无码av电影 I 久久久久久久岛国免费网站 I 又粗又大又黄又硬又爽免费看 I 人妻无码免费一区二区三区 I www.色成人100 I 欧美高清网站 I 精品国产第一页 I 国产suv一区二区三区88区 I 橹图极品美女无圣光 I 午夜宅男欧美

       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 命令行指令
        CimView.exe /autostart /captive /nomenutitle /alwaysmaximized c:ProjectsTESTscreensOverview.cim
        用戶只可以使用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(oCimScr.hwnd, HWND_TOPMOST, _ 
        0, 0, 0, 0, SWP_NOMOVE Or SWP_NOSIZE) 
        oCimScr.TitleVisible = 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"
        Role.Id = TEMP$
        Role.Get
        If (Right$(Role.Value,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