Obsidean_VM/04-SIDEL/00 - MASTER/Source/source/COMPLETE_RESTART.md

78 lines
1.7 KiB
Markdown

```pascal
// Block Type: OB
// Block Name (Original): COMPLETE RESTART
// Block Number: 100
// Original Network Languages: LAD, STL
ORGANIZATION_BLOCK "COMPLETE_RESTART"
{ S7_Optimized_Access := 'TRUE' }
VERSION : 0.1
VAR_TEMP
OB100_EV_CLASS : Byte;
OB100_STRTUP : Byte;
OB100_PRIORITY : Byte;
OB100_OB_NUMBR : Byte;
OB100_RESERVED_1 : Byte;
OB100_RESERVED_2 : Byte;
OB100_STOP : Word;
OB100_STRT_INFO : DWord;
OB100_DATE_TIME : "Date_And_Time";
All_Auto_RETVAL : Int;
TempBlockDB : "DB_ANY";
END_VAR
BEGIN
// Network 1: MIX - Complete Restart Memory (Original Language: LAD)
IF "M19512" THEN
"M19512" := TRUE;
END_IF;
// Network 2: DB (Original Language: LAD)
// HMI Variables Command
"TempBlockDB" := "HMI_Variables_Cmd";
// Network 3: Open DB (Original Language: STL)
// --- BEGIN STL Network 3 ---
AUF "HMI_Variables_Cmd"
// --- END STL Network 3 ---
// Network 4: Clear Commands (Original Language: STL)
// HMI Variables Command - Commands From HMI
// --- BEGIN STL Network 4 ---
L 0
T DBD0.0
T DBD4.0
// --- END STL Network 4 ---
// Network 5: Clear Tests Bits & Simulation (Original Language: STL)
// --- BEGIN STL Network 5 ---
CLR
= "HMI_Blender_Parameters".Processor_Options.Blender_OPT._Simulation
= "HMI_Service".Workshop_Test.WorkshopTest
= "HMI_Service".Workshop_Test.CIPSignalsTestRequest
= "HMI_Service".Workshop_Test.CO2TestPresent
= "HMI_Service".Workshop_Test.FillerSignalsTestRequest
= "HMI_Service".Workshop_Test.SyrupTestRequest
// --- END STL Network 5 ---
// Network 6: All in Automatic (Original Language: LAD)
BlenderCtrl_All_Auto();
END_ORGANIZATION_BLOCK
```