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 = 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)

ผลลัพธ์ (อังกฤษ) 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 = 2 ED_INTC2. P02 = 2 wait until (ACLMPAC2. P04 == 2 and ACLMPBC2. P04 == 2 and ED_INT_1. == 2) PV %%.MONSTEP = 117*Liga a bombaBb_ACLMP.MODE = "AUT"Bb_ACLMP.CSV = 2*Aguarda bomba ligada e limite de pressaowait 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 ifFUNC_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)

ผลลัพธ์ (อังกฤษ) 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 = 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)