مثال عملي على Linq To DataSet فى C#

شغل البرنامج وأدخل فيه بعض البيانات في كلا الـ DataGridView وتأكد من أنك قد قمت بتعبئة جميع الحقول في كلتا شبكتي البيانات وقم بالحفظ وأغلق البرنامج ثم أعد فتحه من جديد للتأكد من أن عملية الحفظ قد تمت بشكل صحيح وانتبه إلى أن الحقل WadeeaPeriod هو عبارة عن عدد أشهر فترة الوديعة لذا حاول الالتزام بالقيم 1 أو 3 أو 6 أو 12 كقيمة لهذا الحقل من أجل تجربة إجرائية الاحتساب لاحقا

نريد الآن إظهار قيم الاحتسابات الخاصة بكل وديعة عند المرور عليها وكذلك تاريخ استحقاق هذه الوديعة

أضف أربعة حقول نصية للنافذة ورتبها أسفل شبكتي البيانات وأعطها الأسماء التالية txtEndDate لتاريخ الاستحقاق و txtInterest لقيمة الفائدة و txtRayaa لضريبة الريع و txtIdara لضريبة الإدارة المحلية

أضف الاستيراد التالي في بداية ملف الكود الخاص بـ Form1 من أجل تمكيننا من استخدام الوظائف الموجودة به

using Microsoft.VisualBasic;

أضف ال class التالى فى بداية الكود الخاص بـ Form1 من أجل تمكيننا من استخدام Lambda Expressions فى ال c#

        public static class Linq
        {
            // Returns the given anonymous method as a lambda expression
            public static Expression<Func<T>>
                Expr<T>(Expression<Func<T>> f)
            {
                return f;
            }

            // Returns the given anonymous function as a Func delegate
            public static Func<T>
                Func<T>(Func<T> f)
            {
                return f;
            }

            public static Func<T, R>
                Func2<T, R>(Func<T, R> f)
            {
                return f;
            }
        }

ثم أضف الإجراء التالي كإجرائية للاحتساب

        private void DisplayWaeaaCalcs(int Amount, DateTime StartDate, DateTime EndDate, decimal Interest)
        {
            long DaysNum = DateAndTime.DateDiff(DateInterval.Day, StartDate, EndDate, FirstDayOfWeek.System, FirstWeekOfYear.System);

            decimal Rayaa = 1;

            var Rayya_Calc = Linq.Func2((decimal Intrst) => Math.Ceiling((Intrst * 7.5m) / 100));
            var Idara_Calc = Linq.Func(() => Math.Ceiling(Rayaa * 10 / 100));
            var Intrst_Calc = Linq.Func(() => Math.Ceiling(Amount * DaysNum * Interest / 36500));

            decimal Intr = Intrst_Calc();
            Rayaa = Rayya_Calc(Intr);
            decimal Ida = Idara_Calc();

            this.txtEndDate.Text = EndDate.ToString("dd/MM/yyyy");
            this.txtInterest.Text = Intr.ToString("#,###.00");
            this.txtRayaa.Text = Rayaa.ToString("#,###.00");
            this.txtIdara.Text = Ida.ToString("#,###.00");
        }

حيث استخدمنا في البداية الدالة DateDiff للحصول على عدد أيام الفترة التي سنقوم بالاحتساب عنها وكنا قد مررنا قيم المبلغ و تاريخ البداية وتاريخ النهاية ونسبة الفائدة كمحددات لإجرائية الاحتساب ثم عرفنا تعبير لمدا يقوم باحتساب قيمة ضريبة الريع Rayya_Calc بناء على مبلغ الفائدة الممررة له وفي تعبير لمدا والضريبة الأخرى لم نمرر لها قيمة ولكنها استخدمت متغير محلي من أجل الاحتساب وتعبير لمدا الأخير Intrst_Calc يستخدم أيضا خاصية رفع المتغيرات ولكنه هنا يستخدم المحددات الممررة للإجراء كمتغيرات مرفوعة ثم نقوم باستخدام هذه التعابير للاحتساب ثم نظهر القيم في صناديق النصوص المناسبة

