wait until (%%.SINCRHLD == 1) !Agua

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 = 0
ED_INTC2.P02 = 2
wait until (ACLMPAC2.P04 == 2 and ACLMPBC2.P04 == 0 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

*Abre válvula de introdução
*ED_INTC2.P02 = 2

*Aguarda valvula de introducao aberta
*wait until (ED_INT_1.PV == 2)

*Step procedure AC LIMPEZA
%%.MONSTEP = 125


*Step procedure AC LIMPEZA
%%.MONSTEP = 130

* Caso já não tenha sido concluída a limpeza pela válvula A (caso de retorno de HOLD ) :
*if ( TMINAACL.PV < (TMINA-ACLMP_1A.MTM) ) then

* Abre a válvula de limpeza A da AC :
* ACLMPAC2.P02=2

* Aguarda válvula de limpeza A da AC aberta :
* wait until(ACLMPAC2.P04==2)

* 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 :
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 :
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 de limpeza :
ACLMPAC2.P02=0

* Abre válvula de limpeza B da AC :
ACLMPBC2.P02=2

* Aguarda válvula de limpeza A da AC fechada:
wait until (ACLMPAC2.P04==0)

* Aguarda válvula de limpeza B da AC aberta :
wait until(ACLMPBC2.P04==2)

*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 = 147

* Aguarda limite de pressão :
wait until(PI_LAV.PV>=%%.PRES2)

* Step procedure AC LIMPEZA :
%%.MONSTEP = 148

* Inicia ou continua (se retorno de HOLD) o timer de limpeza pela válvula B :
if (TMINBACL.PV==0) then
C_TIMER = "INICIAR"
else
C_TIMER = "CONTINUAR"
end if
FUNC_TM1(TMINBACL,C_TIMER)

* 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

* Step procedure AC LIMPEZA :
%%.MONSTEP = 150

* Fecha a válvula A de limpeza :
ACLMPAC2.P02=0

* Congela o timer de limpeza pela válvula A :
C_TIMER = "CONGELAR"
FUNC_TM1(TMINAACL,C_TIMER)

* Aguarda cumprimento do tempo de limpeza pela válvula B :
wait until(TMINBACL.PV>=%%.TMLMPACB)

* Step procedure AC LIMPEZA :
%%.MONSTEP = 160

*Desliga a bomba
Bb_ACLMP.MODE = "AUT"
Bb_ACLMP.CSV = 0

*Aguarda bomba desligada
wait until (Bb_ACLMP.PV == 0)

* Step procedure AC LIMPEZA :
%%.MONSTEP = 170

* Fecha a válvula de limpeza B :
ACLMPBC2.P02=0

* Aguarda confirmação de ambas as válvulas A e B fechadas :
wait until( (ACLMPAC2.P04==0) and (ACLMPBC2.P04==0) )

* Step procedure AC LIMPEZA :
%%.MONSTEP = 180

* Congela o timer de limpeza pela válvula B :
C_TIMER = "CONGELAR"
FUNC_TM1(TMINBACL,C_TIMER)

ผลลัพธ์ (อังกฤษ) 1:

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 = 0 ED_INTC2. P02 = 2 wait until (ACLMPAC2. P04 == 2 and ACLMPBC2. P04 == 0 and ED_INT_1. PV == 2) %%. 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* Open introduction valve* ED_INTC2. P02 = 2* Waits for opening valve open* wait until (ED_INT_1. PV == 2)* Step procedure AC CLEANING%%. MONSTEP = 125* Step procedure AC CLEANING%%. MONSTEP = 130* If you haven't already completed the cleaning valve (HOLD back):* if (TMINAACL. PV (TMINA <-ACLMP _ 1A. MTM)) then * Open the cleaning valve AC:* ACLMPAC2. P02 = 2 * Waits for the cleaning of AC valve open:* wait until (ACLMPAC2. P04 == 2) * 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) the timer by cleaning the valve: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: 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) * Closes the valve for cleaning up: ACLMPAC2. P02 = 0 * Open valve B cleaning of AC:ACLMPBC2. P02 = 2* Waits for the cleaning of AC valve closed: wait until (ACLMPAC2. P04 == 0) * Waits for cleaning B AC valve open:wait until (ACLMPBC2. P04 == 2)* Turn on the pump Bb_ACLMP. MODE = "AUT" Bb_ACLMP. CSV = 2 * Waits on and pump pressure limit wait until (Bb_ACLMP. PV = = 2 and PI_LAV. <% PV. PRES1) * Step procedure AC cleaning:%%. MONSTEP = 147* Waits for pressure limit: wait until (PI_LAV. > PV =%%. PRES2) * Step procedure AC cleaning:%%. MONSTEP = 148* Starts or continues (if return of HOLD) cleaning the timer through the valve (B):If (TMINBACL. PV == 0) then C_TIMER = "START"else C_TIMER = "CONTINUE"end ifFUNC_TM1 (TMINBACL, C_TIMER)* 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* Step procedure AC cleaning:%%. MONSTEP = 150* Closes the valve for cleaning up:ACLMPAC2. P02 = 0* Freezes the timer by cleaning the valve:C_TIMER = "FREEZE"FUNC_TM1 (TMINAACL, C_TIMER)* Waits for fulfilment of the purge time for the valve (B):wait until (TMINBACL. > PV =%%. TMLMPACB)* Step procedure AC cleaning:%%. MONSTEP = 160* Turn off the pumpBb_ACLMP. MODE = "AUT"Bb_ACLMP. CSV = 0* Waits for off pump wait until (Bb_ACLMP. PV == 0)* Step procedure AC cleaning:%%. MONSTEP = 170* Close cleaning valve (B):ACLMPBC2. P02 = 0* Aguarda confirmação de ambas as válvulas A e B fechadas :wait until( (ACLMPAC2.P04==0) and (ACLMPBC2.P04==0) )* Step procedure AC LIMPEZA :%%.MONSTEP = 180* Congela o timer de limpeza pela válvula B :C_TIMER = "CONGELAR"FUNC_TM1(TMINBACL,C_TIMER)

ผลลัพธ์ (อังกฤษ) 2:

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 = 0 ED_INTC2.P02 = 2 wait until (ACLMPAC2.P04 == 2 and ACLMPBC2.P04 == 0 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 * open the input valve * ED_INTC2.P02 = 2 * Pending valve open introduction * wait until (ED_INT_1.PV == 2) * Step procedure AC cLEANING %% MONSTEP = 125. * Step procedure AC cLEANING %% MONSTEP = 130. * if the cleaning has not been completed by the valve (HOLD return if): * if (TMINAACL.PV <(TMINA -ACLMP_1A.MTM)) then * open cleaning valve the AC: * ACLMPAC2.P02 = 2 * Pending cleaning valve the AC open: * wait until (ACLMPAC2.P04 == 2) * 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 timer by cleaning the valve: 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: 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) * Closes cleaning valve: ACLMPAC2.P02 = 0 * Open B cleaning valve AC: ACLMPBC2.P02 = 2 * Pending cleaning valve the AC closed: wait until (ACLMPAC2.P04 == 0) * Pending clean valve B AC open: wait until (ACLMPBC2.P04 == 2) * Connects the pump Bb_ACLMP.MODE = "AUT" Bb_ACLMP.CSV = 2 * Pending pump on and limit of pressure wait until (Bb_ACLMP.PV == 2 and PI_LAV.PV <%% preS1.) * Step procedure AC CLEANING: . MONSTEP %% = 147 * Pending pressure limit: wait until (PI_LAV.PV> = %%. preS2) * Step procedure AC cLEANING: . MONSTEP %% = 148 * Starts or continues (if HOLD return) the timer cleaning the valve B: if (TMINBACL.PV == 0) then C_TIMER = "START" else C_TIMER = "CONTINUE" end if FUNC_TM1 (TMINBACL, C_TIMER) * 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 * Step procedure AC cLEANING: %% MONSTEP = 150. * Close the cleaning valve: ACLMPAC2 .P02 = 0 * Freezes the valve for cleaning timer a: C_TIMER = "FREEZE" FUNC_TM1 (TMINAACL, C_TIMER) * Pending compliance with the cleaning time for the valve B: (. TMINBACL.PV> = %% TMLMPACB) wait until * Step procedure AC CLEANING: . MONSTEP %% = 160 * Turn off the pump Bb_ACLMP.MODE = "AUT" Bb_ACLMP.CSV = 0 * Pending pump off wait until (Bb_ACLMP.PV == 0) * Step procedure AC CLEANING: %%. MONSTEP = 170 * Closes the cleaning valve B: ACLMPBC2.P02 = 0 * Pending confirmation of both valves a and B closed: wait until ((ACLMPAC2.P04 == 0) and (ACLMPBC2.P04 == 0)) * Step procedure AC cLEANING: . MONSTEP %% = 180 * Freezes the timer cleaning the valve B: C_TIMER = "FREEZE" FUNC_TM1 (TMINBACL, C_TIMER)

ผลลัพธ์ (อังกฤษ) 3:

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 = 0Ed _ intc2.p02 = 2Wait until (aclmpac2.p04 = = 2 and aclmpbc2.p04 = = 0 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 = 120Open valve to release* ed _ intc2.p02 = 2* awaits introduction valve open* wait until (ED _ int _ 1.pv = = 2)* step cleaning procedure CA.monstep = 125%* step cleaning procedure CA%%.Monstep = 130* if it has not been completed by the cleaning valve (the case of return hold):* if (tminaacl.pv < (tmina - aclmp _ 1a.mtm)) thenOpen the valve of cleaning the BC:* aclmpac2.p02 = 2* awaits cleaning valve of AC open:* wait until (aclmpac2.p04 = = 2)* 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 by the valve.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.Wait until (tminaacl.pv > = tmina)* shuts off the pumpBB _ aclmp.mode = "Y"BB _ aclmp.csv = 0* awaits bomb offWait until (BB _ aclmp.pv = = 0)* shut the valve cleaning.Aclmpac2.p02 = 0Open the valve cleaning B of the BC:Aclmpbc2.p02 = 2* awaits cleaning valve of AC closed:Wait until (aclmpac2.p04 = = 0)* awaits cleaning valve B of the AC open:Wait until (aclmpbc2.p04 = = 2)* 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 BC:%%.Monstep = 147* awaits limit of pressure:Wait until (IP _ lav.pv > =%.Pres2)* step cleaning procedure BC:%%.Monstep = 148* starts or continues (return of hold) the timer valve cleaning by B:If (tminbacl.pv = = 0) then(C _ timer = "start"Else(C _ timer = "continue"End ifFunc _ TM1 (tminbacl, C _ timer)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* step cleaning procedure BC:%%.Monstep = 150* shut the valve cleaning.Aclmpac2.p02 = 0* freeze the timer valve cleaning by:(C _ timer = "freeze."Func _ TM1 (tminaacl, C _ timer)* pending compliance with the cleaning time by the valve B:Wait until (tminbacl.pv > =%.Tmlmpacb)* step cleaning procedure BC:%%.Monstep = 160* shuts off the pumpBB _ aclmp.mode = "Y"BB _ aclmp.csv = 0* awaits bomb offWait until (BB _ aclmp.pv = = 0)* step cleaning procedure BC:%%.Monstep = 170* close valve cleaning B:Aclmpbc2.p02 = 0* awaits confirmation of both valves a and B are closed:Wait until (aclmpac2.p04 = = 0) and (aclmpbc2.p04 = = 0))* step cleaning procedure BC:%%.Monstep = 180* freeze the timer valve cleaning by B:(C _ timer = "freeze."Func _ TM1 (tminbacl, C _ timer)