Mitsubishi MELSEC-L series Programming Manual page 247

[ST]
IF(Var_Flag_Open=TRUE)THEN
PLF(TRUE,Var_Flag_CloseTiming);
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);
END_IF;
IF(Var_Flag_Inst=TRUE)THEN
PLS(TRUE,Var_Flag_Inst2);
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",K1,Var_ControlData,Var_Result);
SET(TRUE,Var_Flag_Exe);
END_IF;
IF(Var_Result[0]=TRUE)THEN
IF(Var_Result[1]=FALSE)THEN
SET(TRUE, Var_Flag_Normal);(* Turns normal completion flag ON *)
END_IF;
IF(Var_Result[1]=TRUE)THEN
SET(TRUE, Var_Flag_Error);
END_IF;
RST(TRUE,Var_Flag_Exe);
END_IF;
5.4 CC-Link IE Controller Network, MELSECNET/H, and Ethernet Instruction
(* Connection 1 open completion signal *)
(* Connection 1 close timing *)
(* Closing connection from external device *)
(* Close instruction *)
(* Close instruction 1PLS *)
(* Closes connection *)
(* Turns execution flag ON *)
(* Execution finished *)
(* Normal completion *)
(* Error completion *)
(* Turns error completion flag ON *)
(* Turns execution flag OFF *)
5.4.16 CLOSE instruction
ZP_CLOSE
5
5-201