من أجل أن نقوم باحتساب القيم الموافقة لكل وديعة عند المرور عليها سنقوم بعمل إجراء معالجة للحدث CellEnter لكلا شبكتي البيانات بإجراء واحد – أدخل الكود التالي كإجراء لمعالجة الحدث CellEnter لكلا الشبكتين

        private void wadaeaaDataGridView_CellEnter(object sender, DataGridViewCellEventArgs e)
        {
            try
            {
                var EdDat = from a in myDataSet.Wadaeaa
                            where (a.CustomerID ==Convert.ToInt32(this.customersDataGridView.CurrentRow.Cells[0].Value))
                                  && (a.WadeaaNumber == this.wadaeaaDataGridView.CurrentRow.Cells[0].Value)
                            select new
                            {
                                a.WadeaaNumber,
                                a.WadeaaAmount,
                                a.StartDate,
                                EndDate = DateAndTime.DateAdd(DateInterval.Month, a.WadeeaPeriod, a.StartDate),
                                a.InterestRate
                            };

                if (EdDat.Count() > 0)
                {
                    DisplayWaeaaCalcs(EdDat.First().WadeaaAmount, EdDat.First().StartDate, EdDat.First().EndDate, EdDat.First().InterestRate);
                }
            }
            catch (Exception ex)
            {
                this.txtEndDate.Text = string.Empty;
                this.txtInterest.Text = string.Empty;
                this.txtRayaa.Text = string.Empty;
                this.txtIdara.Text = string.Empty;
            }
        }

ويتم اضافة الحدث لكل من الشبكتين كما فى الصوره

في البداية قمنا بإنشاء استعلام Linq للحصول على القيم الخاصة بالوديعة التي نقف عليها حيث أن المتغير a مرتبط بالجدول Wadaeaa ثم في قسم Where ضبطنا الشرط بحيث يجلب الاستعلام فقط الودائع الخاصة بزبون معين عن طريق التأكد من أن قيمة الحقل CustomerID مساوية لقيمة ID الخاصة بالزبون من خلال قراءة قيمة الخلية المناسبة في السطر الحالي وتتمة للشرط وبنفس الطريقة قمنا بضبط الشرط كي يجلب الوديعة ذات الرقم المراد ثم يأتي قسم Select لنحدد فيه قائمة الحقول التي نريد الحصول عليها لاحظ وجود الحقل المحسوب EndDate الذي يتم حساب قيمته من الحقول المعادة من الاستعلام باستخدام الوظيفة DateAdd التي تضيف فترة زمنية معينة حسب المحددات الممررة لها إلى تاريخ ممرر لها وتعيد قيمة التاريخ الجديد وتعاد قيمته مع قائمة الحقول التي يعيدها الاستعلام وبعد الاستعلام نتأكد من أنه قد جلب نتائج فعلا بالتحقق من قيمة الخاصية Count ثم نستدعي الوظيفة DisplayWaeaaCalcs للقيام بالحسابات وإظهار النتائج

شغل البرنامج ولاحظ ظهور قيم الاحتسابات في مربعات النصوص عند التنقل في كلا شبكتي البيانات إذا كانت لديك بيانات قمت بحفظها كما طلبت منك سابقا

من أجل إظهار الودائع التي تبدأ بتاريخ معين وإظهارها أضف نموذج آخر للمشروع باسم Form2 ثم أضف DataGridView له واضبط الخاصية Dock للقيمة Fill لجعل شبكة البيانات تملأ كامل مساحة النموذج ثم نسق النموذج بحيث يكون كبيرا كفاية لعرض البيانات الناتجة عن الاستعلام

أضف زرا للنموذج From1 واجعل إجراء معالجة حدث النقر عليه يماثل الكود التالي

        private void Button1_Click(object sender, EventArgs e)
        {
            System.DateTime d = Convert.ToDateTime(Interaction.InputBox("Enter Date", "Title", "DefaultResponse", 100, 200));
            var Dawa = from a in myDataSet.Wadaeaa
                       join B in myDataSet.Customers on
                       a.CustomerID equals B.ID
                       where a.StartDate == d
                       select new
                       {
                           B.CustomerName,
                           B.CurrentAccountNumber,
                           a.WadeaaNumber,
                           a.WadeaaAmount,
                           a.WadeeaPeriod,
                           a.StartDate,
                           EndDate = DateAndTime.DateAdd(DateInterval.Month, a.WadeeaPeriod, a.StartDate)
                       };

            Form2 c = new Form2();
            c.DataGridView1.DataSource = Dawa.ToList();
            c.DataGridView1.Update();
            c.ShowDialog();
        }

لاحظ أنني استخدمت ميزة في فيجول ستوديو تمكنني من حذف محددات إجراء معالجة حدث ما إن كنت على يقين أنني لن أحتاج لاستخدامها

في جملة الاستعلام تلاحظ أنني استخدمت Join للربط بين الجداول عند عملية الاستعلام كي نتجنب مشكلة ظهور بيانات مكررة من أحد الجداول من أجل جميع سطور الجدول الآخر حيث استخدمنا نفس أسلوب العلاقة التي قمنا بإنشائها في البداية بين الجدولين من حيث ربط الحقل CustomerID في الجدول Wadaeaa بالحقل ID في الجدول Customer و استخدمنا في قسم Where شرط لتصفية نتائج الاستعلام بحيث نحصل على الودائع التي تبدأ بتاريخ معين ثم نستخدم عبارة Select لتحديد الحقول التي نريد إظهارها كنتائج الاستعلام

