ATEF SOLIMAN

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

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

السلام عليكم و رحمة الله و بركاته بالنسبة للايجار التمويلي او الايجار المنتهي بالتمليك و المعرووف ب capital leased يتم احتساب الشئ المؤجر كأصل اذا تحقق بعض الشروط اهمها انه ينص عقد الايجار علي انتهائه بالتمليك صراحة وعمره الافتراضي اكبر او يساوي فترات الايجار و يتم تسجيله كأصل بقيمته السوقية بجميع مصروفاته الاضافية مثل النقل و التركيب و التأمين....و خلافه ....منها الدفعة المقدمة و الباقي يعتبر التزام (خصوم) و فرق السعر عن السعر السوقي (الكاش)يحسب ضمن المصروفات التمويلية ;مثل سعر فائدة القروض و الله اعلم انتظر مني مثال ان شاء الله او حل مسألتك

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

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

[align=left:b5d967e570] Function NoToTxt2(TheNo As Double, MyCur As String, MySubCur As String) As String Dim MyArry2(0 To 9) As String Dim MyArry3(0 To 9) As String Dim Myno As String Dim GetNo As String Dim RdNo As String Dim My100 As String Dim My10 As String Dim My1 As String Dim My11 As String Dim My12 As String Dim GetTxt As String Dim Mybillion As String Dim MyMillion As String Dim MyThou As String Dim MyHun As String Dim MyFraction As String Dim MyAnd As String Dim I As Integer Dim ReMark As String If TheNo > 999999999999.999 Then Exit Function If TheNo < 0 Then TheNo = TheNo * -1 ReMark = "لم يتبقي " Else ReMark = "فقط " End If If TheNo = 0 Then NoToTxt2 = "صفر" Exit Function End If MyAnd = " و" MyArry1(0) = "" MyArry1(1) = "مائة" MyArry1(2) = "مائتان" MyArry1(3) = "ثلاثمائة" MyArry1(4) = "اربعمائة" MyArry1(5) = "خمسمائة" MyArry1(6) = "ستمائة" MyArry1(7) = "سبعمائة" MyArry1(8) = "ثمانمائة" MyArry1(9) = "تسعمائة" MyArry2(0) = "" MyArry2(1) = " عشر" MyArry2(2) = "عشرون" MyArry2(3) = "ثلاثون" MyArry2(4) = "اربعون" MyArry2(5) = "خمسون" MyArry2(6) = "ستون" MyArry2(7) = "سبعون" MyArry2(8) = "ثمانون" MyArry2(9) = "تسعون" MyArry3(0) = "" MyArry3(1) = "احدي" MyArry3(2) = "اثنان" MyArry3(3) = "ثلاثة" MyArry3(4) = "اربعة" MyArry3(5) = "خمسة" MyArry3(6) = "ستة" MyArry3(7) = "سبعة" MyArry3(8) = "ثمانية" MyArry3(9) = "تسعة" '====================== GetNo = Round(TheNo, 3) GetNo = Format(TheNo, "000000000000.000") I = 0 '=============== Do While I < 16 If I < 12 Then Myno = Mid$(GetNo, I + 1, 3) Else Myno = Mid$(GetNo, I + 2, 3) + "0" ' "0" + Mid$(GetNo, I + 2, 2) End If If (Mid$(Myno, 1, 3)) > 0 Then RdNo = Mid$(Myno, 1, 1) My100 = MyArry1(RdNo) RdNo = Mid$(Myno, 3, 1) My1 = MyArry3(RdNo) RdNo = Mid$(Myno, 2, 1) My10 = MyArry2(RdNo) If Mid$(Myno, 2, 2) = 11 Then My11 = "احدي عشر" If Mid$(Myno, 2, 2) = 12 Then My12 = "اثني عشر" If Mid$(Myno, 2, 2) = 10 Then My10 = "عشرة" If ((Mid$(Myno, 1, 1)) > 0) And ((Mid$(Myno, 2, 2)) > 0) Then My100 = My100 + MyAnd If ((Mid$(Myno, 3, 1)) > 0) And ((Mid$(Myno, 2, 1)) > 1) Then My1 = My1 + MyAnd GetTxt = My100 + My1 + My10 If ((Mid$(Myno, 3, 1)) = 1) And ((Mid$(Myno, 2, 1)) = 1) Then GetTxt = My100 + My11 If ((Mid$(Myno, 1, 1)) = 0) Then GetTxt = My11 End If If ((Mid$(Myno, 3, 1)) = 2) And ((Mid$(Myno, 2, 1)) = 1) Then GetTxt = My100 + My12 If ((Mid$(Myno, 1, 1)) = 0) Then GetTxt = My12 End If If (I = 0) And (GetTxt <> "") Then If ((Mid$(Myno, 1, 3)) > 10) Then Mybillion = GetTxt + " مليار" Else Mybillion = GetTxt + " مليارات" If ((Mid$(Myno, 1, 3)) = 2) Then Mybillion = " مليار" If ((Mid$(Myno, 1, 3)) = 2) Then Mybillion = " ملياران" End If End If If (I = 3) And (GetTxt <> "") Then If ((Mid$(Myno, 1, 3)) > 10) Then MyMillion = GetTxt + " مليون" Else MyMillion = GetTxt + " ملايين" If ((Mid$(Myno, 1, 3)) = 1) Then MyMillion = " مليون" If ((Mid$(Myno, 1, 3)) = 2) Then MyMillion = " مليونان" End If End If If (I = 6) And (GetTxt <> "") Then If ((Mid$(Myno, 1, 3)) > 10) Then MyThou = GetTxt + " الف" Else MyThou = GetTxt + " الاف" If ((Mid$(Myno, 3, 1)) = 1) Then MyThou = " الف" If ((Mid$(Myno, 3, 1)) = 2) Then MyThou = " الفان" End If End If If (I = 9) And (GetTxt <> "") Then MyHun = GetTxt If (I = 12) And (GetTxt <> "") Then MyFraction = GetTxt End If I = I + 3 Loop '============================ If (Mybillion <> "") Then If (MyMillion <> "") Or (MyThou <> "") Or (MyHun <> "") Then Mybillion = Mybillion + MyAnd End If If (MyMillion <> "") Then If (MyThou <> "") Or (MyHun <> "") Then MyMillion = MyMillion + MyAnd End If If (MyThou <> "") Then If (MyHun <> "") Then MyThou = MyThou + MyAnd End If If MyFraction <> "" Then If (Mybillion <> "") Or (MyMillion <> "") Or (MyThou <> "") Or (MyHun <> "") Then NoToTxt2 = ReMark + Mybillion + MyMillion + MyThou + MyHun + " " + MyCur + MyAnd + MyFraction + " " + MySubCur Else NoToTxt2 = ReMark + MyFraction + " " + MySubCur End If Else NoToTxt2 = ReMark + Mybillion + MyMillion + MyThou + MyHun + " " + MyCur End If End Function[/align:b5d967e570]

