الاستعلام المدمج

**ناصر المصاروة** · 2010-09-22

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

مصطح جديد لم يستخدم من قبل فقد استحدثته من بنات افكاري
وان كانت الفكرة ليست جديدة الا انه قليل من المبرمجين من يستخدم هذا الاسلوب في بناء الاستعلامات.

احيانا قد لايكفي استعلام واحد للحصول على نتيجة معينة فنلجا الى بناء تركيبة من عدة استعلامات للوصول الى النتيجة المطلوبة.

فمثلاً في نظام الفواتير تتكون الفاتورة من جدولين:
الجدول الاول البيانات الرئيسية الثابتة للفاتورة مثل رقم الفاتورة وتاريخها واسم العميل وربما اسم الموظف الذي قام بتحريرها.
والجدول الثاني هو جدول محتويات الفاتورة والذي يحتوي على رقم الفاتورة كمفتاح غريب و الصنف والكمية وسعر الوحدة.
اما القيمة الاجمالية للصنف الواحد فيتم من خلال ضرب الكمية في سعر الوحدة وياتي ذلك من خلال استعلام.
اما اجمالي الفاتورة فيكون من خلال استعلام يقوم بجمع القيمة الاجمالية للاصناف التي تحتويها الفاتورة.
وهكذا فاننا نحتاج الى استعلام مبني على جدول المحتويات للحصول على القيمة الاجمالية للصنف الواحد
واستعلام اخر يقوم بجمع القيم الاجمالية للاصناف للحصول على مجموع الفاتورة.

كيف ذلك؟

اولا: نقوم بانشاء جدول بيانات الفواتير الرئيسية BellsTbl والذي يحتوي على الحقول
- رقم الفاتورة وهو المفتاح الرئيسي للجدول (BellId)
- اسم العميل (Customer)
- اسم الموظف(Emp)
- تاريخ الفاتورة(Bdate)
ثانيا : نقوم بانشاء جدول المحتويات(Contents) والذي يحتوي على
- رقم متسلسل للمحتويات(ContId)
- رقم الفاتورة(BellId)
- الصنف (Item)
- الكمية (mount)
- سعر الوحدة (UPrice)

الان سنقوم بتصميم استعلام للحصول على السعر الاجمالي للصنف
مبني على جدول المحتويات (Contents)
باضافة جميع الحقول وحقل جديد باسم TotalPrice وهو يساوي الكمية (Mount) مضروبة في سعر الوحدة (UPrice) كالتالي:

كود:

TotalPrice:[Mount]*[Uprice]

ثم سنحفظ الاستعلام باسم TotalContents
وهكذا حصلنا على السعر الاجمالي لكل صنف
فكيف سنحصل على قيمة الفاتورة

سننشئ استعلاما جديداً مبني على الاستعلام السابق TotalContents باختيار حقل رقم الفاتورة BellId وحقل السعر الاجمالي للصنف TotalPrice وسنغير اسم حقل السعر الاجمالي الى (قيمة الفاتورة) BellPrice بكتابة العبارة التالية في مكان العبارة TotalPrice

كود:

BellPrice:[TotalContents]![TotalPrice]

ثم سنضيف خاصية التجميع وسنضع تحت حقل السعر الاجمالي خاصية التجميع حسب المجموع Sum

سنحفظ الاستعلام باسم TotalBellPrice

الان اصبح لدينا استعلامين

ماذا لو اردنا الغاء الاستعلام الاول والاكتفاء بالاستعلام الثاني (اذا كان المطلوب فقط الحصول على قيم الفواتير الاجمالية)

الاستعلام الثاني مبني على الاستعلام الاول
لذلك علينا دمج الاستعلام الاول في الاستعلام الثاني قبل حذفه
كالتالي
افتح الاستعلام الثانيTotalBellPrice بطريقة عرض التصميم
ثم حول طريقة العرض الى SQL
ستجد العبارة مكتوبة كالتالي:

كود:

SELECT TotalContents.BellId, Sum(TotalContents.TotalPrice) AS BellPrice
FROM TotalContents
GROUP BY TotalContents.BellId
ORDER BY TotalContents.BellId;

