foreach my $identnr ( keys %$daten_ref ) {
    doc_vorhanden( $identnr, keys %{ $daten_ref->{$identnr} } );
}