fix(manager): Regelung und Energiefluss korrigieren

tests/ManagerEnergieModulstrukturTest.php

@@ -19,6 +19,7 @@ final class ManagerEnergieModulstrukturTest extends TestCase
             "RegisterPropertyBoolean('EnergiediagrammeAnzeigen', false)",
             "RegisterPropertyBoolean('FunFactsAnzeigen', false)",
             "RegisterPropertyBoolean('EnergieflussAnzeigen', false)",
+            "RegisterPropertyInteger('EnergieflussLeistungseinheit', 0)",
             "RegisterPropertyInteger('LeistungsaufzeichnungMinuten', 1)",
             "RegisterPropertyInteger('LeistungLoeschenMonate', 12)",
             "RegisterPropertyInteger('EnergieaufzeichnungMinuten', 5)",
@@ -48,6 +49,7 @@ final class ManagerEnergieModulstrukturTest extends TestCase
             'FormEnergiediagrammeAnzeigen',
             'FormFunFactsAnzeigen',
             'FormEnergieflussAnzeigen',
+            'EnergieflussLeistungseinheit',
             'MesswerteAnzeigen',
             'IstleistungVariableID',
             'LeistungVariableID',

tests/ManagerReglerTest.php

@@ -258,6 +258,67 @@ final class ManagerReglerTest extends TestCase
         self::assertSame(0, $ergebnis['Restabweichung_W']);
     }
 
+    public function testPvBetriebNutztBeiPositivemBudgetKeineNegativeLeistungsstufe(): void
+    {
+        $ergebnis = ManagerRegler::verteile(
+            0.0,
+            500.0,
+            [
+                $this->verbraucher(10, 0, [-1000, 5000], 0),
+                $this->verbraucher(20, 1, [0, 3000], 0),
+            ],
+            'PrioritaetPV'
+        );
+
+        self::assertSame(500, $ergebnis['Verteilbudget_W']);
+        self::assertSame([10 => 5000, 20 => 0], $ergebnis['Sollwerte']);
+        self::assertGreaterThanOrEqual(0, $ergebnis['Sollwerte'][10]);
+        self::assertSame(-4500, $ergebnis['Restabweichung_W']);
+    }
+
+    public function testPvBetriebNutztNegativeLeistungErstBeiTatsaechlichemDefizit(): void
+    {
+        $ergebnis = ManagerRegler::verteile(
+            1000.0,
+            0.0,
+            [
+                $this->verbraucher(
+                    10,
+                    0,
+                    [['Von_W' => -5000, 'Bis_W' => 5000]],
+                    0
+                ),
+                $this->verbraucher(20, 1, [0, 3000], 0),
+            ],
+            'PrioritaetPV'
+        );
+
+        self::assertSame(-1000, $ergebnis['Verteilbudget_W']);
+        self::assertSame([10 => -1000, 20 => 0], $ergebnis['Sollwerte']);
+        self::assertSame(0, $ergebnis['Restabweichung_W']);
+    }
+
+    public function testFestgehaltenerVerbraucherBilanziertIstUndBehaeltSollwert(): void
+    {
+        $festgehalten = $this->verbraucher(10, 0, [0, 3000, 5000], 2000, false);
+        $festgehalten['Daten']['Zustand'][0]['Wert'] = 3000;
+
+        $ergebnis = ManagerRegler::verteile(
+            0.0,
+            3000.0,
+            [
+                $festgehalten,
+                $this->verbraucher(20, 1, [['Von_W' => 0, 'Bis_W' => 5000]], 0),
+            ],
+            'PrioritaetPV'
+        );
+
+        self::assertSame(5000, $ergebnis['Verteilbudget_W']);
+        self::assertSame(2000, $ergebnis['NichtSteuerbar_W']);
+        self::assertSame([10 => 3000, 20 => 3000], $ergebnis['Sollwerte']);
+        self::assertSame(0, $ergebnis['Restabweichung_W']);
+    }
+
     public function testFehlendeIstleistungFaelltAufAngenommenenSollwertZurueck(): void
     {
         $verbraucher = $this->verbraucher(10, 0, [3000], null, false);

tests/Symcon/modules/Manager.php

@@ -268,6 +268,33 @@ return static function (TestContext $test): void {
             '{BA90FDB3-C203-8F26-B4D6-F3DB99905724}',
             IPS_GetInstance($energieflussID)['ModuleInfo']['ModuleID']
         );
+        $knoten = json_decode(
+            (string) IPS_GetProperty($energieflussID, 'Config'),
+            true,
+            512,
+            JSON_THROW_ON_ERROR
+        );
+        $namen = array_column($knoten, 'Name');
+        foreach (['Verbraucher 1-Stufig', 'Wassererwärmer', 'Pufferspeicher'] as $name) {
+            $test->assertTrue(in_array($name, $namen, true));
+        }
+        foreach ($knoten as $knotenEintrag) {
+            if (in_array(
+                $knotenEintrag['Name'],
+                ['Verbraucher 1-Stufig', 'Wassererwärmer', 'Pufferspeicher'],
+                true
+            )) {
+                $test->assertTrue((int) $knotenEintrag['InfoVariableID'] > 1);
+            }
+        }
+        $pvFlussID = $test->objectByIdent('EnergieflussPV', $managerId);
+        $test->assertSame(4200.0, (float) GetValue($pvFlussID));
+        $test->assertSame('~Power', IPS_GetVariable($pvFlussID)['VariableProfile']);
+
+        IPS_SetProperty($managerId, 'EnergieflussLeistungseinheit', 1);
+        IPS_ApplyChanges($managerId);
+        $test->assertSame(4.2, (float) GetValue($pvFlussID));
+        $test->assertSame('Enelix.Power.kW', IPS_GetVariable($pvFlussID)['VariableProfile']);
 
         IPS_RequestAction($managerId, 'FormEnergieflussAnzeigen', false);
         $test->assertSame(true, (bool) IPS_GetObject($energieflussID)['ObjectIsHidden']);
@@ -416,12 +443,10 @@ return static function (TestContext $test): void {
 
         SetValue($temperaturId, 53.0);
         $test->waitUntil(static function () use (
-            $managerId,
             $warmwasserId,
             $verbraucherstatus,
             $zustandswert
         ): bool {
-            IPS_RequestAction($managerId, 'Regeln', false);
             $wert = $zustandswert(
                 $verbraucherstatus(),
                 $warmwasserId,