FHEM/fhem-mirror
2
0
Fork 0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-03-10 09:16:53 +00:00
Code Issues Releases Wiki Activity

93_DbRep: contrib 8.23.1

Browse Source 
git-svn-id: https://svn.fhem.de/fhem/trunk@20065 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
nasseeder1 2019-08-26 18:40:24 +00:00
parent c79067dfe5
commit 37d1f290e0
1 changed files with 6 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
fhem/contrib/DS_Starter/93_DbRep.pm
View File

@ -58,7 +58,8 @@ no if $] >= 5.017011, warnings => 'experimental::smartmatch';
# Version History intern # Version History intern
our %DbRep_vNotesIntern = ( our %DbRep_vNotesIntern = (
"8.23.0" => "24.08.2019 devices marked as \"Associated With\" if possible ", "8.23.1" => "26.08.2019 fix add newline at the end of DbRep_dbValue result, Forum: #103295 ",
"8.23.0" => "24.08.2019 prepared for devices marked as \"Associated With\" if possible ",
"8.22.0" => "23.08.2019 new attr fetchValueFn. When fetching the database content, manipulate the VALUE-field before create reading ", "8.22.0" => "23.08.2019 new attr fetchValueFn. When fetching the database content, manipulate the VALUE-field before create reading ",
"8.21.2" => "14.08.2019 commandRef revised ", "8.21.2" => "14.08.2019 commandRef revised ",
"8.21.1" => "31.05.2019 syncStandby considers executeBeforeProc, commandRef revised ", "8.21.1" => "31.05.2019 syncStandby considers executeBeforeProc, commandRef revised ",
@ -1215,7 +1216,7 @@ sub DbRep_Attr($$$$) {
if($aName eq "device") { if($aName eq "device") {
my $awdev = $aVal; my $awdev = $aVal;
DbRep_modAssociatedWith ($hash,$cmd,$awdev); # DbRep_modAssociatedWith ($hash,$cmd,$awdev);
} }
if ($cmd eq "set") { if ($cmd eq "set") {
@ -1353,7 +1354,7 @@ sub DbRep_Notify($$) {
if($event =~ /DELETED/) { if($event =~ /DELETED/) {
my $awdev = AttrVal($own_hash->{NAME}, "device", ""); my $awdev = AttrVal($own_hash->{NAME}, "device", "");
DbRep_modAssociatedWith ($own_hash,"set",$awdev); # DbRep_modAssociatedWith ($own_hash,"set",$awdev);
} }
if ($own_hash->{ROLE} eq "Agent") { if ($own_hash->{ROLE} eq "Agent") {
@ -10659,8 +10660,8 @@ sub DbRep_dbValue($$) {
if($sql =~ m/^\s*(select|pragma|show)/is) { if($sql =~ m/^\s*(select|pragma|show)/is) {
while (my @line = $sth->fetchrow_array()) { while (my @line = $sth->fetchrow_array()) {
Log3 ($name, 4, "DbRep $name - SQL result: @line"); Log3 ($name, 4, "DbRep $name - SQL result: @line");
$ret .= "\n" if($nrows); # Forum: #103295
$ret .= join("$srs", @line); $ret .= join("$srs", @line);
$ret .= "\n";
# Anzahl der Datensätze # Anzahl der Datensätze
$nrows++; $nrows++;
} }
@ -10790,7 +10791,7 @@ return;
} }
################################################################################### ###################################################################################
# Associated Devices im DEF setzen # Associated Devices etzen
################################################################################### ###################################################################################
sub DbRep_modAssociatedWith ($$$) { sub DbRep_modAssociatedWith ($$$) {
my ($hash,$cmd,$awdev) = @_; my ($hash,$cmd,$awdev) = @_;