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

كيفية كتابةrequete Sql server في adoqueryلمعرفة المواد منتهية الصلاحية

وضح السوؤال اكثر

سلام عليكم

شاهد المثال المرفق كيفية معرفة انتهاء صلاحية منتج
المرفق عبارة عن مثالين الاول : على قاعدة بيانات اكسس
والثاني بـ sql server طبعا يتطلب عملية ... attach

اعمل بواسطة قاعدة بيانات sql server وlangage delphie 7في مشروع gestion de stock de pharmacierو**** جعل الادوية المنتهية الصلا حية تظهر في form مستقلة باستعمال REQUETE في adoquery بحث ابحث عن كيفية استخدام date systeme في هذه requete
select * from produit stock where date peromption>=!!n

السلام عليكم

Date تعطيك التاريخ الحالي
فقط تحتاج لتغيير عرضها باستخدام مثلا FormatDateTime حتى لا يحدث تعارض ما sql
راجع
http://www.delphi4arab.net/forum/showthr...p?tid=2649
http://www.delphi4arab.net/forum/showthr...p?tid=3693

إقتباس : اعمل بواسطة قاعدة بيانات sql server وlangage delphie 7في مشروع gestion de stock de pharmacierو**** جعل الادوية المنتهية الصلا حية تظهر في form مستقلة باستعمال REQUETE في adoquery بحث ابحث عن كيفية استخدام date systeme في هذه requete
select * from produit stock where date peromption>=!!n

سلام عليكم

تقريبا نفس المثال السابق فقط اضافة فوم خاص بعرض المواد منتهية الصلاحية
في الحدث Onshow للفورم ينفذ الاستعلام ؟ شاهد المرفق صديقي





.

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

السلام عليكم

شيئ يجب أن تأخذه بعين الإعتبار في برنامج الصيدليات
انتهاء صلاحية لا يربط بالمادة (المنتج) في حد ذاتها بل بما يسمى بالدفعة (Lot)

مثال: إشتريت 10 وحدات من مادة ما في 2013/02/02 انتهاء صلاحية في 2014/02/02
ثم إشتريت 10 وحدات من نفس المادة (ولم تنتهي الكمية القديمة) في 2014/02/02 انتهاء صلاحية في 2015/02/02

كيف تستخرج تواريخ إنتهاء صلاحية هذه المادة إذا كنت تحفظ بالتاريخ في جدول المادة ؟

هاذا نفس السوِال الذي طرحت و كيف الحل و كيف تعرف من أي وحدة بعت منه

استعمال جدول ابن مستقل خاص بتواريخ الانتاج و انتهاء الصلاحية و رقم الدفعة (N° de Lot).
حيث كل منتج (سجل أب) له عدة دفعات (سجلات أبناء), تخزن معلومات كل دفعة في الجدول المستقل حيث الرابط بين الأب و الأبناء هو طبعا اسم المنتج.
و تترجم هذه الفكرة بتعليمات SQL.

و الله الموفق لما فيه صلاح البلاد و العباد.