[VB.NET]Méthodes sur un Dataview ?

Bonjour à tous


J’aimerais savoir si quelqu’un connaît un moyen d’appliquer en VB.NET une méthode sur un dataView (ou toute autre technique qui permettra d’appliquer des calculs sur chaque ligne d’une table autrement bien sûr qu’en l’incluant dans le code SQL)

Si j’ai une table nommée AccessTBL qui contient

Citation:

---

ChampUn
12
15
23

---

Ce n’est donc PAS une instruction du type :

Code:

---

1 2	Select ChampUn * 3 as myChampCalculé from AccessTBL

---

que je cherche MAIS ce qui en Access peut se résoudre comme suit :

Mettre dans un module la fonction suivante :

Code:

---

1 2 3

Function TripleMaValeur(myVal As Long) as Long TripleMaValeur = myVal * 3 End Function

---

et puis écrire la requête suivante :

Code:

---

1 2 3

SELECT AccessTBL.ChampUn, TripleMaValeur([champun]) AS myChampCalculé FROM AccessTBL;

---

Qui donnera le résultat

Citation:

---

12........36
15........45
23........69

---

Ceci est terriblement puissant puisque ça permet de mélanger la puissance du SQL avec des tests et calculs très complexes. Y a –t’il un équivalent, ais-je été clair ?

Avant de lire vos nombreuses remarques, faut-il mettre en Code et citation du code qui n'est pas VB, comme dans ce cas ci du code Access ?

édité par neguib pour les balises |code| et |quote| :?

un truc comme

Code:

---

1 2 3 4 5

Dim MaTable As New DataTable Me.OleDbDataAdapter1.Fill(MaTable) MaTable.Columns.Add("Calcul", System.Type.GetType("System.Decimal"), "[ChampUn] * 3") Me.DataGrid1.DataSource = MaTable

---

Oui, je suppose.

C'est sans doute de devoir travailler au niveau de la table qui créait un "blocage" dans le sens ou pour moi, une donnée calculée ne devrait pas être mise au niveau de la table mais plutôt au niveau d'une vue (mais ça j'ai lu que ce n'est pas possible).

Merci pour ton aide

Citation:

---

Envoyé par Golzinne

Oui, je suppose.
C'est sans doute de devoir travailler au niveau de la table qui créait un "blocage" dans le sens ou pour moi, une donnée calculée ne devrait pas être mise au niveau de la table mais plutôt au niveau d'une vue (mais ça j'ai lu que ce n'est pas possible).
Merci pour ton aide

---

L'erreur que tu commet dans ton raisonnement vient du fait que tu utilise le mot 'table', ceci est le terme approprié côté BDD, mais côté appli ce sont des resultat de requêtes donc en quelque sorte une DataTable est déjà une vue, rien n'empêche de déjà travailler directement avec des DataTable comme source de données d'un DataGrid, le DataView n'est qu'un objet fonctionnel supplementaire du design

Merci pour cette précision, tu as bien détecté l'origine du problème(ou plutôt de la confusion).

:resolu: alors :wink:
Bouton en bas à gauche

Trop beau pour être vrai...

Bidou à écrit

Citation:

---

MaTable.Columns.Add("Calcul", System.Type.GetType("System.Decimal"), "[ChampUn] * 3")

---

C'est presque ça mais si j'ai la classe suivante, je voudrais qu'elle puisse, à chaque ligne de ma dataTable me recalculer "ValeurTriplee "

Code:

---

1 2 3 4 5 6 7 8 9

Public Class TrippleMonChamp Public ValeurTriplee As Integer Sub New(ByVal MyValeur as integer) 'Calcul complexe ValeurTriplee = 3 * MyValeur End Sub   End Class

---

avec une instruction du type :

Code:

---

ComTBL.Columns.Add("MyClasse", System.Type.GetType("System.Decimal"), New TrippleMonChamp(ComTBL.columns(0).ValeurTriplee))

---

c'est évidemment le New TrippleMonChamp(ComTBL.columns(0).ValeurTriplee)) qui est peut-être une utopie, mais en fait je voudrais pour chaque ligne de ma dataTable instancier ma classe TrippleMonChamp sur base de ComTBL.columns(0) qui représente ChampUn et retourner la ValeurTriplée.

Il est pas utopique, il est surtout inutile
Quel intérêt de passer par l'instanciation d'un objet qui va juste multiplier la valeur connue dans un champs pour le reexposer au travers d'un champs :cfou: :lol:

Citation:

---

Neguib a écrit
Il est pas utopique, il est surtout inutile

---

