*
* -------------------------------------------------------------------------------------------------------
*
* Sequence name : SFCOACLX
* Bloco : FINALIZAÇÃO
* Tipo de bloco : bloco de sequencia (sequencia)
* Tipo de Instrumento : Operacao
* Tipo de sequencia : Operacao da ACLX
* Autor :
* Data : 14/07/2008 - Projeto Reator Linha 4 - PVC Colombo
*
* Descricao : Este e o bloco FINALIZAÇÃO da sequencia de operacao da BPO.
*
* -------------------------------------------------------------------------------------------------------
*
wait until (%%.SINCRHLD == 1) !Aguarda sincronismo de HOLD p/ Running
*Step procedure AC LIMPEZA
%%.MONSTEP = 900
*Estado AC LIMPEZA
%%.ESTADO = 60
*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 LIMPEZA AC
TMSUPACL.PH = %%.SUP1_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 valvula de cabeça
ACLMPAC2.P02 = 0
ACLMPBC2.P02 = 0
*Fecha valvula de introdução de ED
ED_INTC2.P02 = 0
AI_INTC2.P02 = 0
* ALTERADO POR PPR EM 08.03.10 PARA OPERAR O SISTEMA SEM A VÁLVULA DE RECICLO DEVIDO A FALHA NESTA VÁLVULA.***
*Abre valvula de recircylação
ED_RECC2.P02 = 2 !13-02-2013 Retorno a condicion original
*ED_RECC2.P02 = 0 !05-03-2012 Retorno a condicion original
*Aguarda válvula de Limpeza de condensador, introducao ED fechadas
wait until (ACLMPAC2.P04 == 0 and ACLMPBC2.P04 == 0 and ED_INT_1.PV == 0 and ED_REC_1.PV == 2 and AI_INT_1.PV == 0) !13-02-2013
*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) !05-03-2012
*Step procedure AC LIMPEZA
%%.MONSTEP = 910
*Desliga a bomba
Bb_ACLMP.MODE = "AUT"
Bb_ACLMP.CSV = 0
*Aguarda bomba desligada
wait until (Bb_ACLMP.PV == 0)
* Editado por MPi em 11/11/2009 :
*Congelar timer de registro de Limpeza de AC LIMPEZA
*C_TIMER = "CONGELAR" !Comando CONGELAR para função timer
*FUNC_TM1 (TMINTACL,C_TIMER) !Função timer (sebol user function)
*Step procedure AC LIMPEZA
%%.MONSTEP = 920
*Estado AC LIMPEZA
%%.ESTADO = 99
*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)
* Desativa aquisicao de válvulas(módulos)
ACLMPAC1.P06 = ""
ACLMPBC1.P06 = ""
ED_INTC1.P06 = ""
ED_RECC1.P06 = ""
AI_INTC1.P06 = ""
EDS_C1.P06 = ""
EQ_CABC1.P06 = ""
EQ_INTC1.P06 = ""
* Libera acesso aos instrumentos
ED_INTC1.P01 = 0
ED_RECC1.P01 = 0
AI_INTC1.P01 = 0
EDS_C1.P01 = 0
EQ_CABC1.P01 = 0
EQ_INTC1.P01 = 0
*Comando de conclusão da BPO(Runinng para Ready)
%%.BSTS = "COMPLETE"
*Step procedure AC LIMPEZA
%%.MONSTEP = 999
*Seta data item de sincronismo de fim da BPO AC LIMPEZA
%%.ACL_S = 1
quit