طاهر اوفيسنا

عفوا تصحيح الكود في الحدث عند Afterupdate() عفوا تصحيح الكود في الحدث عند Afterupdate() krimo2015.rar

السلام عليكم ممكن مساعدة بخصوص تصحيح الحدث التالي Private Sub detaché_Afterupdate() On Error GoTo Err_detaché_Click If IsNull(txtMonth) Then MsgBox "اختر الشهر" DoCmd.CancelEvent Exit Sub End If On Error GoTo Err_detaché_Click 'DoCmd.OpenReport "rptDiscount", acPreview, , "((TheSum > 0)AND (detach = 'موظف'))", , OpenArgs:="موظفين" Me.Report_Title = "للموظفين" Me.Report_Title = "للعمال المنتدبين" Me.Report_Title = "للعمال المتعاقدين بالتوقيت الكامل" Me.Report_Title = "للعمال المتعاقدين بالتوقيت الجزئي" Me.Report_Title = "للعمال اعوان النظافة والتطهير" DoCmd.OpenReport "rptDiscount", acPreview, , , , OpenArgs:="qry_rptD_2" Exit_detaché_Click: Exit Sub Err_detaché_Click: MsgBox Err.Description Resume Exit_detaché_Click End Sub

شكر اخي نور الدين كل الطرق تؤدي الى نفس الحل ولكن ربما طريقك بجعل نوع بيانات الحقل ramz محسوبة مع كتابة المعادلة يكون احسن للعلم هو لم يطلب التخزين في الجدول التخزين في الجدول يعمل حدث في النموذج عند بعد التحديث Private Sub Form_AfterUpdate() Me.ramz = Me.[Form]![year] & "-" & Me.[Form]![fasl] & "-" & Me.[Form]![group] End Sub

هذه محاولة اتمنى تكون مطلوبك في مربع نص ramz ضع مايلي : =[Form]![year] & "-" & [Form]![fasl] & "-" & [Form]![group]

ربي يرجعك سالما اخي جعفر اذا وجدت وقتا بعد سفرك الثاني فاني على يقين انك لا تبخل علينا بالمساعدة حياك الله

اخي جعفر حياك الله لقد آلت بي السبل الى وقوع مشكلة في الفرق بين إقتطاعات الموظفين والمتعاقدين هل انت مستعد لتكملة ماترك خلال شهر جوان 2015 ام لا

المشكلة في الرقم اذا كان الموظف يحمل رقم 1 والممون يحمل نفس الرقم كيف يتم جلب معلومات الموظف ام الممون

1- الممون ليس له مكتب بالتالي لانعمل حقل "مكتب" 2- المشكلة كيف يتم ادخال معلومات الممون في الفورم frmAmountCurrent

اريد إدخال معلومات الممون وهي كالتالي : رقمه إسمة ولقبه باللغتين العربية و الفرنسية رقم حسابه البنكي مبلغ فاتورة تاريخ الفاتورة العنوان ملاحظات ويكون مع الفورم الخاص بتحويل النقود مع الموظفين للبنوك اي فورم افقتطاع غير معني به ولا يدخل ضمنه

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

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

شكرا لك استاذ لقد تنبهت للمشكلة والآن ممكن مساعدة بخصوص هذا الشرط في هذا الحدث الا إذا كانت ccp يفتح التقرير VIREMENTCCP Private Sub trns2_AfterUpdate() On Error GoTo Err_trns2_Click If IsNull(mnth2) Then MsgBox "اختر الشهر" DoCmd.CancelEvent Exit Sub End If Dim stDocName As String stDocName = "rptTransBnk" DoCmd.OpenReport stDocName, acPreview Exit_trns2_Click: Exit Sub Err_trns2_Click: If Err.Number = 2501 Then Resume Exit_trns2_Click Else MsgBox Err.Description Resume Exit_trns2_Click End If End Sub

والله ما فهمت استاذ انا جربت المرفق الأخير karem11 ونسخت العمال في جدول Employee ونسخت الإستفادات في جدول tblAmountCurrent فوجدت المشكلة اما بخصوص اكمال ملء الحقول الفارغة التي في الصورة المرفقة بل النموذج المرفق ليس به حقول فارغة امام تعديل العلاقة كما اشرت ماعدلت على شيء

بارك الله فيك استاذ لقد نسخت عملي القديم في الجدول tblAmountCurrent كاملا اي القروض والكهرومنزلية والفرش وغيرها تفأجئت بهذا المشكل في rptTransfer و rptTransferAll Karem11up.rar

حاولت جادا من البارحة ولكن لم أفلح

مشكلة ثانية أستاذ وهي في التقريرين subTransBnk1 وsubTransBnk1 التصفية بالشهر فقط وليس بالشهر والسنة

أستاذي الجليل أبو خليل لقد طبقت المثال على كافة العمال الي عندي ولكن وجدت صعوبة في التصفية تجميع البنوك كما اشرت انت في المثال Karem7.rar ظهرت البنوك عير مجتمعة مع بعض في التقرير rptDiscount اي ccp ccp ccp BDL BDL BDL . . . . . الخ مع طلب صغير ظهور رمز البنك بين قوسين وإسمه مثال : (ccp) بريد الجزئر (BDL) بنك التنمية المحلية

ظهور مشكلة كما بالصورة

والآن استاذ في الفورم الي في الصورة إذا مرت السنين وكثرت الإستفادات نرى كل الأشهر كاملة في مربع السرد من رأي نقيدها بشهر الجهاز مع إعطاء الحق بأن يوضع التاريخ يدويا ولك واسع النظر

شكرا لك استاذ لي الآن إستفسار في الجدول tblAmountCurrent ليش اخترت رقم الموظف يظهر به إسم الموظف ؟ بالرغم من ان البرنامج يلزمه ظهور اسم الموظف ورقمه مع بقاء ظهور الرقم الترتيبي ID

شكر لك استاذ لقد إكتشفت شيئا أخر وهو عدم تطابق التصفية بواسطة الشهر بالأاعلى نجد الشهر المختار ولكن معلومات التقرير مختلفة مثالنا في شهر مارس 2015 تظهر الا معلومات اسماء وفي شهر اوت 2015 يظهرا دليلة والعطرة فقط جرب غير ف الجدول tblAmountCurrent إستفادة احد الموظفين كما بالصورة

في فورم الإقتطاع يكون على هذا المنوال =[Forms]![FrmTransfer]![mnth] جعلت M1 في التقرير مربع نص وكتبت فيه (=[Forms]![FrmTransfer]![mnth]) ويبدو بها مشكل

للأسف الشديد جربت كل المحاولات بداية من جعل المربع النص بالتقرير مربع تحرير وسرد ومصدر استعلامه تجميع التواريخ SELECT Month([Get_Date]) AS mth, tblAmountCurrent.Get_Date FROM tblAmountCurrent GROUP BY Month([Get_Date]), tblAmountCurrent.Get_Date;

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

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