القاعدة الجماعية للمحاسبة ( المرحلة الرابعة )

الأخ العزيز أبو هادي : فينك يا راجل يا طيب

أعتقد أنه إن شاء الله لن يفهم أحد شيء بالخطأ وجميعا بالتشاور نحاول الوصول إلى أفضل حل .

بالنسبة لموضوع القيود أنا لدي برنامج أعمل عليه وبه 1- قيد افتتاحي 2- قيود اليومية المعتادة 3- القيود المتكررة ( ومقصود بها القيود التي تتكرر بشكل مستمر ودائم ) و أعتقد أنه لا داعي لها . فغالبا القيود الافتتاحية تكون فى ملف منفصل .

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

أشرف خليل

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

اولا مرحبا بالاخ ابو هادى والاخ اشرف

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

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

(f)

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

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

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

نعم مافهمته صحيح فى موضوع ادخال القيود للارصدة الافتتاحية

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

سوف اعدلها ان شاء الله

الأخ طارق : أعتقد أنه لا ما نع من أن أي فورم يتم تجهيزه يتم إرساله للمناقشه حتى لا تتجمد المناقشة على موضوع واحد فقط ولفترة طويلة .

هذا مجرد رأي . وما راي الأخوة .

أشرف خليل

إخواني أرى تفعيل النقاش على رأي أشرف و أضيف عليه شيئ وهو

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

-1- ثلاثة أسطر على الأقل في أي مكان ترونه مناسبآ يشرح فيه الوظيفة التي يقوم بها الفورم أو الوحدة النمطية

-2- سطرين عند بداية أي Sub أو Function أو Do Until يشرح بها المقصود

-3- سطر عند بداية أي جملة If أو Select Case يشرح بها المقصود

-4- ثلاث أو أربع كلمات عند أول ورود لمتغير ما Dim As

هل طلبي مناسب و هل مقبول ومعقول أرجو الرد من جميع ولكم مني كل تحية

انا موافق على الاقتراخ الخاص بشرح اى كود او اعطاء نبذة مختصرة عنه

ثانيا سوف ارسل مساء ان شاء الله اخر تعديل على دليل الحسابات يغطى كل الملاحظات للاخوة على ان نراجعها مرة اخرى ان شاء الله

سوف ابد الجمعة باذن الله فورم القيود

(f)

الأخوة الكرام .. بعد التحية :

عذرا أقول أن الشرح بهذه الطريقة ليست مكانها هنا في هذا الموضوع .. وليكن ذلك في مواضيع أخرى للتعلم وإلا أصبح الموضوع شيء ممل لا يحتمل .

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

عذرا مرة أخرى ولكن عملية التنظيم مهمة ومهمة جدا ، أود لو أن كل المشاركات في هذا الموضوع تصب في مصلحة هذا البرنامج من تقديم اقتراحات وتصميم وكتابة أكواد وتقويم (تقييم) .

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

هذا رأيي وليؤخد برأي الأكثرية .

ولكم تحياتي

الاخوة الكرام

تحية طيبة وبعد

اولا: بالنسبة لرصيد اول المدة لابد من ادخالة عند الاستخدام الاول للنظام الجديد ( البرنامج) و يفضل ادخالة مع شجرة الحسابات لسهولة اكتشاف اخطاء ارصدة اول المدة وسهولة مراجعتها

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

وايضا اقول لبعض الاخوة لا يوجد برنامج محاسبي شبية بالاخر من حيث المعالجة من ناحية التصميم

والي لقاء قريب

وشكرا للأخوة الذين يساهمون في انشاء البرنامج

الأخوة الكرام

سأقوم بالتعديل على بعض التحكم بفورم ادخال الحسابات وجدول الحسابات .

ملاحظة :

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

تحياتي

إخواني الأفاضل :

الأخ طارق وافق على الاقتراح الخاص بشرح اى كود او اعطاء نبذة مختصرة عنه

الأخ أبو هادي عارض الإقتراح

أين باقي الأخوة ؟

أرى أن تكرار برمجة المحاسبة و بنفس الطريقة لبرامج موجودة على الأكسيس تكرار لم يثري الموضوع (أشرت سابقا لبرنامج معمول بالأكسيس مع الكود و المؤلف أشار إلى أنه ممكن تطويره) البرنامج موجود لمن يريد الإطلاع عليه

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

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

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

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

