استشارة للبدأ بتنفيذ مشروع برنامج عمليات مالية للبداية الصحيحة بأحتراف

[abouelhassan]

السلام عليكم اخى لا احتاج هذا التبويب الان

اشكرك

[ابوخليل]

تفضل حسب شرحك للخطوات

بعد ادخال التاريخ ورقم المستند وتحديد الحساب ...

يتم ادخال البيانات 

ادرس الفورم جيدا .. وكذلك الكائنات المساعدة ... وكيف تم التنفيذ

واشرح لي ما فهمته

 

 

Financial_db.rar

[abouelhassan]

اخى الكريم استاذى الحبيب ابوخليل

روعة البساطة والعملية 

نموذج ممتاز فهمته جيد ممتاز فعلا الاكواد المستخدمة فى النموذج

Option Compare Database
Private Sub ComSave_Click()
Me.Requery
Dim ctl As Control
For Each ctl In Me.Controls
If TypeName(ctl) = "TextBox" Or TypeName(ctl) = "combobox" Then
If IsNull(ctl) Or ctl = "" Then
MsgBox " لا يمكن ترك اي حقل فارغ", vbInformation, ""
DoCmd.CancelEvent
ctl.SetFocus
Exit Sub
Exit For
End If
End If
Next ctl

Dim rs As Recordset
Dim rst As Recordset
Dim R As Integer
    Set rs = CurrentDb.OpenRecordset("tblFinancial_Records")
  Set rst = Me.RecordsetClone
rst.MoveLast
R = rst.RecordCount
rst.MoveFirst
For i = 1 To R
 rs.AddNew

rs!Reg_Date = Me.Reg_Date
rs!theYear = Me.theYear
rs!Reg_doc_Number = Me.Reg_doc_Number
rs!Account = Me.Account
rs!Alsenf_ID = rst!Alsenf_ID
rs!Creditor = rst!Creditor
rs!Debit = rst!Debit
rs!Reg_Text = rst!Reg_Text
rs!Pay = rst!Pay
        rs.Update
   rst.MoveNext
   Next
   Set rs = Nothing
   Set rst = Nothing
MsgBox "تم الحفظ", vbInformation, ""


DoCmd.SetWarnings False
DoCmd.RunSQL "DELETE tblFinalTemp.*, * FROM tblFinalTemp"
DoCmd.SetWarnings True

Me.Requery
 Me.Reg_Date = Null
 Me.theYear = Null
 Me.Reg_doc_Number = Null
 Me.Account = Null

End Sub

Private Sub Form_Open(Cancel As Integer)
Me.Reg_Date.SetFocus
End Sub

Private Sub Form_Unload(Cancel As Integer)
DoCmd.SetWarnings False
DoCmd.RunSQL "DELETE tblFinalTemp.*, * FROM tblFinalTemp"
DoCmd.SetWarnings True
End Sub

Private Sub Reg_Date_AfterUpdate()
Me.theYear = Year(Me.Reg_Date)
End Sub

ممتازين جدا جدا جدا فهمتم والله جدا

احتاج نموذج التعديل واعرف اضيف له غلق التعديل فى يوم 10 من الشهر التالى لمنع التلاعب بالبيانات فقط الادمن يستطيع التعديل 

والتقارير وهى الغاية المنشودة 

رمضان كريم عليك وعلى اسرتك الكريمة

[ابوخليل]

تقصد التعديل متاح للجميع حتى يوم 10 من الشهر التالي .. ما عدا المدير يكون مفتوح له التعديل ؟

 

[abouelhassan]

تمام اخى الحبيب 

[ابوخليل]

تمام هذه يمكننا عملها في النهاية عند اعداد صلاحية المستخدمين

الآن وبكل يسر سهولة :

يمكنك عمل نموذج للتعديل مصدره جدول العمليات .

ونموذج آخر  غير منضم  اعمل فيه ازرار  .. حسب التقارير التي تريد الاطلاع عليها

بحيث تكتب في تسمية الزر  البيانات المطلوب عرضها في التقرير

[abouelhassan]

تجربة 1 خالص شكرى وتقديرى واحترامى

Financial_db.accdb

[ابوخليل]

انت ذكرت تريد نموذج تعديل

وفي المرفق نموذج للبحث والتعديل .. الى هنا تمام

