wait until (%%.SINCRHLD == 1) !Aguarda sincronismo de HOLD p/ Running
*Step procedure AC LIMPEZA e liberação do "HOLD" pela monitoração
%%.MONSTEP = 30
*Libera botão de HOLD para operador
%%.swop[3] = 0 !Botão de HOLD
*Estado AC LIMPEZA
%%.ESTADO = 30
*Step procedure AC LIMPEZA
%%.MONSTEP = 100
*Reseta timer de supervisão de introdução de AC LIMPEZA
C_TIMER = "RESETAR" !Comando RESETAR para função timer
FUNC_TM1 (TMSUPACL,C_TIMER) !Função timer (sebol user function)
*Carrega timer de supervisão de introdução de AC LIMPEZA
TMSUPACL.PH = %%.SUP2_ACL
*Inicia timer de supervisão de introdução de AC LIMPEZA
C_TIMER = "INICIAR" !Comando INICIAR para função timer
FUNC_TM1 (TMSUPACL,C_TIMER) !Função timer (sebol user function)
*Fecha válvula de cabeça de Limpeza,introducao ED
ACLMPAC2.P02 = 0
ACLMPBC2.P02 = 0
ED_INTC2.P02 = 0
AI_INTC2.P02 = 0
*Aguarda válvula de Limpeza do reator, introducao ED fechadas, e recirculação aberta :
wait until (ACLMPAC2.P04 == 0 and ACLMPBC2.P04 == 0 and ED_INT_1.PV == 0 and ED_REC_1.PV == 0 and AI_INT_1.PV == 0)!31-07-2012!01-09-2012
*Step procedure AC LIMPEZA
%%.MONSTEP = 110
TMENTAB = (%%.TMLMPACA-50)
TMENTAB = dmax(TMENTAB,0)
TMINA = %%.TMLMPACA
TMENTAB = %%.TMABRVV2
*Step procedure AC LIMPEZA
%%.MONSTEP = 115
* ABRE VÁLVULA DE CABEÇA E LIMPEZA
ACLMPAC2.P02 = 2
ACLMPBC2.P02 = 2
ED_INTC2.P02 = 2
wait until (ACLMPAC2.P04 == 2 and ACLMPBC2.P04 == 2 and ED_INT_1.PV == 2)
%%.MONSTEP = 117
*Liga a bomba
Bb_ACLMP.MODE = "AUT"
Bb_ACLMP.CSV = 2
*Aguarda bomba ligada e limite de pressao
wait until (Bb_ACLMP.PV == 2 and PI_LAV.PV < %%.PRES1)
*Step procedure AC LIMPEZA
%%.MONSTEP = 120
*Step procedure AC LIMPEZA
%%.MONSTEP = 125
*Step procedure AC LIMPEZA
%%.MONSTEP = 130
* Step procedure AC LIMPEZA :
%%.MONSTEP = 140
* Aguarda limite de pressão :
wait until (PI_LAV.PV>=%%.PRES2)
* Step procedure AC LIMPEZA :
%%.MONSTEP = 145
* Inicia ou continua (se retorno de HOLD) o timer de limpeza pela válvula A e B:
if (TMINAACL.PV==0) then
C_TIMER = "INICIAR"
else
C_TIMER = "CONTINUAR"
end if
FUNC_TM1(TMINAACL,C_TIMER)
*end if
* Step procedure AC LIMPEZA :
%%.MONSTEP = 146
* Estado AC LIMPEZA :
%%.ESTADO = 40
* Aguarda cumprimento do tempo de limpeza pela válvula A e B:
wait until(TMINAACL.PV>=TMINA)
*Desliga a bomba
Bb_ACLMP.MODE = "AUT"
Bb_ACLMP.CSV = 0
*Aguarda bomba desligada
wait until (Bb_ACLMP.PV == 0)
* Fecha a válvula A e B de limpeza :
ACLMPAC2.P02=0
ACLMPBC2.P02=0
* Aguarda válvula de limpeza A e B da AC fechada:
wait until ((ACLMPAC2.P04==0) and (ACLMPBC2.P04==0))
* Garanto que o timer da válvula A está em atualização :
if ( (TMINAACL.BSTS=="STOP") or (TMINAACL.BSTS=="PAUS") ) then
if (TMINAACL.PV==0) then
C_TIMER = "INICIAR"
else
C_TIMER = "CONTINUAR"
end if
FUNC_TM1(TMINAACL,C_TIMER)
end if
* Congela o timer de limpeza pela válvula A e B:
C_TIMER = "CONGELAR"
FUNC_TM1(TMINAACL,C_TIMER)
wait until (%%. SINCRHLD = = 1). Waits HOLD sync p/Running* Step procedure AC cleaning and release of "HOLD" by monitoring%%. MONSTEP = 30* Releases HOLD button to operator%%. swop [3] = 0. HOLD button* State AC CLEANING%%. State = 30* Step procedure AC CLEANING%%. MONSTEP = 100* Supervisory timer Resets to introduce AC CLEANINGC_TIMER = "RESET". Command to RESET timer functionFUNC_TM1 (TMSUPACL, C_TIMER). Timer function (sebol user function)* Loads of supervision timer AC CLEANINGTMSUPACL. PH =%%. SUP2_ACL* Starts introducing supervision timer AC CLEANINGC_TIMER = "START"! Start command for timer functionFUNC_TM1 (TMSUPACL, C_TIMER). Timer function (sebol user function)* Close head cleaning, valve opening ED ACLMPAC2. P02 = 0ACLMPBC2. P02 = 0ED_INTC2. P02 = 0AI_INTC2. P02 = 0* Waits for ballast Cleaning valve, opening closed and open recirculation ED: wait until (ACLMPAC2. P04 == 0 and ACLMPBC2. P04 == 0 and ED_INT_1.0 and ED_REC_1 == PV. PV == 0 and AI_INT_1.0) == PV! 7/31/2012! 9/1/2012* Step procedure AC CLEANING%%. MONSTEP = 110TMENTAB = (%%. TMLMPACA-50)TMENTAB = dmax (TMENTAB .0)TMINA =%%. TMLMPACA TMENTAB =%%. TMABRVV2 * Step procedure AC CLEANING%%. MONSTEP = 115* OPEN HEAD VALVE AND CLEANING ACLMPAC2. P02 = 2 ACLMPBC2. P02 = 2 ED_INTC2. P02 = 2 wait until (ACLMPAC2. P04 == 2 and ACLMPBC2. P04 == 2 and ED_INT_1. == 2) PV %%. MONSTEP = 117* Turn on the pumpBb_ACLMP. MODE = "AUT"Bb_ACLMP. CSV = 2* Waits on and pump pressure limitwait until (Bb_ACLMP. PV = = 2 and PI_LAV. <% PV. PRES1)* Step procedure AC CLEANING%%. MONSTEP = 120* Step procedure AC CLEANING%%. MONSTEP = 125* Step procedure AC CLEANING%%. MONSTEP = 130 * Step procedure AC cleaning: %%. MONSTEP = 140 * Waits for pressure limit: wait until (PI_LAV. > PV =%%. PRES2) * Step procedure AC cleaning: %%. MONSTEP = 145* Starts or continues (if return of HOLD) cleaning the timer through the valve A and b:If (TMINAACL. PV == 0) then C_TIMER = "START"else C_TIMER = "CONTINUE"end ifFUNC_TM1 (TMINAACL, C_TIMER)* end if* Step procedure AC cleaning:%%. MONSTEP = 146* State AC Cleaning:%%. State = 40* Waits for fulfilment of the purge time for the valve A and b: wait until (TMINAACL. PV > = TMINA) * Turn off the pump Bb_ACLMP. MODE = "AUT" Bb_ACLMP. CSV = 0 * Waits for off pump wait until (Bb_ACLMP. PV == 0) * Close valve A and B: ACLMPAC2. P02 = 0 ACLMPBC2. P02 = 0* Waits for cleaning valve A and B closed CA: wait until ((ACLMPAC2. P04 == 0) and (ACLMPBC2. P04 == 0))* Guarantee that the timer of the valve is in update:If ((TMINAACL. BSTS == "STOP") or (TMINAACL. BSTS == "STICKS")) then If (TMINAACL. PV == 0) then C_TIMER = "START" else C_TIMER = "CONTINUE" end if FUNC_TM1 (TMINAACL, C_TIMER)end if* Freezes the timer of the cleaning valve A and b:C_TIMER = "FREEZE"FUNC_TM1 (TMINAACL, C_TIMER)
การแปล กรุณารอสักครู่..

