sub ablauf{
	
		
		#Object ist ein Klassenobjekt und enthält alle Eigentschaften
		my $object = shift;
	
		#Überprüfe, ob neue Daten über die FTP-Verbindung geladen werden sollen
		if($ftp_status eq "aktiv"){

			logging("neue Thread fuer " . $object->getName() . " gestartet.", "ftp-sync");
			
			#Starte den FTP-Vorgang
			transfer($object);
		}
		#Überprüfe, ob die Daten weiterverarbeitet werden sollen 
		if($log_status eq "aktiv"){
			logging("Changer fuer " . $object->getName()  . " gestartet.", "Changer");
			
			#Starte Weiterverarbeitung
			changer($object);
		}
		#Setze Variable , das die Durchführung abgeschlossen ist
		$arr_ablauf[$object->getID()]=0;

}

sub ablauf2{
	
	my $j = rand(10);
	
	#print "Thread $i..... $j\n";

	sleep($j);

}