ولكن استوقفني خانات التعديل والاضافة والمنع ... وايضا يوجد حقل  اسمه حذف

لا اتصور ان مكان الخانات هذه ظاهرة امام الجميع .. حيث هذه الصلاحية يجب ان تكون آلية حسب المستخدم 

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

اما الإضافة فغير وارد في هذا النموذج لأن الاضافة تتم في نموذج الادخال

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

التعديل او الحذف من صلاحيات المدير

هل كلامي اعلاه صحيح ؟؟؟ .. واذا لديك ملاحظة او تعليق هاتها .

[ابوخليل]

ملاحظات اخرى :

الحالة موجودة في النموذج ؟؟ ونحن استبعدناها في التصميم .. حيث لا وجود لها في الجداول 

وسؤال عن المبلغ .. حقل المبلغ ما الذي يظهر فيه ؟؟ حيث لدينا : دائن ومدين ورصيد 

[abouelhassan]

كلامك صحيح اخى سيكون متاح أمام الادمن

أما الحالة فهى أيضا من صلاحيات الادمن وخى مرحل وغير مرحل ودى آخر مرحلة كما ذكرت حضرتك سابقا منع التعديل 

المبلغ سأعمله دائن ومدين. بالطبع

شاكر لك اخى كرمك 

[ابوخليل]

1 ساعه مضت, abouelhassan said:

المبلغ سأعمله دائن ومدين. بالطبع 

لماذا لم تعمله  ؟.. انت جلبت النموذج من مرفق آخر فقط

عندي احساس انك لا ترغب في الاستمرار 

اذا لم لم تكن نشيطا الى هذا العمل في رمضان يمكننا تأجيله .

 

الآن تم ضبط نموذج البحث

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

ايضا اضافة الى ذلك هو للمدير نموذج تعديل وحذف

اخي الطيب :

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

 

Financial_db2.rar

[abouelhassan]

اخى الحبيب والله كلى حماس 

احبك يا طيب 

[abouelhassan]

اخى الغالى تم عمل تعديل على نموذج البحث والتعديل واضافة كأئنات للبحث مثل الحساب وحالة الصرف 

والحمد لله ضبطت ينقص اكواد الفلترة حيث تظهر كل البيانات فى البحث

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

كمان ايه رأيك اخى استطيع عمل نموذج يقوم بعرض كل البيانات حال احتجناها ايه رأيك

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

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

 

Financial_db2.accdb

تم تعديل مارس 13 بواسطه abouelhassan

[ابوخليل]

منذ ساعه, abouelhassan said:

اخى الغالى تم عمل تعديل على نموذج البحث والتعديل واضافة كأئنات للبحث مثل الحساب وحالة الصرف 

والحمد لله ضبطت ينقص اكواد الفلترة حيث تظهر كل البيانات فى البحث

سوف اعملها لك

منذ ساعه, abouelhassan said:

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

كأنك بدأت تهتم .. وهذا سوف اضيفه لك كما ينبغي

منذ ساعه, abouelhassan said:

كمان ايه رأيك اخى استطيع عمل نموذج يقوم بعرض كل البيانات حال احتجناها ايه رأيك

اعمله في نموذج البحث هذا .. لانه لم يتبقى بيانات في الجدول .. واحدة او اثنتان

منذ ساعه, abouelhassan said:

وكمان ايه رأيك اخى اضيف للبحث التاريخ

التاريخ موجود .. هل تقصد بين تاريخين ؟

منذ ساعه, abouelhassan said:

وتصدير نتائج البحث الاكسيل للمراجعة استطيع عملهم ولكن ينقص الاكواد وده بعد رأيك هل لها فائدة ام لا انا اقول ما احتاجه فى البرنامج السابق وانتظر رايك

 

لست بحاجة فأكسس يظهر لك جميع النتائج كتقارير ويمكنك تصديرها كــــ  اكسل او صورة او pdf

[abouelhassan]

السلام عليكم اخى

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

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

ارجو الاطلاع شاكر فضلك

Financial_db2.accdb

[ابوخليل]

41 دقائق مضت, abouelhassan said:

السلام عليكم اخى

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

نعم هو الصحيح يكتب المعرف وليس النص