ومن أجل إظهار النتائج في Form2 قمنا بإنشاء متغير من نوع تلك النافذة ثم ضبطنا قيمة DataSource لشبكة البيانات الموجودة على ذلك النموذج إلى النتيجة المعادة من الاستعلام مستخدمين الطريقة ToList لتحويل النتائج إلى شكل يمكن إظهاره في شبكة البيانات

ومن أجل الحصول على الودائع التي تنتهي بتاريخ معين يمكننا استخدام نفس الكود السابق بعد تعديل بسيط في قسم Where بحيث يصبح الكود كما يلي

        private void Button2_Click(object sender, EventArgs e)
        {
            DateTime d = Convert.ToDateTime(Interaction.InputBox("Enter Date", "Title", "DefaultResponse", 100, 200));
            var Dawa = from a in myDataSet.Wadaeaa
                       join B in myDataSet.Customers on
                       a.CustomerID equals B.ID
                       where DateAndTime.DateAdd(DateInterval.Month, a.WadeeaPeriod, a.StartDate) == d
                       select new
                       {
                           B.CustomerName,
                           B.CurrentAccountNumber,
                           a.WadeaaNumber,
                           a.WadeaaAmount,
                           a.WadeeaPeriod,
                           a.StartDate,
                           EndDate = DateAndTime.DateAdd(DateInterval.Month, a.WadeeaPeriod, a.StartDate)
                       };

            Form2 c = new Form2();
            c.DataGridView1.DataSource = Dawa.ToList();
            c.DataGridView1.Update();
            c.ShowDialog();

        }

مشكور على النقل مع ذكر المصدر

بالتوفيق إن شاء الله

صورة البرنامج النهائيه

والسورس كود فى المرفقات

LinqToDataSet.zip

الله يجزاك بالخير

جزاكم الله خيرا

كم كنت اتمنى ان يكون هناك شرح اكثر

ممتاز أخي والله مجهود جبار

+1 +1 +1 +1 +1

السلام عليكم

شكراً جزيلاً لهذا المثال

بالحقيقة لدى تطبيق الجزء الاول من المثال أي قبل اضافة العمليات واجهتني مشكلة تتمثل بعدم إستدعاء البيانات المخزنة في قاعدة البيانات xml لدى فتح البرنامج علماً أنها تكون محفوظة ، بالاضافة لحذف البيانات القديمة وكتابة البيانات الجديدة في حال إضافة أي بيانات لدى إستخدام البرنامج (دائماً يقوم البرنامج باستبدال البيانات بدل الاضافة عليها) مع العلم بأنني أستخدم VS 10 .

آملاً المساعدة

مع فائق الشكر والاحترام

الكود

using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Data;
using System.Drawing;
using System.Linq;
using System.Text;
using System.Windows.Forms;
using Microsoft.VisualBasic;


namespace DataSetXML
{
    public partial class Form1 : Form
    {
        public Form1()
        {
            InitializeComponent();
        }

        private void Form1_Load(object sender, EventArgs e)
        {
            try
            {
                myDataSet.Clear();
                myDataSet.ReadXml(@"c:\TestData.xml");
            }
            catch (Exception ex)
            {
                MessageBox.Show(ex.Message);
            }
        }


        private void customerBindingNavigatorSaveItem_Click(object sender, EventArgs e)
        {
            try 
            {
                myDataSet.WriteXml(@"c:\TestData.xml");
            }
            catch (Exception ex)
            {
                MessageBox.Show(ex.Message);
            }
        }

        private void customerBindingNavigator_RefreshItems(object sender, EventArgs e)
        {

        }

        private void customerDataGridView_CellContentClick(object sender, DataGridViewCellEventArgs e)
        { 
        }


        }
    }

السلام عليكم ورحمه الله وبركاته

اخي اذا كان مسار وصياغة الملف سليمة 100% سيتم تحميل بياناته في الـ DataSet, ولكن انصحك باستخدام LINQ to XML

VB Helper كتب:

السلام عليكم ورحمه الله وبركاته

اخي اذا كان مسار وصياغة الملف سليمة 100% سيتم تحميل بياناته في الـ DataSet, ولكن انصحك باستخدام LINQ to XML

وعليكم السلام ورحمة الله وبركاته

أخي العزيز مشكور للمساعدة ، لكن عذراً فلم أفهم معنى استخدام (Linq to Xml) ، وطريقة عمل ذلك .

code.txt