Bonjour,
Certes vous n'utilisez peu être pas la bonne méthode
Vous utilisez une table mémoire, ce qui veut dire que tous est géré en mémoire, cette table doit avoir la propriété saisie en cascade coché puis une procédure CalculPrix()
PROCEDURE CalculPrix()
Si SansEspace(TableMemo.CODE_ART) = "" Alors
Info("Code Article obligatoire !")
RepriseSaisie(TableMemo.CODE_ART)
Fin
Si pas HLitRecherche(ART,CODE_ART,SAI_Saisie1[TableMemo]) Alors
Erreur("Code Article innexistant !")
RepriseSaisie(TableMemo.CODE_ART)
Fin
TableMemo.CODE_ART = ART.CODE_ART
TableMemo.ART_LIBELLE = ART.ART_LIBELLE
TableMemo.ART.PX_VENTE = ART.ART.PX_VENTE
TableMemo.TOTAL = TableMemo.ART_PX_VENTE * TableMemo.QUANTITE
Une procédure Pour Afficher le total de la saisie
Le champ de totalisation s'appel dans mon exemple TotalGeneral
PROCEDURE Totalisation()
Ind est un entier
nTotal est un Monétaire
nLigne est un entier = TableOccurrence(TableMemo)
POUR Ind = 1 a nLigne
nTotal += TableMemo.TOTAL
Fin
TotalGenerale = nTotal
Dans le bloc Sortie de TableMemo.CODE_ART et TableMemo.QUANTITE
Ensuite pour enregistrer la table il vous faudra la reparcourir pour enregistrer chacune des lignes.