|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
FB20 MAIN GLB : Operation mode |
|
|
|
Network 1 - Network 15 // know-how protected |
|
|
|
Network 16: LogIn mc@cea2020 IF "HMI SYS".Login.Operator_0.ID = "HMI SYS".Login.Admin.ID THEN "HMI SYS".Login.Operator_0.Initials := "HMI SYS".Login.Admin.Initials; #M00.LogInID_CEA := #M00.LogInID_OK := TRUE; ELSIF "HMI SYS".Login.Operator_0.ID = "HMI SYS".Login.Operator_1.ID THEN "HMI SYS".Login.Operator_0.Initials := "HMI SYS".Login.Operator_1.Initials; #M00.LogInID_OK := TRUE; #M00.LogInID_CEA := FALSE; ELSIF "HMI SYS".Login.Operator_0.ID = "HMI SYS".Login.Operator_2.ID THEN "HMI SYS".Login.Operator_0.Initials := "HMI SYS".Login.Operator_2.Initials; #M00.LogInID_OK := TRUE; #M00.LogInID_CEA := FALSE; ELSE #M00.LogInID_CEA := #M00.LogInID_OK := FALSE; END_IF; IF NOT #M00.LogInID_OK THEN "HMI SYS".Login.Operator_0.Initials := ''; END_IF; #M00.TON_Login(IN := #M00.LogInID_CEA, PT := #M00.TON_Login.PT); IF #M00.TON_Login.Q THEN "HMI SYS".Login.Operator_0.ID := ''; END_IF; |
|