* * ------------------------------

*
* -------------------------------------------------------------------------------------------------------
*
* Sequence name : SFCOACLX * Sequence name: SFCOACLX
* Bloco : LIMPEZA A e B * Block: cleaning A and B
* Tipo de bloco : bloco de sequencia (sequencia) * Type of block: block sequence (sequence)
* Tipo de Instrumento : Operacao * Type of instrument: Operation
* Tipo de sequencia : Operacao da BPO ACLX * Sequence type: Operation of ACLX BPO
* Autor : * Author: 
* Data 19/02/2014 - Modificado para flushing após limpeza AC * 2/19/2014 Date-Modified for flushing after cleaning AC
* * 
* Descricao : Este e o bloco FLUSHING após limpeza AC * Description: This and the FLUSHING block after cleaning AC
*
* -------------------------------------------------------------------------------------------------------
*

wait until (%%.SINCRHLD == 1) !Aguarda sincronismo de HOLD p/ Running

IF (%%.HOLD_FLS == 0) THEN

*Step procedure AC LIMPEZA e liberação do "HOLD" pela monitoração
%%.MONSTEP = 500
*Libera botão de HOLD para operador
%%.swop[3] = 0 !Botão de HOLD

*Estado AC LIMPEZA
%%.ESTADO = 50

TMINCACL.PH = %%.SUP3_ACL

C_TIMER = "INICIAR"
FUNC_TM1(TMINCACL,C_TIMER)

*Fecha válvula de cabeça
EQ_CABC2.P02 = 0

*Fecha válvula de introdução de AGUA FRIA do reator
EQ_INTC2.P02 = 0

*Fecha válvula de introdução de AGUA FRIA
EDS_C2.P02 = 0

*Fecha válvula (seletor) de vazão de EDQ
PCINTRO.MODE = "MAN"
PCINTRO.MV = 50
PCCIRC.MODE = "MAN"
PCCIRC.MV = 50

wait until (EQ_CAB1.PV == 0 AND XV_EDS.PV == 0 AND EQ_INT1.PV == 0)

*Step procedure AC LIMPEZA
%%.MONSTEP = 510

for i=1 to %%.QTD_FLSH

*Step procedure AC LIMPEZA
%%.MONSTEP = 530

*Zera totalização (FIC81008.SUM)
FCINTRO.SUM = 0

*Abre TV81406 (TIC81405)
TCMIX.MODE = "MAN"
TCMIX.MV = 10

*Abre válvula de introdução de AGUA DESMI QUENTE (HS-83000-1B)
EQ_INTC2.P02 = 2

*Abre válvula de introdução de AGUA FRIA (HS-81011)
EDS_C2.P02 = 2

*Passa válvula (seletor) de vazão de EDQ para 50%
FCINTRO.MODE = "MAN"
FCINTRO.MV = 50

*Liga bomba G-7021
Bb_EDS.MODE = "AUT"
Bb_EDS.CSV = 2

wait until (Bb_EDS.PV == 2 AND TCMIX.MODE == "MAN" AND TCMIX.MV == 10 AND EQ_INT1.PV == 2 AND XV_EDS.PV == 2
AND FCINTRO.MODE == "MAN" AND FCINTRO.MV == 50)

*Step procedure AC LIMPEZA
%%.MONSTEP = 540

*Abre válvula de cabeça na posição intermediária (HS-83000-1A)
EQ_POS.PV = 1

wait until (EQ_CABC3.P04 == 1 AND FCINTRO.SUM >= %%.V_FLUSH)

*Step procedure AC LIMPEZA
%%.MONSTEP = 550


*Fecha válvula de cabeça (HS-83000-1A)
EQ_CABC2.P02 = 0

wait until (EQ_CAB1.PV == 0)


*Fecha válvula de introdução de AGUA FRIA do reator (HS-83000-1B)
EQ_INTC2.P02 = 0

delay 60000

*Step procedure AC LIMPEZA
%%.MONSTEP = 560

next@

END IF

C_TIMER = "RESETAR"
FUNC_TM1(TMINCACL,C_TIMER)

*Fecha válvula de introdução de AGUA FRIA do reator
EQ_INTC2.P02 = 0

wait until (EQ_INT1.PV == 0)

*Step procedure AC LIMPEZA
%%.MONSTEP = 580

*Desliga bomba G-7021
Bb_EDS.MODE = "AUT"
Bb_EDS.CSV = 0

*Fecha TV81406 (TIC81405)
TCMIX.PSW = 2