Avant de dire que c’est inutile, il faut évidemment savoir le genre de calcul qu’il y a à faire derrière. Mon exemple ne servait évidemment qu’à explicité le besoin. Mais imagines un instant qu’il faille, plutôt qu’une multiplication par trois, effectuer un calcul sur base d’autres tables, qu’en fonction que l’une ou plusieurs conditions soient ou ne soient pas rencontrées, le calcule diffère et doive encore aller chercher des données dans encore d’autres tables….

Bref, je suis en train de convertir une application relativement complexe d’Access vers Dot.NET et je demande, si tu relis le message original, si, comme c’est le cas en access, c'est possible d’utiliser une « fonction définie par l’utilisateur» sur chaque ligne d’une requête ?

Maîtrisant le SQL, je peux t’assurer, qu’ il me parait difficile, voire impossible, de le réaliser par requête même successives. De plus, je suis relativement "bloqué" quant à la modification de la structure de la base de donnée originale et ce pour maintenir la compatibilité avec d'autres structures existantes.

Je reconnais que je ne suis peut-être pas au top au niveau du vocabulaire, classe méthode,…. Mais j’espérais que par mon exemple j’aurais été compris.

Pas de souci cette fois j'ai pigé, j'ai juste pas le temps ce soir de poursuivre la discussion. Je m'y remet demain promis :wink:

Merci, je suis impatient ...

J'ai remarqué ta très grande implication dans ce site et je trouve ça formidable de partager ses connaissances avec d'autres.

Salut Golzinne
Comme promis j'ai passé un peu de temps ce matin à décortiquer la problématique. L'indice initial étant celui-ci:

Citation:

---

Envoyé par Golzinne

Mais imagines un instant qu’il faille, plutôt qu’une multiplication par trois, effectuer un calcul sur base d’autres tables, qu’en fonction que l’une ou plusieurs conditions soient ou ne soient pas rencontrées, le calcule diffère et doive encore aller chercher des données dans encore d’autres tables….

---

Il est donc evidemment nécessaire d'externaliser une méthode (pas nécessairement par le biais d'une instance de classe); soit par exemple:

Code:

---

1 2 3 4 5 6 7 8 9 10 11

Public Class ValuesManager 'othersDT correspond à des données provenant d'autres ' DataTables sous la forme d'un tableau de DataRows, c'est ' juste un exemple Public Shared Function GetNewValue(ByVal value As Long, ByVal othersDT As DataRow()) As Long Dim newValue As Long 'Implementer les differents calculs conditionnels Return newValue End Function End Class

---

Enfin c'est l'idée grossière à developper concernant la transformation d'une valeur
Donc pour en revenir à la DataTable de départ, il s'agit toujours au moins de declarer et d'ajouter une nouvelle colonne mais cette fois sans définir une expression (eventuellement une valeur par defaut si tu le souhaites), tu peux te contenter du Type et du Nom

Code:

---

1 2 3 4 5 6 7 8

Private Sub AddNewColumn() Dim dc As New DataColumn ("MyNewField") dc.DataType = GetType(Int64) dc.DefaultValue = 0 '... Me.MyDataTable.Columns.Add(dc) End Sub

---

Il te faut aussi maintenant initialiser les valeurs de cette colonne pour chaque enregistrement

Code:

---

1 2 3 4 5 6 7 8 9 10 11

Private Sub InitNewField() Dim MyRows() As DataRow ' récupérer les DataRows par exemple qui ' serviront aux calculs conditionnels '... puis Dim dr As DataRow For Each dr In Me.MyDataTable.Rows dr("MyNewField") = ValuesManager.GetNewValue(dr("MyField"), MyRows) Next End Sub

---

il suffit maintenant de lancer quelque part la procedure suivante

Code:

---

1 2 3 4

'... Me.AddNewColumn() Me.InitNewField() '...

---

J'ai bien reçu ton code, je dois encore essayer de le tester et de voir si c'est ça que je cherche.

Ca m'a l'air un peu compliqué, mais je vais m'y ateler. En VBAccess, c'est si simple. Y-aurait-il une faiblesse
dans DOTNET ?

Par rapport à mon problème expliqué de manière plus réelle peut-être peux-tu me dire si ta solution va être applicable ?


Voici encore en simplifié ce que je faisais en access et que je voudrais faire en dot.net.
Il s’agit en fait de calculer quels montants sont dus chaque mois par des clients qui louent un matériel déterminé à partir de la "dateDeb" pour "NbrPer" mois.

Si j’ai une commande qui va entraîner 36 paiements j’aurai dans ma table commande :

Citation:

---

ComId=1 ; DateDeb=1/10/2005 ; NbrPer=36 ; Loyer=1000

---

Je veux en fait me construire un ensemble de donnée (une requête access) qui me dit pour chaque commande la somme due par mois et je décide de me limiter à un tableau de 12 mois :

Citation:

---

.............Janvier_06 .........février_06........mars_06.....décembre_06

