Taher DZ

يوجد 3 حقول في الجدول CCP هي التي اريد ان يكتب فيها تلقائيا خلال كل شهر مايلي : رقم الحساب "N° ccp" تاريخ "Datetirag" المبلغ "Monttirag" ملاحظة : ادخل على الفورم FrmTransfer خلال شهر ديسمبر 2015 كما في الصورة التحويل مرة واحدة فقط

مصدر هاذين الرسالتين من الجدول CCP كيف يتم إدراج هذين الحقلين من الجدول المذكور ضمن الإستعلام qry_1-5 ملاحظة : المبالغ والتواريخ ورقم الحسابات في الفورم frmCcp كتبت يدويا علما انه اذا تم الدخول من الفورم frmTransfer يطلب الا ادخال رقم الحساب اما المبالغ والتواريخ تجدها نفسها او بالأحرى ماهي الطريقة : اذا دخلت بالفورم frmTransfer يتم تسجيل "" رقم الحساب الذي هو مربع نص غير منظم يتم ادخال قيمة معلمة يدويا والتاريخ(txtMonth) الموجود في التقرير ب M والمبلغ(SumOfTheValue) "" في الجدول ccp

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

حياك الله استاذي الكريم جعفر والله لك مكانة كبيرة في القلب عملت الحدث كما يلي : '------------------------------------------------------------ ' Datetirag_Click ' '------------------------------------------------------------ Private Sub Datetirag_DblClick(Cancel As Integer) On Error GoTo Datetirag_Click_Err ' stDocName![rptTransfer]![qryTransfer].Controls("Datetirag") = Me.Datetirag ' DoCmd.Close acReport, "rptTransfer" DoCmd.OpenReport "rptTransfer", acViewPreview, , "[Datetirag]=#" & Me.Datet Datetirag_Click_Exit: Exit Sub Datetirag_Click_Err: MsgBox Error$ Resume Datetirag_Click_Exit End Sub عند النقر مرتين ظهرت هذه الرسالة

السلام عليكم أساتذتي الكرام بالمرفق ادناه المطلوب عند النقر مرتين عند تاريخ السحب في الفورم frmCcp يفتح التقرير rptTransfer به تاريخ السحب ورقم الصك المسحب ومبلغ السحب بما في ذالك أسماء المستفيدين ومبالغ إستفادتهم وملاحظات الخاصة بهم اثناء التاريخ الذي تم الدخول به علما ان الفورم FrmTransfer هو الفورم الأساسي للدخول لهذا التقرير بعد التعديل على تاريخ الجهاز ليظهر عند مربع النص "دفع المستحقات خلال الشهر" krimo2015.rar

عفوا تصحيح الكود في الحدث عند 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