my $daten_ref; # neu
while (my @row = $sth_suchen->fetchrow_array()) {
...
# Am Ende der while-Schleife dann
$daten_ref->{ $hash{identnr} }->{ $hash{docname} } = { %hash };
} # Ende der while-Schleife