*Fecha válvula de introdução de AGUA FRIA
EDS_C2.P02 = 0

FCINTRO.MODE = "MAN"
FCINTRO.MV = 0

*Fecha válvula de cabeça (HS-83000-1A)
EQ_CABC2.P02 = 0

*Fecha válvula (seletor) de vazão de EDQ
PCINTRO.MODE = "MAN"
PCINTRO.MV = 0

PCCIRC.MODE = "MAN"
PCCIRC.MV = 0

wait until (Bb_EDS.PV == 0 AND XV_EDS

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

*
* Sequence name: SFCOACLX * Sequence name: SFCOACLX * Block: CLEANING A and B * Block: cleaning A and B * block type: sequence block (sequence) * Type of block: block sequence (sequence) * Instrument Type: Operacao * Type of instrument: Operation * sequence type: Operacao BPO ACLX * Sequence type: Operation of ACLX BPO * Author: * Author:  * Date 19/02/2014 - Modified for flushing after AC cleaning * 19/02/2014 Date -Modified for flushing after cleaning AC * *  * Description: This and fLUSHING block after cleaning AC * Description: This and the fLUSHING block after cleaning AC * * until (%%. SINCRHLD == 1)! Wait timing HOLD p / Running IF (%%. HOLD_FLS == 0) THEN * Step procedure AC CLEANING and release the "HOLD" for monitoring %%. MONSTEP = 500 * Libera HOLD button to operator %%. swop [3] = 0! HOLD button * State AC CLEANING %%. STATE = 50 TMINCACL.PH = %%. SUP3_ACL C_TIMER = "START" FUNC_TM1 (TMINCACL, C_TIMER) * Closes valve head EQ_CABC2.P02 = 0 * Close input valve COLD wATER reactor EQ_INTC2.P02 = 0 * Close AGUA introduction valve COLD EDS_C2.P02 = 0 * Close valve (selector) of flow EOC PCINTRO.MODE = " MAN " PCINTRO.MV = 50 PCCIRC.MODE =" MAN " PCCIRC.MV = 50 wait until (EQ_CAB1.PV == 0 AND XV_EDS.PV == 0 AND EQ_INT1.PV == 0) * Step procedure AC CLEANING %% .MONSTEP = 510 for i = 1 to %%. QTD_FLSH * Step procedure AC CLEANING %%. MONSTEP = 530 * Zera totalization (FIC81008.SUM) FCINTRO.SUM = 0 * Open TV81406 (TIC81405) TCMIX.MODE = "MAN" TCMIX.MV = 10 * Opens AGUA DESMI HOT introduction valve (HS-83000-1B) EQ_INTC2.P02 = 2 * Open entry COLD WATER valve (HS-81011) EDS_C2.P02 = 2 * Pass valve (selector) of EOC flow to 50% FCINTRO.MODE = "MAN" FCINTRO.MV = 50 * League pump G-7021 Bb_EDS.MODE = "AUT" Bb_EDS.CSV = 2 wait until (Bb_EDS.PV == 2 AND TCMIX.MODE == "MAN" AND TCMIX.MV == 10 == EQ_INT1.PV AND 2 AND XV_EDS.PV == 2 AND FCINTRO.MODE == "MAN" AND FCINTRO.MV == 50) * Step procedure AC CLEANING % .MONSTEP% = 540 * Open head valve in the intermediate position (HS-83000-1A) EQ_POS.PV 1 = wait until (EQ_CABC3.P04 == 1 AND FCINTRO.SUM> = %%. V_FLUSH) * Step procedure AC CLEANING %%. MONSTEP = 550 * Closes head valve (HS-83000-1A) EQ_CABC2.P02 = 0 wait until (EQ_CAB1.PV == 0) * Date of introduction of COLD WATER reactor valve (HS-83000-1B) EQ_INTC2.P02 = 0 delay 60000 * Step procedure AC CLEANING %%. MONSTEP = 560 next @ END IF C_TIMER = "reset" FUNC_TM1 (TMINCACL, C_TIMER) * Closes valve introducing COLD wATER reactor EQ_INTC2.P02 = 0 wait until (EQ_INT1.PV == 0) * Step procedure AC CLEANING %%. MONSTEP = 580 * off pump G-7021 Bb_EDS.MODE = "AUT" Bb_EDS.CSV = 0 * Closes TV81406 (TIC81405) TCMIX.PSW = 2 * Close introduction valve AGUA FRIA EDS_C2.P02 = 0 FCINTRO.MODE = "MAN" FCINTRO.MV = 0 * Closes head valve (HS-83000-1A) EQ_CABC2.P02 = 0 * Close valve (selector) of flow EOC PCINTRO.MODE = "MAN" PCINTRO.MV = 0 PCCIRC.MODE = "MAN" PCCIRC.MV = 0 wait until (Bb_EDS.PV == 0 AND XV_EDS

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

** -------------------------------------------------------------------------------------------------------** sequence name: sfcoaclx * sequence name: sfcoaclx* block: cleaning a and B * block: cleaning a and B.* type of block: block of sequence (sequence) * type of block: block sequence (sequence)* type of instrument operation * type of instrument: Operation* the type of operation sequence: the BPO aclx * sequence type: operation of aclx BPO* Author: * Author:  * date 19 / 02 / 2014 - modified for flushing after cleaning ac * 2 / 19 / 2014 date modified for flushing after cleaning CA* *  * Description: this block and the flushing after cleaning ac * Description: this and the flushing block after cleaning CA** -------------------------------------------------------------------------------------------------------*Wait until (%%.Sincrhld = = 1). Pending synchronization hold P / runningIf (%%.Hold _ FLS = = 0) then* step procedure AC cleaning and release of the "hold" for monitoring.%%.Monstep = 500* release button hold for operator.%%.Swop [3] = 0. Hold button.* state AC cleaning.estado = 50%Tmincacl.ph =%.Sup3 _ FTA(C _ timer = "start"Func _ TM1 (tmincacl, C _ timer)* close the valve headEQ _ cabc2.p02 = 0* close valve for introduction of cold water from the reactorEQ _ intc2.p02 = 0* close valve for introducing cold waterEDS _ c2.p02 = 0* close valve (selector) flow of EDQPcintro.mode = "man"Pcintro.mv = 50Pccirc.mode = "man"Pccirc.mv = 50Wait until (EQ _ cab1.pv = = 0 and XV _ eds.pv = = 0 and EQ _ int1.pv = = 0)* step cleaning procedure CA%%.Monstep = 510For I = 1 to%.Qtd _ flsh* step cleaning procedure CA%%.Monstep = 530* zero summation (fic81008.sum)Fcintro.sum = 0Open tv81406 (tic81405)Tcmix.mode = "man"Tcmix.mv = 10Open valve for hot water desmi (HS - 83000 - 1B)EQ _ intc2.p02 = 2Open the valve for introduction of cold water (HS - 81011)EDS _ c2.p02 = 2* s valve (selector) flow of EDQ to 50%Fcintro.mode = "man"Fcintro.mv = 50* call bomb G - 7021BB _ eds.mode = "Y"BB _ eds.csv = 2Wait until (BB _ eds.pv = = 2 and tcmix.mode = = "man" and tcmix.mv = = 10 and EQ _ int1.pv = = 2 and XV _ eds.pv = = 2And fcintro.mode = = "man" and fcintro.mv = = 50)* step cleaning procedure CA%%.Monstep = 540Open the valve head in an intermediate position (HS - 83000 - 1A)EQ _ pos.pv = 1Wait until (EQ _ cabc3.p04 = = 1 and fcintro.sum > =% v _ flush)* step cleaning procedure CA%%.Monstep = 550* close the valve head (HS - 83000 - 1A)EQ _ cabc2.p02 = 0Wait until (EQ _ cab1.pv = = 0)* close valve for introduction of cold water from the reactor (HS - 83000 - 1B)EQ _ intc2.p02 = 0Delay 60000* step cleaning procedure CA%%.Monstep = 560Next @End if(C _ timer = "reset"Func _ TM1 (tmincacl, C _ timer)* close valve for introduction of cold water from the reactorEQ _ intc2.p02 = 0Wait until (EQ _ int1.pv = = 0)* step cleaning procedure CA%%.Monstep = 580* off pump G - 7021BB _ eds.mode = "Y"BB _ eds.csv = 0* close tv81406 (tic81405)Tcmix.psw = 2* close valve for introducing cold waterEDS _ c2.p02 = 0Fcintro.mode = "man"Fcintro.mv = 0* close the valve head (HS - 83000 - 1A)EQ _ cabc2.p02 = 0* close valve (selector) flow of EDQPcintro.mode = "man"Pcintro.mv = 0Pccirc.mode = "man"Pccirc.mv = 0Wait until (BB _ eds.pv = = 0 and XV _ EDs.