226
5 MODULE DEDICATED INSTRUCTION
5.4 Network Dedicated Instruction
[ST]
IF(X20=TRUE)THEN
MOVP(TRUE,H1000,Var_ControlData[0]); (* Sets text as send data format *)
MOVP(TRUE,1,Var_ControlData[2]); (* Sets transmission destination number *)
MOVP(TRUE,16,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 *)
Int_Msg[7] := H7274; (* Er *)
Int_Msg[8] := H6f72; (* ro *)
Int_Msg[9] := H2072; (* r *)
Int_Msg[10] := H614d; (* Ma *)
Int_Msg[11] := H6863; (* ch *)
Int_Msg[12] := H6e69; (* in *)
Int_Msg[13] := H3165; (* e1 *)
Int_Msg[14] := H3020; (* 0 *)
Int_Msg[15] := H3130; (* 01 *) (* Sets text *)
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 *)
ELSE (* Error completion *)
END_IF;
END_IF;
(
* P
rocess
on
nor
m
a
l
co
mpl
et
i
on
*
)
(
* P
rocess
on
error
co
mpl
et
i
on
*
)
Содержание MELSEC System Q
Страница 1: ...MELSEC Q L Structured Programming Manual Special Instructions ...
Страница 2: ......
Страница 307: ...10 SFC CONTROL INSTRUCTION 10 2 SFC Transition Condition Comment Read 305 10 MEMO ...
Страница 309: ...I 307 MEMO ...
Страница 315: ......