راجع مسمياتك تجد فيها اخطاء املائية كثيرة 

41 دقائق مضت, abouelhassan said:

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

ارجو الاطلاع شاكر فضلك

 

تم الاطلاع

__________________________________

كنت اعمل على المرفق السابق واضفت نوع الحساب كنت ااحسبك تقصد بالنوع : جديد قديم

هل ابقي عليه ؟؟  اذا نعم ما هو اسمه اذا جعلنا القائمة الجديدة هي التي اسمها النوع

وياليتك تشرح لي النوع الجديد هذا ايش يعني ... وكأن له صلة بالارصدة

 

 

[abouelhassan]

اخى حبيبي الكريم

اكتشفت أثناء العمل أننى احتاج ادخال البيانات لعدد من الأنواع من التصنيفات الحسابات بمعنى كل صنف ممكن ان يكون له نوع مختلف كما انا كاتبه يعنى الصنف الأول النوع الأول والصنف الأول النوع الثانى وهكذا

يعنى الصنف يدخل لحساب ونوع الحساب 

احتاج الى بيانات لهذا التصنيف للفلترة به

حاولت العمل واجتهد للتعلم والله 

 

اتمنى يكون الفكرة وصلت لحضرتك

تقبل تحياتي 

[ابوخليل]

طيب الجدول الجديد الذي فيه تم الصرف ما القصد منه ؟

لأنه يمكن اظهار النتائج بدون جدول

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

[abouelhassan]

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

اشكرك 

[ابوخليل]

احاول اعمل لك اول تقرير

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

هل ترغب في رأس للتقرير مميز

اذا نعم .. زودني ببيانات الرأس الثابتة التي تمثل مؤسستك ولا باس ان كان هناك شعار

[abouelhassan]

مؤسسة العدل

إدارة الحسابات

تم بواسطة   اسم المستخدم  والجانب الآخر التاريخ 

فى اعلى يمين التقرير 

خالص تحياتي وتقديري لحضرتك 

 

[ابوخليل]

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

- انظر  وجرب نموذج البحث

- انظر وجرب تصفية التقرير من نموذج التقارير

1- التصفية تتم من خلال 5 بنود .. الحساب ونوعه والصنف ... هذه اساسيات في تفصيل التقرير

2- السنة المالية وبند الصرف تظهر في رأس التقرير عند التصفية

السبب : واضح ... انه يمكن تصفية بند واحد من بند 2  ولا يمكن العكس

........ جرب افتح التقرير بدون تصفية .. وجرب التصفية ببند او بندين او ثلاثة .... وهكذا

................ 

Financial_db4.rar

[abouelhassan]

ممتاز يمتاز بالبساطة والقوة والله تسلم ايدك اخى

حاولت اضافة جملة

     .FilterOn = False فى نموذج البحث بحيث تخفى البيانات لم تنجح احتاج شرح كيف عملها اخى

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

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

احتاج شرح لماذا نوع الحساب يظهر بالجدو الرئيسى رقم وليس اسم وما هو السبيل لتعديله ليكون اسم

شكرا من القلب
 

[ابوخليل]

منذ ساعه, abouelhassan said:

     .FilterOn = False فى نموذج البحث بحيث تخفى البيانات لم تنجح احتاج شرح كيف عملها اخى

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

منذ ساعه, abouelhassan said:

احتاج شرح لماذا نوع الحساب يظهر بالجدو الرئيسى رقم وليس اسم وما هو السبيل لتعديله ليكون اسم

اولا نحن لا نتعامل في اكسس مع الجداول .. 

الجداول يجب ان تكون بعيدة عن المتناول

الأصل في البرمجة الاحترافية ان تكون جميع البيانات المدخلة في الجداول عبارة عن ارقام تمثل معرفات لنصوص .. سواء كان نوعها نصي او رقمي ، من باب الأمان وايضا لسهولة وسرعة تدفق البيانات عند التعامل معها في الاستعلامات والتقارير

على كل حال هذه الارقام كما ترى يتم ترجمتها لنصوص في النماذج والتقارير

[ابوخليل]

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

الآن لن تجد الا ارقاما .... فقط  حقل البيان هو اليتيم ,, وحقل نعم لا

ملحوظة :

تم اصلاح البحث حسب الطلب

 

Financial_db5.rar