• 0
اياد العراقي

اضافة قيد جديد داخل grid مرتبط مع grid اخر

سؤال

السلام عليكم  ...

لدي ملفين ...  الاول فيه معلومات عامة عن الموظف (الاسم ، الرقم ‘ الدورات ، الى غير ذلك من الامور ... ) والملف الثاني يحتوي على معلومات الدورات للموظف ( اسم الدورة ، تاريخها ، مكانها ) ويوجد ربط بين الملفين عن طريق key  مشترك بينهما  ..

وكل ملف تم عرضه على شكل grid بحيث عندما اتنقل في grid1 الخاص بمعلومات الموظف  يتغير تبعا لذلك grid2 الخاص بالدورات التي اخذها  كما هو موضح بالصورة ...

المشكلة التي تحدث معي انني عندما اريد اختار اي شخص من grid1 احتاج الى اضافة دورة جديدة له من خلال grid2 من خلال الكوماند (ادخال الدورات ) فهنا لا يفتح لي قيد جديد في grid2 وقد كتبت الايعاز التالي append blank داخل command  ولكن لا ينفع ؟

الفكرة ااني في الملف الرئيسي لدي عداد لعدد الدورات لكل موظف وفي الملف الثاني نضيف الدورات فقط .

ارجو المساعدة وقد بحثت في مواضيع المنتدى ولم اعثر على موضوع مشابه ؟

 

Capture.PNG

Capture.PNG

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه

5 إجابة على هذا السؤال .

  • 0

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

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

Thisform.grid2.refresh

 

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

شكرا لمشاركتك اخي ...

هذه العبارة موجودة ونفس المشكلة ... الامر هو كيف يتم الاضافة في grid2 بحيث يفتح قيد جديد 

وهذه البرمجة التي كتبتها

 

SELECT course 
APPEND BLANK 
REPLACE C_SER WITH GRADUATE.SER 
thisform.grid2.SetFocus
 thisform.grid2.column1.text1.SetFocus 
 w_recno=C_SER
 CALCULATE COUNT(C_SER) FOR C_SER=GRADUATE.SER TO W_CNT 
*!*      MESSAGEBOX(w_recno)
LOCATE FOR GRADUATE.SER =w_recno
REPLACE GRADUATE.g_courseno WITH W_CNT
thisform.grid2.Refresh 
0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

اخي العزيز الطريقة سهله جدا. 

الرجاء إرفاق المثال لإجابتك بالسرعة الممكنة ولأفضل النتائج

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

يا ريت ترفع الملفات يكون افضل 

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

السلام عليكم

جرب التالي لاضافة حقل جديد لجدول الدورات 

m.lnc_ser=Graduate.Ser
INSERT INTO course (c_ser ) VALUES (m.lnc_ser)

 

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه

من فضلك سجل دخول لتتمكن من التعليق

ستتمكن من اضافه تعليقات بعد التسجيل



سجل دخولك الان

  • يستعرض القسم حالياً   0 members

    لا يوجد أعضاء مسجلين يشاهدون هذه الصفحة .