delphi4arab منتديات دلفي للعرب

نسخة كاملة : قاعدة بيانات مبيعات جاهزة
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
مرحبا

هذه قاعدة بيانات من تصميمي لمبيعات .

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

هل وصلت الفكرة ....؟

ايضا جدول راس الفاتورة واحد للمشتريات والمبيعات والحقل Mtype يحدد هل هي فاتورة مبيعات ام مشتريات .
مع العلم يمكن الاستغناء عنه طالما لدينا حقلين للمدخلات والمخرجات .

فان كان هناك قيمة بالحقل Qin فهذا يعني انها مشتريات وان كان هناك قيمة بالحقل Qout فهذا يعني انها بضاعة صادرة .


الحقل Price قد ترى انه غير ضروري طالما ان سعر الشراء والبيع موجود بجدول الاصناف ولكن قد يكون سعر البيع او الشراء مخالفاً للسعر المعروض بجدول الاصناف .

هناك دعوة للنقاش يمكننا ان نستفد من خبراتنا

الملف بالمرفقات
السلام عليكم

شكرا لك لمشاركتنا اياها

Delphi4Us كتب :يبدو حقا ان ما تفكر فيه يفكر فيه غيرك ايضاً

هذا الرد يأكد كلامك Rolleyes

http://delphi4arab.net/forum/showpost.ph...stcount=27

+ ردود الموضوع تصب في نفس الموضوع

http://delphi4arab.net/forum/showthread.php?tid=3491&
هل تصدق ...!

كم من مرة اعتقد ان فكرة عندي لا يعلم عنها احد واتفاجئ ان الجميع او اغلبهم يفكرون فيها .

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

كود :
Sound.Play.Path("PathName")

هذا العرف لم يكن متبعاً ومعروفا وقتها بل انني قمت بانشاء عدة متغيرات على شكل هيكلية قاعدة البيانات
التي اعمل عليها واجلب فيها ما ارريد من بيانات اعمل عليها بالذاكرة واحفظها متى ارريد .

والنتيجة ....!

اظهرت مايكروسوفت شيئاً صار يعرف بأسم الـ DataSet

والقائمة تطول ولكني اختبرت فعلاً ان ما تفكر فيه يفكر فيه غيرك .

وبالعودة الى الموضوع وبعد اطلاعي على الدروس الجانبية فانا جعلت بقاعدة البيانات استعلام يقوم بجلب كمية المخزون .

وهو عبارة عن

كود :
SELECT Sum(Body.Qin) AS SumOfQin, Sum(Body.Qout) AS SumOfQout, Body.ItemID FROM Body GROUP BY Body.ItemID HAVING (((Body.ItemID)=[?]));

ويبدو ان هناك من الاخوة من يؤيدني في هذا
مرحبا

حسنا لم يكفي قاعدة البيانات فبدأت في المنظومة نفسها
ومن يريد ان يشارك فلا باس
قلت قمت بانشاء الموردين والعملاء والاصناف
وسوف نكمل الباقي لنرى الى اي مدى ستنجح هذه القاعدة
والملف بالمرفقات

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

لم ارفع قاعدة البيانات مرة ثانية ضع القديمة هنا فقط