كيف عمل استعلام sql يظهر فيه المواد التي اقترب موعد انتهاء الصلاحية

[salmaanga]

السلام عليكم
كيف عمل استعلام sql يظهر فيه المواد التي اقترب موعد انتهاء الصلاحية في لغة الدلفي

كود :

select * from prodoiu where prodoui.date>=now and   prodoui.date<=now+6

ما الخطا في هذا الكود؟

[محمد الدرة]

مانوع قاعدة البيانات
اذا كانت SQl Server
فاستخدم بدل Now
GetDate()

وبدل Now+6
استخدم
DATEADD(day,6,getdate())

[PLANSHARP]

الكود ينقصه between

[justnick]

السلام عليكم ورحمة الله
هذا الكود الذى اعتمد عليه فى انشاء تقارير قرب انتهاء الصلاحية عندى فى الصيدلية
حيث ان جدول المشتروات هو purchase يحتوى على تاريخ الصلاحية وكود الصنف والكمية المتبقية net_qty
وجدول الاصناف هو items يحتوى على كود الصنف واسمه وسعره ومعلومات اخرى
ما اقوم به هو دمج باستخدام left join
واضع شرط ان تكون الكمية المتبقية اكبر من الصفر

كود :

net_qty > 0

وتاريخ انتهاء الصلاحية بين تاريخين

كود :

between :D1 and :D2

PHP كود :

select * from purchase left join items 
where net_qty > 0 and purchase.expire_date between :D1 and :D2
order by purchase.expire_date 


ولاستعاء الاستعلام :-

PHP كود :

with ADODataSet1 do
begin
  close;
  Parameters.ParamByName('D1').Value:=DateTimePicker1.Date;
  Parameters.ParamByName('D2').Value:= IncMonth(date,strtoint(NumEdit1.Text));
  open;
end; 


[salmaanga]

مانوع قاعدة البيانات
اذا كانت SQl Server
فاستخدم بدل Now
GetDate()

وبدل Now+6
استخدم
DATEADD(day,6,getdate())

قاعدة البيانات المستعملة بارادوكس

[salmaanga]

السلام عليكم ورحمة الله
هذا الكود الذى اعتمد عليه فى انشاء تقارير قرب انتهاء الصلاحية عندى فى الصيدلية
حيث ان جدول المشتروات هو purchase يحتوى على تاريخ الصلاحية وكود الصنف والكمية المتبقية net_qty
وجدول الاصناف هو items يحتوى على كود الصنف واسمه وسعره ومعلومات اخرى
ما اقوم به هو دمج باستخدام left join
واضع شرط ان تكون الكمية المتبقية اكبر من الصفر

كود :

net_qty > 0

وتاريخ انتهاء الصلاحية بين تاريخين

كود :

between :D1 and :D2

PHP كود :

select * from purchase left join items 
where net_qty > 0 and purchase.expire_date between :D1 and :D2
order by purchase.expire_date 


ولاستعاء الاستعلام :-

PHP كود :

with ADODataSet1 do
begin
  close;
  Parameters.ParamByName('D1').Value:=DateTimePicker1.Date;
  Parameters.ParamByName('D2').Value:= IncMonth(date,strtoint(NumEdit1.Text));
  open;
end; 


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

[justnick]

اى كان نوع قاعدة البيانات
الاستعلام المستخدم
ينبغى ان يحتوى على الشرط where .....between

كود :

SELECT column_name(s) FROM table_name WHERE column_name BETWEEN value1 AND value2