Mitsubishi Electric MELSEC-L Special Instructions Manual page 226

[ST]
IF(X20=TRUE)THEN
MOVP(TRUE,H800,Var_ControlData[0]); (* Sets ASCII as send data format *)
MOVP(TRUE,1,Var_ControlData[2]); (* Sets transmission destination number *)
MOVP(TRUE,10,Var_ControlData[9]); (* Sets send data length *)
MOVP(TRUE,7,Var_ControlData[10]); (* Sets subject length *)
Int_Msg[0] := H6574; (* te *)
Int_Msg[1] := H7473; (* st *)
Int_Msg[2] := H616d; (* ma *)
Int_Msg[3] := H6c69; (* il *)
Int_Msg[4] := H6d20; (* m *)
Int_Msg[5] := H6573; (* se *)
Int_Msg[6] := H646e; (* nd *) (* Sets subject *)
MOVP(TRUE,H1234,Int_Msg[7]); (* Sets file to be attached *)
MOVP(TRUE,H5678,Int_Msg[8]);
MOVP(TRUE,H9ABC,Int_Msg[9]);
ZP_MSEND(TRUE,"U0",Var_ControlData,Int_Msg[0],Var_Result); (* Sends e-mail *)
END_IF;
IF(Var_Result[0]=TRUE)THEN (* Execution finished *)
IF(Var_Result[1]=FALSE)THEN (* Normal completion *)
(* Process on normal completion *)
ELSE (* Error completion *)
(* Process on error completion *)
END_IF;
END_IF;
5 MODULE DEDICATED INSTRUCTION
224
5.4 Network Dedicated Instruction