# Datenbankabfrage DB2 ausführen
sub dbt1_execute {
	$dbt1_result = $dbt->prepare ( qq {$statement_t1} );
	$dbt1_result->execute() or die DBI->errstr;
	}