المساعدة في ارتباط بعض البيانات بالدليل المحاسبي

[حربي العنزي]

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

في هذا البرنامج المرفق هناك حقل رقمي اسمه الدليل المحاسبي 

طلبي هو عندما اكتب رقم الدليل المحاسبي يعطيني بيانات ( رقم المستند - تاريخه - الغرض ) المرتبطة بهذا الكليل المحاسبي 

شرح اكثر : مثلا في اول سجل ادخل رقم الدليل المحاسبي 366 وادخل كل البيانات ( كل الحقول ) عندما انتقل الى السجل الذي يليه 

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

                 اي انا اقوم فقط بأدخال المبالغ  لان المبالغ تتغير من سجل الى اخر 

                 مع فائق الشكر والاحترام 

Current_CostProg.rar

[حربي العنزي]

للرفع

[mrastra]

اذن يجب انشاء جدول خاص بالدليل المحاسبى ويكون عبارة عن حقلين 

الحقل الاول رقم الدليل المحاسبى وليكم 366 وياخذ الاسم " حسابات العملاء " على سبيل المثال 

وبعد ملىء جيع انواع الحسابات يجب وضعه على النموذج الرئيسى وليس الفرعى 

يجب انشاء علاقة واحد الى متعدد ما بين جدول الدليل المحاسبى والجدول الفرعى

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

وفى حدث للكمبو بوكس يعمل REQUERY للنموذج الفرعى

هذا ما اعتقده 

[حربي العنزي]

السلام عليكم استاذي الغالي mrastra ورحمة الله وبركاته شكرا لك على ردك السريع 

لكن ليس هذا هو طلبي : طلبي هو كمثال عندما اقوم بأدخال بيانات اول سجل مثلا ( ادخل بيانات هذا السجل كاملا من اول حقل الى اخر حقل ولنفرض هو اخذ رقم الدليل المحاسبي 366 ثم ادخلت بيانات السجل الثاني كاملا من اول حقل الى اخر حقل واخذ رقم دليل محاسبي 311 

عندما انتقل الى ادخال بيانات السجل الثالث وصادف رقم الدليل المحاسبي هو 366 فبمجرد ان اكتب في حقل الدليل المحاسبي رقم 366 يظهر رقم المستند وتاريخه  والغرض 

الذين ادخلتهما في السجل الاول اما حقول المبالغ ادخلهما من جديد لانهما متغيرات تختلف من سجل الى اخر 

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

 

[حربي العنزي]

اساتذتي الافاضل هذا شرح افضل لعملية الاستخدام للبرنامج

شرح اكثر : مثلا في السجل الاول رقم محاسبي 366 مدخله بياناته كاملة  اريد عندما ادخل نفس رقم الدليل المحاسبي الذي 366 في بداية سجل جديد واضغط انتر يعيد نفس بيانات هذا السجل المدخل سابقا والذي رقم الدليل المحاسبي له هو 366 وهكذا على كل ارقام الدليل المحاسبي  مع فائق الشكر والاحترام

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

مع وافر التحايا

[حربي العنزي]

للرفع

[حربي العنزي]

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

هل طلبي صعب او لم اقم بشرح جيد لطلبي

جزاكم الله كل الخير 

تم تعديل أبريل 2, 2016 بواسطه حربي العنزي

[حربي العنزي]

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

انا احتمال بالشرح صعبت الامور 

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

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

تم تعديل أبريل 2, 2016 بواسطه حربي العنزي

[حربي العنزي]

الا يوجد احد يساعدني 

[حربي العنزي]

للرفع

[jjafferr]

السلام عليكم 

 

استخدم هذا الكود في الحدث "بعد التحديث" ، لحقل رقم الدليل المحاسبي :

Private Sub Daleel_Calc_AfterUpdate()
    
    Dim rst As DAO.Recordset
    Set rst = CurrentDb.OpenRecordset("Select * From TBL2 Where [Daleel_Calc]='" & Me.Daleel_Calc & "'")
    
    If rst.RecordCount <>  Then

        Me.Mostnd_Num = rst!Mostnd_Num
        Me.Mostnd_Date = rst!Mostnd_Date
        Me.Notes = rst!Notes
        
    End If
    
    rst.Close: Set rst = Nothing
    
End Sub

 

If rst.RecordCount <> 0 Then

 

جعفر

344.Current_CostProg.mdb.zip

[حربي العنزي]

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

الله عليك يا ملك والله كلمة شكرا قليلة في حقك نعم هذا هو المطلوب

الله لايحرمنا من شخصك الكريم  سائلا الله جل وعلا ان يمن عليك وعلى عائلتك الكريمة وعلى بلدك العزيز باالصحة والعافية والامن والامان والستر في الدنيا والاخرة يارب 

[jjafferr]