2
0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-03-09 14:47:00 +00:00

93_DbRep: enable setter 'index' for device model 'Agent'

git-svn-id: https://svn.fhem.de/fhem/trunk@26413 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
nasseeder1 2022-09-17 18:08:05 +00:00
parent d5f9232713
commit de63a2ad67
2 changed files with 4 additions and 2 deletions

View File

@ -1,5 +1,6 @@
# Add changes at the top of the list. Keep it in ASCII, and 80-char wide.
# Do not insert empty lines here, update check depends on it.
- change: 93_DbRep: enable setter 'index' for device model 'Agent'
- bugfix: 70_Klafs: Transferred to namespace of FHEM.
One bug fixed. If necessary, set password again.
- feature: 14_SD_UT: new rc models´

View File

@ -57,6 +57,7 @@ no if $] >= 5.017011, warnings => 'experimental::smartmatch';
# Version History intern
my %DbRep_vNotesIntern = (
"8.50.2" => "17.09.2022 release setter 'index' for device model 'Agent' ",
"8.50.1" => "05.09.2022 DbRep_setLastCmd, change changeValue syntax, minor fixes ",
"8.50.0" => "20.08.2022 rework of DbRep_reduceLog - add max, max=day, min, min=day, sum, sum=day ",
"8.49.1" => "03.08.2022 fix DbRep_deleteOtherFromDB, Forum: https://forum.fhem.de/index.php/topic,128605.0.html ".
@ -603,6 +604,7 @@ sub DbRep_Set {
my $setlist = "Unknown argument $opt, choose one of ".
"eraseReadings:noArg ".
"deviceRename ".
"index:".$indl." ".
(($hash->{ROLE} ne "Agent") ? "delDoublets:adviceDelete,delete " : "").
(($hash->{ROLE} ne "Agent") ? "delEntries " : "").
(($hash->{ROLE} ne "Agent") ? "changeValue " : "").
@ -623,7 +625,6 @@ sub DbRep_Set {
(($hash->{ROLE} ne "Agent") ? "tableCurrentFillup:noArg " : "").
(($hash->{ROLE} ne "Agent") ? "tableCurrentPurge:noArg " : "").
(($hash->{ROLE} ne "Agent") ? "countEntries:history,current " : "").
(($hash->{ROLE} ne "Agent") ? "index:".$indl." " : "").
(($hash->{ROLE} ne "Agent") ? "sumValue:display,writeToDB,writeToDBSingle,writeToDBInTime " : "").
(($hash->{ROLE} ne "Agent") ? "averageValue:display,writeToDB,writeToDBSingle,writeToDBInTime " : "").
(($hash->{ROLE} ne "Agent") ? "delSeqDoublets:adviceRemain,adviceDelete,delete " : "").
@ -820,7 +821,7 @@ sub DbRep_Set {
return;
}
if ($opt eq "index" && $hash->{ROLE} ne "Agent") {
if ($opt eq "index") {
DbRep_setLastCmd (@a);
Log3 ($name, 3, "DbRep $name - ################################################################");
Log3 ($name, 3, "DbRep $name - ### New Index operation ###");