Filter
Top Products
5.4 Network Dedicated Instruction
5.4.33 MRECV instruction
5-251
ZP_MRECV
5
MODULE DEDICATED
INSTRUCTION
ZP_MRECV
[ST]
IF (X21=TRUE) THEN
SET(TRUE,Var_Flag_Exe);
END_IF;
IF((Var_Flag_Exe=TRUE) AND (U0\G9858.F=TRUE))THEN
MOVP(TRUE,H200,Var_ControlData[0]);
(* Sets to inquire to server *)
MOVP(TRUE,0,Var_ControlData[2]);
(* Sets to read the first mail *)
MOVP(TRUE,0,Var_ControlData[9]);
(* Sets to adjust data length to that of the received mail *)
MOVP(TRUE,0,Var_ControlData[10]);
(* Sets to adjust header data length to that of the received mail *)
ZP_MRECV(TRUE,"00",Var_ControlData,D100,Var_Result);
(* Reads received e-mail *)
RST(TRUE,Var_Flag_Exe);
END_IF;
IF(Var_Result[0]=TRUE)THEN (* Execution finished *)
IF(Var_Result[1]=FALSE)THEN (* Normal completion *)
ELSE (* Error completion *)
END_IF;
END_IF;
(* Process on normal completion *)
(* Process on error completion *)