Discussion :

[payasse59]

Bonjour,

tout d'abord bravo et merci pour ce tuto juste parfais et compréhensible ENFIN

Pour ma part j'ai une problématique complémentaire que je ne parviens pas à solutionner sans "usine à gaz".
La location de matériel par lot (exemple : un client peu louer 10 fourchettes et un autre 10 couteaux. mon 3ème client peu louer un lot de 10 couverts (fourchettes+couteaux)
comment rendre indisponible la location individuelle en cas de location du lot, et vis et vers ça?

D'avance merci pour vos réponses

[User]

Bonjour,

En partant de l'exemple fourni dans le tutoriel générer la disponibilité du matériel de location

Si vous souhaitez connaitre les articles individuels réservés/occupés pour un jour donné alors il faut construire 2 requêtes à partir de la la requête de base "LocationArticles" :

Code sql :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
SELECT T_Location.IDLocation, T_Article.IDArticle, T_Article.RefArticle, T_DetailLocation.Qte, T_Article.Description, T_Article.QteStock, T_Location.Debut_loc, T_Location.Fin_loc
FROM (T_Location INNER JOIN T_DetailLocation ON T_Location.[IDLocation] = T_DetailLocation.[IDLocation]) INNER JOIN T_Article ON T_DetailLocation.[IDArticle] = T_Article.IDArticle;

La requête pour afficher les articles réservés pour une date précise définit avec le paramètre [Entrez une date] :

Code sql :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
PARAMETERS [Entrez la date] DateTime;
SELECT R_LocationArticles.IDArticle, R_LocationArticles.RefArticle, R_LocationArticles.Description, R_LocationArticles.Debut_loc, R_LocationArticles.Fin_loc
FROM R_LocationArticles
WHERE ((R_LocationArticles.Debut_loc<=[Entrez la date]) AND (R_LocationArticles.Fin_loc>=[Entrez la date]));

Le complément, c'est à dire les articles disponibles pour ce jour :

Code sql :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
SELECT T_Article.IDArticle, T_Article.RefArticle, T_Article.Description
FROM T_Article LEFT JOIN R_ArticlesReserves ON T_Article.IDArticle = R_ArticlesReserves.IDArticle
WHERE (R_ArticlesReserves.IDArticle Is Null);

Cdlt,