wait until (%%. SINCRHLD == 1)! Wait HOLD sync w / Running
* Step procedure AC CLEANING and release the "HOLD" for monitoring
%%. MONSTEP = 30
* Libera HOLD button for operator
%%. swop [ 3] = 0! HOLD button
* State AC CLEANING
%%. STATE = 30
* Step procedure AC CLEANING
%%. MONSTEP = 100
* Reset input supervision timer AC CLEANING
C_TIMER = "reset"! RESET command to function timer
FUNC_TM1 (TMSUPACL, C_TIMER)! Function timer (SEBOL user function)
* Loads AC input monitoring timer CLEANING
TMSUPACL.PH = %%. SUP2_ACL
* Start input supervision timer AC CLEANING
C_TIMER = "START"! Command START for timer function
FUNC_TM1 (TMSUPACL, C_TIMER)! function timer (SEBOL user function)
* Closes Cleaning head valve, introduction ED
ACLMPAC2.P02 = 0
ACLMPBC2.P02 = 0
ED_INTC2.P02 = 0
AI_INTC2.P02 = 0
* Pending valve ballast Cleaning, introduction ED closed and open recirculating:
wait until (ACLMPAC2.P04 == 0 and ACLMPBC2.P04 == 0 and ED_INT_1.PV == 0 and ED_REC_1.PV == 0 and AI_INT_1.PV == 0 )! 31-07-2012! 09.01.2012
* Step procedure AC CLEANING
%%. MONSTEP = 110
TMENTAB = (%%. TMLMPACA-50)
TMENTAB = dmax (TMENTAB, 0)
TMINA = %%. TMLMPACA
TMENTAB = %%. TMABRVV2
* Step procedure AC CLEANING
%%. MONSTEP = 115
* OPENS HEAD VALVE AND CLEANING
ACLMPAC2.P02 = 2
ACLMPBC2.P02 = 2
ED_INTC2.P02 = 2
wait until (ACLMPAC2.P04 == 2 and ACLMPBC2.P04 == 2 and ED_INT_1.PV == 2) %%. MONSTEP = 117 * Connects the pump Bb_ACLMP.MODE = "AUT" Bb_ACLMP.CSV = 2 * Pending pump on pressure and limit wait until (Bb_ACLMP.PV == 2 and PI_LAV.PV <%% preS1). * Step procedure AC CLEANING %% MONSTEP = 120. * Step procedure AC CLEANING %% MONSTEP = 125. * Step procedure AC CLEANING %% MONSTEP = 130. * Step procedure AC CLEANING: % .MONSTEP% = 140 * Pending pressure limit: wait until (PI_LAV.PV> = %% preS2.) * Step procedure AC cLEANING: . MONSTEP %% = 145 * Starts or continues (if HOLD return) the cleaning timer the valve A and B: if (TMINAACL.PV == 0) then C_TIMER = "START" else C_TIMER = "CONTINUE" end if FUNC_TM1 (TMINAACL, C_TIMER) * end if * Step procedure AC CLEANING: %% MONSTEP = 146. * State AC cLEANING: %% STATE = 40. * Pending compliance with the cleaning time for the valve a and B: wait until (TMINAACL.PV> = TMINA) * Turn off the pump Bb_ACLMP.MODE = "AUT" Bb_ACLMP.CSV = 0 * Pending pump off wait until (Bb_ACLMP.PV == 0) * close the valve a and B cleaning: ACLMPAC2.P02 = 0 ACLMPBC2.P02 = 0 * Pending cleaning valve a and B AC closed: wait until (( ACLMPAC2.P04 == 0) and (ACLMPBC2.P04 == 0)) * assure that the timer of the valve is updated: if ((TMINAACL.BSTS == "STOP") or (TMINAACL.BSTS == "PAUS ")) then if (TMINAACL.PV == 0) then C_TIMER =" START " else C_TIMER =" CONTINUE " end if FUNC_TM1 (TMINAACL, C_TIMER) end if * Freezes the timer cleaning the valve a and B: C_TIMER =" FREEZE " FUNC_TM1 (TMINAACL, C_TIMER)
การแปล กรุณารอสักครู่..