ركز على العبارة المعلمة بالاحمر FROM TotalContents
سنعدل عليها بوضع قوسين ثم كلمة As بين كلمة From وكلمة TotalContents
كالتالي
From () As TotalContents
الان سنبقي الاستعلام مفتوحاً
وسنفتح الاستعلام الاول TotalContents بطريقة عرض التصميم ثم سنحول طريقة العرض الى جملة SQL
سننسخ جملة الSQL وسنلصقها بين القوسين الذين اضفناهما في الاستعلام السابق
وسنلاحظ في نهاية الجملة التي الصقناها الفاصلة المنقوطة ; سنقوم بالغائها فتصبح العبارة كاملة كالتالي

كود:

SELECT TotalContents.BellId, Sum(TotalContents.TotalPrice) AS TotalBellPrice
FROM (SELECT Contents.ItemId, Contents.BellId, Contents.Item, Contents.Mount, Contents.UnitPrice, [Mount]*[UnitPrice] AS TotalPrice
FROM Contents
)  AS TotalContents
GROUP BY TotalContents.BellId
ORDER BY TotalContents.BellId;

الان اغلق الاستعلامين واحفظهما
احذف الاستعلام الاول TotalContents
افتح الاستعلام الثاني بطريقة عرض التصميم ستلاحظ وجود نافذة الاستعلام المحذوف TotalContents وكانه موجود
افتح الاستعلام بطريقة العرض العادية ولاحظ البيانات لم تتغير

تمرين

نريد ان نعرض فقط اجمالي المبيعات حسب التاريخ وحذف الاستعلام TotalBellPrice
حاول تنفيذ العملية

نرجو ان يكون درسا مفيدا
وبالتوفيق

**السيد الجوهرى** · 2010-09-22

بارك الله فيك يا استاذ ناصر .... شرح واف
وفقك الله الى فعل الخيرات

**محمد خليل ابوالسعود** · 2010-10-14

اشكرك على جمال الموضوع ولكن اعذرنى اريد معرفه كيفيه الاستعلام بالتاريخ عن المبيعات اليوميه وكذالك الشهريه ولكم كل الامتنان والتقدير محمد خليل

**محمد ممدوح محمد** · 2010-10-17

والله العظيم الكلام ده جامد
بارك الله فيك وجزاك عنا كل خير

**ناصر المصاروة** · 2010-10-18

اشكركم جميعا على المجاملة اللطيفة

المشاركة الأصلية كتبت بواسطة محمد خليل ابوالسعود

اشكرك على جمال الموضوع ولكن اعذرنى اريد معرفه كيفيه الاستعلام بالتاريخ عن المبيعات اليوميه وكذالك الشهريه ولكم كل الامتنان والتقدير محمد خليل

الاخ محمد خليل مع ان هذه الخطوة تركتها كتمرين الا اني ساجيب عليها

سنفتح الاستعلام الاخير TotalBellPrice بطريقة عرض التصميم
وسنضيف له الجدول BellsTbl ثم سنربط الجدول مع الاستعلام الداخلي بواسطة الحقل BellID من الجدول BellsTbl مع الحقل المسمى بنفس الاسم من الاستعلام المدمج
eم سنضيف الحقل BDate (تاريخ الفاتورة) من الجدول BellsTbl ونلغي الحقل BellId والذي مصدره الاستعلام المدمج. لتصبح جملة الاستعلام كالتالي:

كود:

SELECT Sum(TotalContents.TotalPrice) AS TotalBellPrice, BellTbl.BDate
FROM(SELECT Contents.ItemId, Contents.BellId, Contents.Item, 
Contents.Mount, Contents.UnitPrice, [Mount]*[UnitPrice] AS TotalPrice 
FROM Contents) AS TotalContents INNER JOIN BellTbl ON TotalContents.BellId = BellTbl.BellID
GROUP BY BellTbl.BDate;

اذا قمت بتشغيل الاستعلام ستلاحظ انه يعود باجمالي المبيعات اليومية
احفظ الاستعلام.

