sub _insert_test_run
{
    my ($self, $schema, $test_run_data) = @_;
    
    my $nightly_web_page_test_run_id = $test_run_data->{test_run_id};
    my $test_controller_id =
        $self->_get_test_controller($schema, $test_run_data->{controller});
    my $test_run_configuration = undef;	#TO BE ADDED LATER
    my $start_date = $test_run_data->{start_date};
    my $end_date = $test_run_data->{end_date};
    my $elapsed_minutes = $test_run_data->{elapsed_minutes};
    my $log_link = $test_run_data->{log_link};
	
	my $test_run_rs = undef;
	
	eval
	{
		$test_run_rs = $schema->resultset("TestRun")->create(
			{
				nightly_web_page_test_run_id=> $nightly_web_page_test_run_id,
				test_controller_id          => $test_controller_id,
				test_run_configuration_id   => $test_run_configuration,
				start_date                  => $start_date,
				end_date                    => $end_date,
				elapsed_time                => $elapsed_minutes,
				log_link                    => $log_link,
			}
		) || die "Unable to insert data to table TestRun: $!";
	};
	
	if($@)
	{
		#warn();
		$self->log_writer()->write_error_row("Unable to insert data to table TestRun: $@");
		return undef;
	}
	else
	{
		return $test_run_rs;
	}
}