اخوانى الاعزاء

مرفق اخر تعديل على القاعدة المحاسبية

http://www14.brinkster.com/tarekh2000/ver5.zip

مع ملاحظة التالى

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

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

1- عند حذف كود حساب من الدليل يحب التاكد من ان هذا الحساب فرعى فقط وليس له قيود فى الملف القيود وملف الاستاذ

وهل نقبل حذف لمجموعة او حساب لوحده

2- شجرة الحسابات عمل كونترول كامل عليها ( ابوهادى انت فين )

واخيرا ابوهادى شد حيلك فى الكونترول وانا ان شاء الله فى قيود اليومية

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

بالمناسبة تم عمل تعديل طفيف فى جدول القيود اضافة وصف القيد فى سطر القيود

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

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

أشرف خليل

أسف لمسح المشاركة السابقة

مسحتها لتعارضها مع بعض ما سبق و قاله الاخوة

طارق

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

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

الأخوة الأعزاء ، نرجو توضيح التعديلات المطلوبة علي فورم الدليل جتي نستطيع المشاركة و نسرع بالانتقال الي القيود

الأخوة الكرام .. بعد التحية :

أنا في حالة استنفار ، وقد قمت بتعديلات (تحكم فقط) على الـ Forms الخاص بإضافة وتعديل الحسابات وكذلك جدول الحسابات فقط انتظروني يومين أو ثلاثة أيام للإنهائها بالكامل .

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

تحياتي

أسبوع كامل و لا جديد من الأخوة إعذروني إن كنت أطمع في فضلكم فالوقت يمر سريعا شكرا لكم و دعواتي لكم بالتوفيق :eek: (clock)

اخوانى اعتذر عن عن التاخير لانشغالى

ان شاء الله تجدون جديد هذا الاسبوع وسنطرحه للمناقشة

السلام عليكم اخواني ...

في الحقيقه لأول مره انتبه الى هذا الموضوع الرائع وخاصةً اني اعمل محاسب :D

من وجهة نظري .. اعتقد ان كلام الأخ محسن محمد صحيح من ناحية

موضوع شرح الكود بالعربي ... لأن هناك كثيرون يفتقرون الى ذلك وأنا اولهم ... واتمنى ان تعم الفائده على كل اخواننا المسلمون .

اخوكم في الله :)

رابط المرحله الأولى والثانيه لا يعمل ...

الا يوجد هناك رابط اخر لكي ألم بالموضوع ..

اخوكم في الله

المرحلة الاولي و الثانية فقدت أثناء ضياع بعض ملفات المنتدي فى أوائل شهر أبريل

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

و هذا رابط آخر لملف

http://www14.brinkster.com/mtarafa/xls/fin01.zip

فان لم يكن كافيا فأخبرنا ليحاول كل منا البحث عن الملفات القديمةلديه

السلام عليكم

الأخوة الكرام آسف جدا للتأخير

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

هذا الملف للأخ طارق فقط ولا يصلح لإنزاله من قبل الآخرين .

http://mypage.ayna.com/abbashmd/Acc_97_AboHadi.zip

تحياتي للجميع

الأخ طارق .. بعد التحية :

آمل كذلك إضافة هذا الكود للإجراء الخاص بالحذف

  Dim msg As String

  msg = "الكود المطلوب حذفه " & CStr(CurrAcc) & Chr(13) & "له حسابات فرعية مرتبطة به .. لايمكن حذفه الآن"
  If Not IsNull(Trim(DLookup("[ParAcc]", "Q_DALIL", "[ParAcc]='" & Trim(Me.ACC_NO) & "'"))) Then
    MsgBox msg, vbCritical, "رسالة خطأ"
    Exit Sub
  End If

ولك خالص تحياتي

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

شكرا جزيلا على التعديلات سوف اضعها ان شاء الله فى الاصدار رقم 6

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

مرة اخرى شكرا جزيلا

اسف على تاخير الرد حيث اننى كنت مشغول جدا الفترة الماضية وسوف اواصل ان شاء الله

أسبوعين ولا جديد هل عدلتم عن القاعدة المحاسبية إلى ما هو ألزم , ما هو الجديد عندكم