Discussion :

[garavous]

Bonjour à tous,

Voilà, j'ai un problème qui parait simple dont je ne trouve pas la réponse :
J'ai un formulaire qui centralise 2 tables :
Une table T_AGENTS et une table T_MODES_DEPLACEMENTS dans une relation ou un agent a plusieurs modes de déplacement.

Dans la table T_MODES_DEPLACEMENTS, un calcul est fait de telle sorte qu'en fonction de son mode de déplacement par année et trimestre une rémunération soit déduite d'un forfait annuel.

Je souhaiterais effectuer une soustraction de telle sorte qu'au bout de ma ligne se trouve le résultat en temps réel de la somme restante par année/trim

Comme une image est toujours plus parlante que des mots...



Merci d'avance

[hyperion13]

Salut
Il vous faudrait utiliser les fonctions de domaine.

[garavous]

Bonjour hyperion13,

Merci pour les précieux renseignements qui m'ont mis suis sur la bonne voie...

J'ai donc utilisé la formule :

Code :

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

CumulPaiement: SomDom("MontantPaiement";"T_Paiement";"IdFacture=" & [IdFacture] & " and IdPaiement <=" & [IdPaiement])

et je l'ai mis aux éléments de ma table ce qui me donne :

Code :

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

CumulPaiement: SomDom("MONTANT";"T_MODES_DEPLACEMENTS";"REF_AGENT=" & [REF_AGENT] & " and REF_MODE_DEPLACEMENT <=" & [REF_MODE_DEPLACEMENT])

Malgré tout, il me reste une condition à rajouter, c'est l'année du paiement et là je ne trouve pas la solution...

Pour info, le champ ANNEE est une conversion de mon champ ANNEE_TRIM

Code :

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

ANNEE: Gauche([ANNEE_TRIM];4)

Peut-être la source de mon problème...

[garavous]

Bonsoir,
Est-ce que quelqu'un aurait une idée ?

[tee_grandbois]

bonsoir,

Malgré tout, il me reste une condition à rajouter, c'est l'année du paiement et là je ne trouve pas la solution...

Pour info, le champ ANNEE est une conversion de mon champ ANNEE_TRIM

peux-tu expliquer la condition à ajouter: avec quel autre champ dois-tu comparer le champ ANNEE ?

[garavous]

Bonjour tee_grandbois,

Ce n'est pas une comparaison mais une condition.

Il faut que le calcul soit le suivant :

le forfait (500 € en 2023 ou 600 € en 2024) - tous les paiements effectués dans l'année en cours
Dans mon exemple en 2023, j'ai un forfait de 500 € - 180 € - 50,60 € = 269.40 € (en vert)
en 2024, j'ai un forfait de 600 € - 23 € - 30 € - 82,80 € = 464,20 € (en rouge)

[tee_grandbois]

bonjour,

Ce n'est pas une comparaison mais une condition.

et c'est à nous de deviner laquelle avec çà :

Il faut que le calcul soit le suivant :

le forfait (500 € en 2023 ou 600 € en 2024) - tous les paiements effectués dans l'année en cours
Dans mon exemple en 2023, j'ai un forfait de 500 € - 180 € - 50,60 € = 269.40 € (en vert)
en 2024, j'ai un forfait de 600 € - 23 € - 30 € - 82,80 € = 464,20 € (en rouge)

[nico84]

Bonjour,

Voilà, j'ai un problème qui parait simple dont je ne trouve pas la réponse :

Bah non ce n'est pas simple car access n'est pas un tableau excel, en particulier les lignes "n'ont pas d'ordre" et ne se connaissent pas entre elles
Par ailleurs ça complique un peu d'avoir écrit "2023 TRIM 1" dans un seul champ et ce n'est jamais bon de répéter des infos (forfait écrit sur chaque ligne)

Enfin dans l'exemple présenté, comme il y a 2 lignes sur le même trimestre access ne peux pas savoir laquelle se déduit une fois et laquelle 2 ! Lorsque ce problème sera résolu, le plus simple est de créer une fonction dans un module et d'appeler cette fonction dans le recordsource de la table :

Code :

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

me.recordsource="select *, get_solde(ref_agent, annee_trim) as solde from T_MODES_DEPLACEMENTS"

En gros la fonction get_solde doit ressembler à ça :

Code :

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

1
2
3
4
5
6
public function get_solde(byval qui as long, byval quand as string) as double
dim rst as recordset
Set rst = CurrentDb.OpenRecordset("SELECT max(forfait)-sum(montant) as x FROM T_MODES_DEPLACEMENTS WHERE ref_agent=" & qui & " and left(annee_trim,4)='" & left(quand,4) & "' and annee_trim<='" & quand "'", dbOpenSnapshot)
if rst.eof then get_solde=0 else get_solde=rst!x
rst.close
end function

A cause du problème soulevé ci-dessus, les 2 dernières lignes de l'exemple auront le même solde. Pour éviter cela il faudrait tester avec la date exacte de la dépense ou avoir une clé qui permette de distinguer les dépenses du même trimestre

Bon courage !

[tee_grandbois]

re,

A cause du problème soulevé ci-dessus, les 2 dernières lignes de l'exemple auront le même solde. Pour éviter cela il faudrait tester avec la date exacte de la dépense ou avoir une clé qui permet de distinguer les dépenses du même trimestre

ce qui aurait permis à garavous de ne pas arriver au même résultat sur les lignes, c'est la comparaison du mode de déplacement avec <= :

Code :

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

 and REF_MODE_DEPLACEMENT <=" & [REF_MODE_DEPLACEMENT]

finalement, j'en était, arrivé à la même réflexion que toi, c'est un peu léger comme identifiant unique surtout si le tri des enregistrements du formulaire ne correspond pas à celui utilisé par la fonction de domaine...

Et il fallait bien, comme je le supposais, une comparaison entre l'année de ligne et celle du cumul pour arriver au bon résultat dans la condition WHERE et j'ajouterai que ce n'est pas l'année en-cours qui est un terme réservé, en général, à l'année de la date du jour mais de l'année du paiement
Utiliser les bons termes aide à mieux comprendre le besoin ...