Wait until (%%.Sincrhld = = 1). Pending synchronization hold P / running* step procedure AC cleaning and release of the "hold" for monitoring.%%.Monstep = 30* release button hold for operator.%%.Swop [3] = 0. Hold button.* state AC cleaning%%.Estado = 30* step cleaning procedure CA%%.Monstep = 100* reset timer supervisory input AC cleaning(C _ timer = "reset". The command reset for function timer.Func _ TM1 (tmsupacl, C _ timer). The function timer (sebol user function)* load timer supervisory input AC cleaningTmsupacl.ph =%.Sup2 _ FTA* starts timer supervisory input AC cleaning(C _ timer = "start!" The command start to function timer.Func _ TM1 (tmsupacl, C _ timer). The function timer (sebol user function)* close the valve head cleaning, introduction.Aclmpac2.p02 = 0Aclmpbc2.p02 = 0Ed _ intc2.p02 = 0There _ intc2.p02 = 0* awaits valve cleaning of the reactor, introduction ed closed and open):Wait until (aclmpac2.p04 = = 0 and aclmpbc2.p04 = = 0 and ED _ int _ 1.pv = = 0 and ED _ rec _ 1.pv = = 0 and there _ int _ 1.pv = = 0). 31 - 07, 2012! 01 to 2009 - 2012* step cleaning procedure CA.monstep = 110%%Tmentab = (%%.Tmlmpaca - 50)Tmentab = Dmax (tmentab, 0)Tmina =%.TmlmpacaTmentab =%.Tmabrvv2* step cleaning procedure CA%%.Monstep = 115Open valve head and cleaningAclmpac2.p02 = 2Aclmpbc2.p02 = 2Ed _ intc2.p02 = 2Wait until (aclmpac2.p04 = = 2 and aclmpbc2.p04 = = 2 and ED _ int _ 1.pv = = 2).monstep = 117%%* connects the pumpBB _ aclmp.mode = "Y"BB _ aclmp.csv = 2* awaits pump on and limit pressureWait until (BB _ aclmp.pv = = 2 and IP _ lav.pv <%.Pres1)* step cleaning procedure CA%%.Monstep = 120* step cleaning procedure CA.monstep = 125%* step cleaning procedure CA%%.Monstep = 130* step cleaning procedure BC:%%.Monstep = 140* awaits limit of pressure:Wait until (IP _ lav.pv > =%.Pres2)* step cleaning procedure BC:%%.Monstep = 145* starts or continues (return of hold) the timer cleaning through the valve A and B:If (tminaacl.pv = = 0) then(C _ timer = "start"Else(C _ timer = "continue"End ifFunc _ TM1 (tminaacl, C _ timer)* end if* step cleaning procedure BC:%%.Monstep = 146* state AC cleaning:.estado = 40%%* pending compliance with the cleaning time by the valve A and B:Wait until (tminaacl.pv > = tmina)* shuts off the pumpBB _ aclmp.mode = "Y"BB _ aclmp.csv = 0* awaits bomb offWait until (BB _ aclmp.pv = = 0)* close valve A and B for cleaning.Aclmpac2.p02 = 0Aclmpbc2.p02 = 0* awaits cleaning valve B and the AC closed:Wait until (aclmpac2.p04 = = 0) and (aclmpbc2.p04 = = 0))I guarantee that the timer valve is in updating:If ((tminaacl.bsts = = "stop") or (tminaacl.bsts = = "sticks") thenIf (tminaacl.pv = = 0) then(C _ timer = "start"Else(C _ timer = "continue"End ifFunc _ TM1 (tminaacl, C _ timer)End if* freezes the timer cleaning through the valve A and B:(C _ timer = "freeze."Func _ TM1 (tminaacl, C _ timer)
การแปล กรุณารอสักครู่..
