Filter
Top Products
5-226
5.4 Network Dedicated Instruction
5.4.26 CLOSE instruction
ZP_CLOSE
[ST]
IF(Var_Flag_Open=TRUE)THEN (* Connection 1 open completion signal *)
PLF(TRUE,Var_Flag_CloseTiming); (* Connection 1 close timing *)
END_IF;
IF((Var_Flag_CloseTiming=TRUE) AND (Var_Flag_OpenOK=TRUE))THEN
(* Connection 1 close timing/open instruction normal completion *)
PLS(TRUE,Var_Flag_Close); (* Closing connection from external device *)
END_IF;
IF(Var_Flag_Inst=TRUE)THEN (* Close instruction *)
PLS(TRUE,Var_Flag_Inst2); (* Close instruction 1PLS *)
END_IF;
IF(((Var_Flag_Inst2=TRUE) AND (Var_Flag_Open=TRUE))
(* Close instruction 1PLS/connection 1 open completion signal *)
OR ((Var_Flag_Close=TRUE) AND (Var_Flag_Exe=FALSE)))THEN
(* Closing connection 1 from external device/CLOSE instruction is in execution *)
ZP_CLOSE(TRUE,"U0",1,Var_ControlData,Var_Result);
(* Closes connection *)
SET(TRUE,Var_Flag_Exe); (* Turns execution flag ON *)
END_IF;
IF(Var_Result[0]=TRUE)THEN (* Execution finished *)
IF(Var_Result[1]=FALSE)THEN (* Normal completion *)
SET(TRUE, Var_Flag_Normal);(* Turns normal completion flag ON *)
END_IF;
IF(Var_Result[1]=TRUE)THEN (* Error completion *)
SET(TRUE, Var_Flag_Error); (* Turns error completion flag ON *)
END_IF;
RST(TRUE,Var_Flag_Exe); (* Turns execution flag OFF *)
END_IF;