تحليل لنظام خزينة بأحد الشركات السلام عليكم و رحمة الله و بركاته اخي الكريم أ.د M.G في اطار ما تحدثت عنه سابقا بشأن المساعدة في تحليل و تصميم نظم مالية بأستخدام الحاسب و تحديداً باستخدام قواعد البيانات اضع اليوم نموذج تحليل و تصميم لنظام خزينة (صندوق) لاحد الشركات و التي تعمل في مجال المقاولات منتظرا منك اخي الكريم مراجعته و تصحيحه اذا لزم الامر و تحسينه للافضل مع ملاحظة انني لاول مرة اقوم بعملية تحليل و وضع تصميم لنظام مالي فأنا اعمل محاسب بتلك الشركة و لي خبرة قليلة في العمل علي ACCESS لنبدأ عل بركة الله الشركة تعمل في مجال المقاولات الشركة لها عدة مشروعات تقوم بتنفيذها الخزينة يتم تمويلها من خلال سندات قبض الخزينة تقوم بالصرف من خلال [1]سندات صرف نقدي سند الصرف يحصل عليه ( أ )موظف مقابل فواتير مصروفات (ب)مورد مقابل فواتير (ج)رواتب الموظفين و الاجور [2]ايصالات سلف للموظقين [3]ايصالات عهد للموظفين أولاً: التقارير المطلوبة: 1- تقرير جرد الخزنة 2- تقرير عن سندات الصرف 3- تقرير عن سندات القبض 4- تقرير عن السلف 5- تقرير عن العهد 6- تقريرالمصروفات الكلية 7- تقرير لكل مصروف 8- تقريرالمصروفات الكلية العمومية (التي لا تخص مشروع معين ) 9- تقريرالمصروفات للمشاريع كلها 10- تقريرالمصروفات لمشروع معين 11- تقريرالمصروفات للموظفين كلهم 12- تقريرالمصروفات لموظف معين · وفقا للشروط التالية ( عوامل تصفية – فلاتر ) و ذلك لكل تقرير 1- في لحظة معينة (تاريخ و ساعة ) 2- خلال شهر معين 3- خلال الشهر الجاري 4- في نهاية الفترة المالية 5- خلال فترة من..... الي..... بالاضافة الي تقرير سند الصرف النقدي ( مفرد ) المستخرج بناء عل الفواتير المقدمة ثانياً: جداول قاعدة البيانات المقترحة : جدول بيانات الشركة اسم الشركة المدينة لوجو الشركة الدولة عنوان الشركة رقم هاتف الشركة رقم فاكس الشركة ..............اخري جدول بيانات فروع الشركة اسم الفرع المدينة رقم هاتف الفرع الدولة عنوان الفرع محاسب الفرع رقم فاكس الفرع امين صندوق الفرع جدول الموظفين اسم الموظف المدينة لوجو الموظف الدولة عنوان الموظف رقم هاتف الموظف راتب الموظف الاساسي بدلات..... المؤهل الوظيفة الحالة الاجتماعية الجنسية جدول بيانات الخزينة اسم خزينة الفرع امين صندوق تاريخ رصيد اول تاريخ رصيد اخر قيمة رصيد اول قيمة رصيد اخر جدول المصروفات اسم المصروف رقم المصروف فئة المصروف جدول بيانات فئات المصروف رقم فئة المصروفات اسم فئة المصروفات جدول بيانات المشاريع اسم المشروع موقع المشروع رقم المشروع المدينة مدير المشروع جدول سندات الصرف رقم السند تاريخ السند اسم الموظف صاحب السند بيان الصرف جدول سندات القبض رقم السند تاريخ السند الجهة بيان المبلغ جدول سندات السلف رقم السند تاريخ السند اسم الموظف صاحب السند المبلغ سددت (نعم /لا) جدول سندات العهد رقم السند تاريخ السند اسم الموظف صاحب السند المبلغ سددت (نعم /لا) جدول الفواتير رقم الفاتورة تاريخ الفاتورة بيان الفاتورة المشروع المبلغ جدول المدن رقم المدينة المدينة جدول الجنسيات رقم الجنسية الجنسية جدول الوظائف رقم الوظيفة الوظيفة ختاماً: التفضل بمراجعة التحليل و التعليق عليه كدرس في كيفية تحليل النظم بدءاً من خطوات التحليل و التصميم و تصحيح ما يوجد به من اخطاء وتحسين الحالة ليصبح درس نموذجي عملي ينتفع به كل اعضاء منتدانا العظيم جزاك الله عنا خير الجزاء. اللهم اجعل هذا علم ينتفع به و سبحان الله و بحمده ، سبحان الله العظيم

السلام عليكم ورحمة الله و بركاته اخي و استاذنا الكريم أ:د MG ابدأ و توكل علي الله فنحن بحاجة لمثل هذه المعرفة وجزاك الله عنا خير الجزاء و لا تندهش من قلة رد الالخوة الاعضاء فهذا المنتدي العظيم لم يأخذ حقه من الانتشار بعد لحداثته و اعمل انا و زملائي علي انتشاره ليعم الخيرؤ علينا جميعا نحن العرب مع تمنياتي لك بالتوفيق

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

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

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

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

السلام عليكم ورحمة الله وبركاته شكرا لك اخي و استاذي الفاضل HAMEED علي اهتمامك بنا و تزويدنا بأحدث المعلومات

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

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