FHEM/fhem-mirror
2
0
Fork 0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-02-25 16:05:19 +00:00
Code Issues Releases Wiki Activity

93_DbRep: write TYPE uppercase with writeToDB option, minor fix

Browse Source 
git-svn-id: https://svn.fhem.de/fhem/trunk@27030 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
nasseeder1 2023-01-11 23:06:37 +00:00
parent edd6de1457
commit 63b454e773
1 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
fhem/FHEM/93_DbRep.pm
View File

@ -59,7 +59,7 @@ no if $] >= 5.017011, warnings => 'experimental::smartmatch';
# Version History intern
my %DbRep_vNotesIntern = (
"8.51.1" => "01.01.2023 write TYPE uppercase with writeToDB option, Commandref edited ",
"8.51.1" => "01.01.2023 write TYPE uppercase with writeToDB option, Commandref edited, fix add SQL Cache History ",
"8.51.0" => "02.01.2023 online formatting of sqlCmd, sqlCmdHistory, sqlSpecial, Commandref edited, get dbValue removed ".
"sqlCmdBlocking customized like sqlCmd, bugfix avgTimeWeightMean ",
"8.50.10" => "01.01.2023 Commandref edited ",
@ -7080,7 +7080,7 @@ sub DbRep_sqlCmdDone {
delete($hash->{HELPER}{RUNNING_PID});
my $tmpsql = delete $data{DbRep}{$name}{sqlcache}{temp}; # SQL incl. Formatierung aus Zwischenspeicher holen
my $tmpsql = $data{DbRep}{$name}{sqlcache}{temp}; # SQL incl. Formatierung aus Zwischenspeicher holen
my ($erread, $state) = DbRep_afterproc ($hash, $hash->{LASTCMD}); # Befehl nach Procedure ausführen
if ($err) {
@ -7092,6 +7092,8 @@ sub DbRep_sqlCmdDone {
return;
}
DbRep_addSQLcmdCache ($name); # Drop-Down Liste bisherige sqlCmd-Befehle füllen und in Key-File sichern
my ($rt,$brt) = split ",", $bt;
my $srf = AttrVal($name, "sqlResultFormat", "separated");
@ -7105,8 +7107,6 @@ sub DbRep_sqlCmdDone {
ReadingsBulkUpdateValue ($hash, 'sqlCmd', $tmpsql);
ReadingsBulkUpdateValue ($hash, 'sqlResultNumRows', $nrows);
DbRep_addSQLcmdCache ($name); # Drop-Down Liste bisherige sqlCmd-Befehle füllen und in Key-File sichern
if ($srf eq "sline") {
$rowstring =~ s/§/]|[/g;
$rowstring =~ s/\|°escaped°\|/§/g;