Discussion :

[DidoFido]

Bonjour,

j'essaie de faire une requête comparatif entre deux années (Colonnes), par trimestre (Ligne), et quand j'essaie d'ouvrir la requête le message suivant apparait " Fonction "Quarter" non définie dans l'expression"

Voici mon code :

Code SQL :

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

1
2
3
4
5
6
7
8
PARAMETERS [Date début an1] DateTime, [Date fin an1] DateTime, [Date début an2] DateTime, [Date fin an2] DateTime;
TRANSFORM Sum(T_SRemise.Montants) AS Ventes
SELECT T_Concession.[Nom Concession], T_SRemise.IDProduits, T_SRemise.IDSProduits, Quarter([RemiseDate]) AS Trimestre, Sum([Ventes]) AS AAD
FROM T_Concession INNER JOIN (T_Remise INNER JOIN T_SRemise ON T_Remise.IDRemise = T_SRemise.IDRemise) ON T_Concession.IDConcession = T_Remise.IDConcession
WHERE (((T_Remise.RemiseDate) Between [Date début an1] And [Date fin an1] Or (T_Remise.RemiseDate) Between [Date début an2] And [Date fin an2]))
GROUP BY T_Concession.[Nom Concession], T_SRemise.IDProduits, T_SRemise.IDSProduits, Quarter([RemiseDate])
ORDER BY Format([RemiseDate],"yyyy") DESC 
PIVOT Format([RemiseDate],"yyyy");

je réussi très bien à faire la même requête avec une requête comparatif trimestre (Colonnes), par Année (Ligne), j'aimerais avoir le contraire.
Voici mon code:

Code SQL :

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

1
2
3
4
5
6
7
8
PARAMETERS [Date début an1] DateTime, [Date fin an1] DateTime, [Date début an2] DateTime, [Date fin an2] DateTime;
TRANSFORM Sum(T_SRemise.Montants) AS Ventes
SELECT T_Concession.[Nom Concession], T_SRemise.IDProduits, T_SRemise.IDSProduits, Year([RemiseDate]) AS Année, Sum([Ventes]) AS AAD
FROM T_Concession INNER JOIN (T_Remise INNER JOIN T_SRemise ON T_Remise.IDRemise = T_SRemise.IDRemise) ON T_Concession.IDConcession = T_Remise.IDConcession
WHERE (((T_Remise.RemiseDate) Between [Date début an1] And [Date fin an1] Or (T_Remise.RemiseDate) Between [Date début an2] And [Date fin an2]))
GROUP BY T_Concession.[Nom Concession], T_SRemise.IDProduits, T_SRemise.IDSProduits, Year([RemiseDate])
ORDER BY Format([RemiseDate],"q") DESC 
PIVOT Format([RemiseDate],"q") In ("1","2","3","4");

et celui là fonctionne très bien. qu'est-ce qui cloche ??

merci de votre aide!

[hyperion13]

Salut
Peut-on avoir la function Quarter ?

[DidoFido]

Salut
Peut-on avoir la function Quarter ?

Bonjour hyperion13, je comprend pas ?

[hyperion13]

Dans le 1er code en L3/L6, tu as : Quarter([RemiseDate]) AS Trimestre.
Sauf à avoir la fonction Trimestre (ou Quarter) native sur Ac365, dans le cas contraire, il faudrait la rédiger dans un module standard.
Le msg d'erreur indique qu'elle n'est pas native ou qu'elle n'existe pas (non définie).

Code :

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

1
2
3
Public Function Quarter(TheDate As Date) As Variant
Quarter = Choose(DatePart("q", TheDate), 3, 4, 1, 2)
End Function

[DidoFido]

Dans le 1er code en L3/L6, tu as : Quarter([RemiseDate]) AS Trimestre.
Sauf à avoir la fonction Trimestre (ou Quarter) native sur Ac365, dans le cas contraire, il faudrait la rédiger dans un module standard.
Le msg d'erreur indique qu'elle n'est pas native ou qu'elle n'existe pas (non définie).

Code :

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

1
2
3
Public Function Quarter(TheDate As Date) As Variant
Quarter = Choose(DatePart("q", TheDate), 3, 4, 1, 2)
End Function

Bonjour hyperion13,

1- J'ai créer dans VB le Module avec le code que tu m'as donné.
2- j'imagine de que le module je L'ajoute dans ma requête à l'aide de Génarateur d'expression?
2.1- Si oui, qu'est ce j'inscrit?

merci!

[hyperion13]

Ta 1ère req devrait maintenant fonctionner puisque la fonction Quarter est déclarée.

[DidoFido]

Ta 1ère req devrait maintenant fonctionner puisque la fonction Quarter est déclarée.

Resalut, quand je lance la requête, il me demande les 4 dates, puis me demande Entrer une valeur de paramètre "TheDate"

et m'affiche Cette expression présente une syntaxe incorrecte ou est trop complexe pour être évaluée………….

Voici mon code SQL:

Code SQL :

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

1
2
3
4
5
6
7
8
PARAMETERS [Date début an1] DateTime, [Date fin an1] DateTime, [Date début an2] DateTime, [Date fin an2] DateTime;
TRANSFORM Sum(T_SRemise.Montants) AS Ventes
SELECT T_Concession.[Nom Concession], T_SRemise.IDProduits, T_SRemise.IDSProduits, Quarter([«TheDate»]) AS Expr1, Sum([Ventes]) AS AAD
FROM T_Concession INNER JOIN (T_Remise INNER JOIN T_SRemise ON T_Remise.IDRemise = T_SRemise.IDRemise) ON T_Concession.IDConcession = T_Remise.IDConcession
WHERE (((T_Remise.RemiseDate) Between [Date début an1] And [Date fin an1] Or (T_Remise.RemiseDate) Between [Date début an2] And [Date fin an2]))
GROUP BY T_Concession.[Nom Concession], T_SRemise.IDProduits, T_SRemise.IDSProduits, Quarter([«TheDate»])
ORDER BY Format([RemiseDate],"yyyy") DESC 
PIVOT Format([RemiseDate],"yyyy")

et mon Module2

Code :

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

1
2
3
Public Function Quarter(TheDate As Date) As Variant
Quarter = Choose(DatePart("q", TheDate), 3, 4, 1, 2)
End Function

[DidoFido]

Bonjour Hyperion13,

j'ai modifier l'expression, j'avais oublier de changer le nom de champ pour les dates.

je vais faire des test et je vais te revenir en cas de problème….

[hyperion13]

Re,
Attention, une erreur en L2, corrigée ici !

Code :

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

1
2
3
Public Function Quarter(TheDate As Date) As Variant
Quarter = Choose(DatePart("q", TheDate), 1, 2, 3, 4)
End Function

Sinon tu peux écrire ça
Trimestre : Round(((Mois([RemiseDate])-1)/3)+0,51)

[DidoFido]

Oui, j'avais cru remarqué, je l'avais modifier….. je vais faire des test et te reviens…

hyperion13, un gros merci!
tout marche bien!

si jamais je voudrais faire la même chose, mais par mois, est-ce que je dois changer par MONTH ?

[hyperion13]

Month() (ou Mois()) est une fonction native.
en L2 de la 1ère syntaxe SQL il suffira de remplacer Quarter par Mois([RemiseDate]) As Mois.
en L6 Quarter par Mois([RemiseDate])

[DidoFido]

Month() (ou Mois()) est une fonction native.
en L2 de la 1ère syntaxe SQL il suffira de remplacer Quarter par Mois([RemiseDate]) As Mois.
en L6 Quarter par Mois([RemiseDate])

hyperion13

Merci pour ton support

bonne journée!