diff --git a/fhem/FHEM/37_echodevice.pm b/fhem/FHEM/37_echodevice.pm index 2cfff810f..9c5060b0b 100644 --- a/fhem/FHEM/37_echodevice.pm +++ b/fhem/FHEM/37_echodevice.pm @@ -3835,7 +3835,7 @@ sub echodevice_Parse($$$) { elsif($msgtype eq "customer-history-records") { my $addresscount = 0; - + my $Voicetext; my $return = ''; $return .= "

Sprachaufnahmen-Verlauf:

"; $return .= ""; @@ -3846,17 +3846,20 @@ sub echodevice_Parse($$$) { # Play on Device foreach my $result (@{$json->{customerHistoryRecords}}) { foreach my $Voicerecords (@{$result->{voiceHistoryRecordItems}}) { - next if ($Voicerecords->{recordItemType} ne "CUSTOMER_TRANSCRIPT"); + + next if ($Voicerecords->{recordItemType} eq "TTS_REPLACEMENT_TEXT") ; my ($S, $M, $H, $d, $m, $Y) = localtime($result->{timestamp} / 1000); $m += 1; $Y += 1900; my $dt = sprintf("%02d.%02d.%04d %02d:%02d:%02d", $d,$m, $Y, $H, $M, $S); $addresscount ++; + + if ($Voicerecords->{transcriptText} eq "") {$Voicetext = "Falsch erkannt";} else {$Voicetext=$Voicerecords->{transcriptText};} my $MP3Filename = $Voicerecords->{recordItemKey} . ".mp3"; $MP3Filename =~ s/#//g; - $return .= ""; + $return .= ""; if ((-e $FW_dir . "/echodevice/VoiceRecords/". $MP3Filename)) { Log3 $name, 4, "[$name] [echodevice_AmazonVoiceMP3] Use EXIST MP3File = " . $MP3Filename ;
Datum   Echoname   Aufname
" . $dt . "         ". $result->{device}{"deviceName"} . '     play' . "" . $Voicerecords->{transcriptText} . "    " . $Voicerecords->{recordItemType} . "    
" . $dt . "         ". $result->{device}{"deviceName"} . '     ' . '' . "

" . $Voicetext . "