للحصول على المبيعات الشهرية
خذ نسخة عن الاستعلام السابق والصقها باسم جديد وليكن MonthelySales
افتح الاستعلام الجديد بطريقة التصميم واستبدل الحقل BDate بالعبارة

كود:

 Bmonth: Format([BDate];"mm/yyyy")

الان شغل الاستعلام الجديد وانظر النتيجة...

**BAAARED** · 2010-10-22

جزاك الله الف خير على شرحك الجميل
في ميزان حسانتك وحفظك الله

**الباز** · 2010-10-31

جزاك الله خيراً
مشكور على الشرح

**محمد خليل ابو السعود** · 2010-11-02

الله الله عليك جزاك الله كل الخير عنا وجعله الله فى ميزان حسناتك
محمد خليل

**علي حمادي** · 2011-01-23

مشكور على الشرح يا استاذ ناصر

**علي حمادي** · 2011-01-28

مشكور اخ ناصر على هذا الشرح الجميل والسهل والانيق
لقد قمت بتجربة هذا النوع من الاستعلام وكان الامر مشوقاً
لتمنى ان تعطينا المزيد من الدروس
وشكراً جزيلاً لك

**علي حمادي** · 2011-01-28

استاذ ناصر
في حال اردنا ان ننفذ ما شرحته من خلال عمل نموذج كي تظهر النتائج بشكل افضل واسهل للمستخدمين ما هي طريقة عمل ذلك؟؟
هل يكفي عمل نموذج واحد للحصول على النتائج ام اننا بحاجة لنموذج فرعي داخل النموذج الاساسي
ارجو الرد بشرح ولو مختصر وشكراً مجدداً

**ناصر المصاروة** · 2011-02-06

بكل سهولة اجعل الاستعلام مصدرا لبيانات النموذج
ويمكن ان يكون بنموذج منفرد او نموذج فرعي حسب الحاجة

**أبو عبد الرحمن** · 2011-02-26

شـكـراً لـك

**omar19-3** · 2011-04-25

بارك الله فيك أستاذ ناصر .. زادك الله من فضله

**كينغ مان** · 2011-04-26

بارك الله فيك أخي العزيز ناصر موضوع جميل وشيق وفقك الله

**كينغ مان** · 2011-04-27

شرح جميل ورائع ......استاذ ناصر

مبدع دائما

اخي العزيز عندي سؤال : اذا كنت استخدم دفتر الفواتير وقيمة الفاتورة اسجلها بدفتر اليومية ودفتر الديون اذا كان المبيع بالأجل واذا كان كاش تسجل بدفتر اليومية
وكذلك اسجل بدفتر اليومية المصاريف (اجور عمال - كهرباء - مصاريف عامة ......) و ثمن البضاعة
فهل تسمح وترشدني الى طريقة تنفيذ ذلك بالأكسس ولكم الشكر اخي الكريم

**كينغ مان** · 2011-04-30

السلام عليكم
اخي الكريم ... ارجوا الإجابة ولكم جزيل الشكر

**أبو يوسف1** · 2012-06-19

دائما وابدا مبدع ورائد في الطرح والشرح
وفقك الله وجزاك الله كل الخير والتوفيق

**ابومنيب** · 2013-02-09

شكراً جزيلاً على هذا الشرح وهذا الابداع .... جعله الله في ميزان حسناتك ,,,,,,,,,,,,,

**ناصر المصاروة** · 2013-02-26

المشاركة الأصلية كتبت بواسطة كينغ مان

اخي العزيز عندي سؤال : اذا كنت استخدم دفتر الفواتير وقيمة الفاتورة اسجلها بدفتر اليومية ودفتر الديون اذا كان المبيع بالأجل واذا كان كاش تسجل بدفتر اليومية
وكذلك اسجل بدفتر اليومية المصاريف (اجور عمال - كهرباء - مصاريف عامة ......) و ثمن البضاعة
فهل تسمح وترشدني الى طريقة تنفيذ ذلك بالأكسس ولكم الشكر اخي الكريم

سؤالك لايمت للموضوع بصلة