for i := range r {
    errors = [
        data.Model(r[i]).Related(&r[i].DeliveryPoints).Error,
        data.Model(r[i]).Related(&r[i].Driver).Error,
        data.Model(r[i]).Related(&r[i].Vehicle).Error]
    for e in errors {
        if error != nil {
            return filtered, err
        }
    }

    // Continuar aquí donde ya sabes que no hay errores