Com1........1000...............1000................1000...........1000
Com2..............................1000...............1000............1000
Com3........333...................386................333..............333

---

il affiche également de avril à novembre...

Je dois donc pour la commande1 et janvier 2006, voir si un loyer est du ou pas.
J’obtiens l’info en faisant un test sur les données de ma commande pour janvier 2006.

Je crée donc une mini fonction avec comme paramètres des champs de ma table sauf MyColumnMois qui indique pour quelle période
je désire voir si un loyer est du.

Code:

---

1 2 3 4 5 6 7 8

Function Loyer(myComId as long, myDateDeb as date, myNbrPer as integer, myLoyer as double, MyColumnMois as date) as double If myColumnMois >= myDateDeb and myColumnMois <= dateadd( "month" , myNbrPer,myDateDeb) then Loyer= myLoyer else Loyer=0 end if end function

---

et je crée ma requête SQL access :

Code:

---

Select ComID, Loyer([ComId],[DateDeb],[NbrPer],[Loyer],#1/1/2006#),Loyer([ComId],[DateDeb],[NbrPer],[Loyer],#2/1/2006#)... from CommandeTBL

---

J'utilise donc 12 fois ma fonction "Loyer" pour les 12 mois de l'année. Il est clair que dans la pratique les dates du 1/1/2006 et suivantes sont variables...


Cette requête me retourne les bonnes valeurs pour mes 3 commandes ci-dessus.

La commande 3 a une valeur différente pour le mois de février car il y a une taxe "spéciale" qui se rajoute tous les mois de février pour ce contrat.

J'ai donc une table taxeTbl qui comprend:

Code:

---

TaxeId= 1 ; TaxeComId=3; moisDeLaTaxe; février; montantTaxe=53

---

il me suffit de modifier ma fonction Loyer comme suit

'faire un select de ma table TaxeTbl pour la commande en cours (ComId)

'si j'ai un enregistrement, c'est que j'ai une taxe, dès lors je valide que le mois en cours (MyColumnMois) est bien égal au mois pour lequel la taxe doit être appliquée. Si oui: Loyer=loyer + taxe


Ma requête elle reste parfaitement identique et me retourne 12 colonnes et toutes mes commandes.

Je peux "compliquer" ma fonction à souhait car en fait, j'ai trois sortes de taxes, des montants qui sont parfois majorés
pour le premier loyer, des valeurs résiduelles ou pas à la fin des contrats, ...

ce qui explique que je t'avais dit ne pas pouvoir régler ce problème par requête.

Effectivement c'est du Access donc grande faiblesse par rapport à SqlServer :wink: :lol:
Si tu ne peut améliorer côté SGBDR (c'est ce qui est normalement recommandé) en reportant au maximum tous les traitements possibles par des macros ou equivalents de procedures stockées.
Il te faut créer côté appli ta propre couche "Business" qui sera un ensemble de classe mappant tes données, effectuant les calculs que tu souhaites de façon la plus dynamique possible et les exposant par des accesseurs (Propriétés) sous forme de DataTable ou même d'un DataSet pour la couche "Graphique" (Interface utilisateur).
Je suppose tout de même que ta difficulté principale est ton passage d'un langage procéduriel à une conception "Objet" :wink: pour imaginer que VBNet serait plus lacunaire que VBA :)

Citation:

---

Envoyé par neguib

Je suppose tout de même que ta difficulté principale est ton passage d'un langage procéduriel à une conception "Objet" :wink: pour imaginer que VBNet serait plus lacunaire que VBA :)

---

oui, effectivement ce passage ne se fait pas sans mal. Je n'avais jamais trouvé de limites à mon imagination alors que maintenant je n'arrive pas à convertir d'anciens développements.

Citation:

---

Envoyé par Golzinne

Citation:

---

Envoyé par neguib

Je suppose tout de même que ta difficulté principale est ton passage d'un langage procéduriel à une conception "Objet" :wink: pour imaginer que VBNet serait plus lacunaire que VBA :)

---

oui, effectivement ce passage ne se fait pas sans mal. Je n'avais jamais trouvé de limites à mon imagination alors que maintenant je n'arrive pas à convertir d'anciens développements.

---

Je te comprend au combien puisque moi même vbciste repenti :wink:
je ne sais pas pour toi, mais d'un point de vue conceptuel le fait de me familiariser avec UML m'a permis de mieux revoir ma copie. .Net doit me permettre de concretiser ce que je conçois ainsi liberer de la notion de langage ensuite c'est comme tu le sens pour le choix de celui-ci(C++, C#, Vbnet, Delphi.Net)
Les pointures de ce site doivent pouvoir encore mieux te conseiller que moi en la matière.

J'ai appliqué ton code et ça fonctionne Nickel. Comme quoi c'est toi LA pointure de ce site.

Merci