كتابه تقرير من حقل (تاريخ) يحدد الفتره من والى حسب رمز معين

اهلًا وسهلا 

لضمان اجابة واضحة وسريعة 

الرجاء إرفاق الجدول والايعازات للتحليل والاجابة

وتحياتي للجميع

جربي تغيير الاسلوب في كتابة الكود.. والاعتماد على جمل Sql بدلا من الـ Do فالنتيجة غالباً أسرع

بالاضافة للاستفاد من الجداول المؤقتة بدلا من تخزين النتائج لجدول واعادة حذفها في كل مرة

قد يفيدك المثال التالي

CREATE CURSOR Test (cno i(4) AUTOINC , dDate d(8))
FOR i = 1 TO 500
	INSERT INTO Test (dDate) VALUES (DATE()+i)
ENDFOR

m.StartDate=DATE()
m.EndDate=DATE()+300
m.DocNumber=250
IF m.StartDate > m.EndDate
	MESSAGEBOX("...")
	RETURN .F.
ENDIF
SELECT * FROM Test WHERE cNo=m.DocNumber AND BETWEEN(dDate, m.StartDate, m.EndDate) AND NOT DELETED() INTO CURSOR crsReport
*REPORT FORM .... PREVIEW
brow

شكرا للمتابعة اخي عبدالله

لا داعي للشكر على واجب اخي فراس... العفو

شكرا جزيلا على الرد الكود يعمل الان والتقرير تمام وخطا الي كان عندي انه بدايه البرنامج كنت كاتبه SET EXCLUSIVE  on  , ممنونه منكم ولدي اسئله كثيره.................. مع فائق شكري

اهلًا وسهلا بكم دائماً 

عليكم المتابعة وعلينا الحلول مع اخوتي الكرام

الأخت الكريمة نور الأيام عليك اختيار الإجابة الأفضل 

مادام حلت المشكلة

تحيه طيبه استاذ الحقيقه جربت الكود الي طرحه الاخ ولم ينفذ اعترض ماعرف ليش  علما اني استخدم الاصدار السابع  ولكن نفذت الكود الي كنت كاتبه مسبقا مثل ماكتلك رفعت من برنامج start  خاصيه SET EXCLUSIVE  on

ما هي المشكلة التي تظهر لك ؟

الأخت العزيزة نور

اضغطي ملف البرنامج وارفعي للاطلاع عليه وتعديل الأشكال البرمجي بصورة أسرع 

تحياتي للجميع

السلام عليكم اسفه لتاخري بالاجابه.................

doc.rar

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

اخي عبدالله جلاد

ممكن توضحلنا بمثال بسيط كيفية  ربط الـ(CURSOR) بالتقرير وهل يمكن وضعه في Data Environment الخاص بالتقرير

وعليكم السلام أهلا أخي أكرم....

الجدول المؤقت لا يظهر في Data  Environment الخاص بالتقرير....

الا في حالة استخدام الـ CursorAdapter وأكيد أننا لا نريدها هنا.

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

اعتمد عليه لغاية الانتهاء من التصميم، ثم اقوم بحذفه...

وكمثال قم بانشاء الجدول المؤقت التالي - ولنفترض انه مكون من 40 حقل وليس فقط من حقلين

ونفترض ايضا ان اسم الجدول المؤقت عند تنفيذ التقرير في البرنامج سيكون crsTest

CREATE CURSOR crsTest (EmpNo I AUTOINC , EmpName c(100))

لغايات التصميم نحوّل الجدول المؤقت لجدول دائم بنفس الاسم على النحو التالي :

SELECT * FROM crsTest INTO TABLE crsTest

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

بعد الانتهاء من التصميم قم بازالة الجدول من  Data  Environment التقرير

وحذفه من مسار البرنامج ، تمهيدا لاستخدام الجداول المؤقتة أثناء التنفيذ

أتمنى ان تكون وصلت الفكرة ....ودمتم...

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

انا عضو جديد .. اتمنى ان نساعد بعضنا .. وجزاكم الله خير