diff --git a/fhem/CHANGED b/fhem/CHANGED
index 3338a040c..beb5b9685 100644
--- a/fhem/CHANGED
+++ b/fhem/CHANGED
@@ -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.
+ - bugfix:  98_weekprofile: Log ccutype not defined (forum #1113306)
  - change:  Device::Firmata removed, use CPAN version (forum #114552)
  - bugfix:  10_FRM: Device::Firmata check (forum #114552 msg #1112141)
  - bugfix:  55_DWD_OpenData: forecast rotation (forum #83097 msg #1108423)
diff --git a/fhem/FHEM/98_weekprofile.pm b/fhem/FHEM/98_weekprofile.pm
index 5011e3972..648aad151 100644
--- a/fhem/FHEM/98_weekprofile.pm
+++ b/fhem/FHEM/98_weekprofile.pm
@@ -179,8 +179,8 @@ sub weekprofile_getDeviceType($$;$)
     }
     my $model = $devHash->{ccutype};
     if (!defined($model)) {
-      Log3 $me, 2, "$me(getDeviceType): ccutype not defined - take HM-xxx (HMCCU_HM)";
-      $model = "HM-xxx";
+      Log3 $me, 4, "$me(getDeviceType): ccutype not defined";
+      return undef;
     }
     Log3 $me, 5, "$me(getDeviceType): $devHash->{NAME}, $model";
 	$type = "HMCCU_IP" if ( $model =~ m/HmIP.*/ );