أكسس وبس

بتظهر فى كل النماذج الرئيسية انا ممكن ابعتلك اخر شغل وهو ناقص فيه بعض المشكلات فى الرسائل وكشوف الحساب حيكون واضح ده اخر شغل لو عايز أوضحلك شئ انا موجود EndWork1.rar نموذج Compuny بيانات المؤسسة نموذج Names للاصناف المواد الخام والمنتجات نموذج FrmPeople للموردين والعملاء والعمال الى شغالين نموذج Trans_in فاتورة مشتريات نموذج Trans_inOut مردودات مشتريات نموذج frmControl للتصنيع باب او شباك وخلافه نموذج Trans_out مبيعات باب او شباك او مواد خام نموذج Trans_outin مردودات مبيعات نموذج Maintenance الصيانة للعملاء نموذج Expenses للمصروفات دى بعض النماذج ممكن تلاقي نماذج مش لها لازمة من كتر التجريب

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

وبعدين انا عملت جدول Transaction الحركة عشان كل العمليات تصب فيه المشتريات Add_doc والتصنيع Control والمبيعات Issue_doc والصيانة Maintenance عشان اقدر اجيب كشف حساب مورد وحساب العميل فى المبيعات والصيانة لان الصيانة للعملاء وجدول People شامل العملاء والموردين والعمال الى فى الورشة وجدول Catch_pay شامل سند الصرف والقبض وجدول Expense المصروفات وجدول Treasury ده جدول الخزينة عشان اعرف المالية الخاصة بسند الصرف والقبض والمصروفات وضيفت عليه المدين اجل والدائن اجل ممكن حضرتك تصححلى بس ياريت بالجداول عشان انا تهت والله بقالي شهر بعمل فيه عارف وشوفت والله شروحات كتير ومنها سيد بدران بس انا برنامج مش مشتريات ومبيعات فقط فيه مرحلة فى الوسط اسمها تصنيع فبيكون البرنامج محاسبة تكاليف كنظام محاسبي ياريت تقولى فكرك ومش مشكلة ابدأ من الاول المهم اكون صح المشكلة اهم حاجة المرحلة الاولى رسم الجداول وعلاقتها عاوز اعمل نظام محاسبة تكاليف بسيط مش لازمني اذن صرف او اضافة او مخزن كل الى عايزه فاتورة مشتريات ومردودات مشتريات امر تصنيع حياخد من المواد الخام الى جت بفاتورة مشتريات حصنع باب او شباك من المواد الخام الى حيفضل حيرجع مواد خام عشان رصيد المواد الخام والمنتجات من باب او شباك حيباع للعملاء بفاتورة مبيعات ولو حب يرجع نعمل فاتورة مردودات مبيعات ولو فيه عميل عاوز يعمل صيانة نعمله صيانة وفاتورة صيانة سند الصرف والقبض للفواتير النقدية والمصروفات عندي كشف حساب مورد - وكشف حساب عميل شامل المبيعات والصيانة وكشف الارباح والخسائر نظام اى برنامج لا يعتمد على فكرة واحدة بل مجموعة افكار حتى يتم بناء نظام برنامج متكامل ومتماسك خالى من الاخطاء وخاصة البرامج الرقمية او المحاسبية عشان مبنية على ارقام

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

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

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

اخى لا تعمل هذه الشفرة عندما اقوم باختيار الصنف لم يتم الاختيار بل تظهر رسالة خطأ فى الفيجوال بيسك ورسالة تظهر فى حدث Private Sub Category_Code_Exit(Cancel As Integer) نص الرسالة خطأ فى بناء الجملة ( عامل التشغيل مفقود) فى تعبير الاستعلام [Category_Code ]= هذه الرسالة صراحة تربك تربك تربك تربك

اخوانى اين انتم المشكلة عند الصرف للتصنيع فى النموذج frmControl قمت بتعديل المعادلة جملة Cancel = -1 الى جملة Cancel = 1 مرة وحذفتها مرة ولكن تظهر رسالات خطأ بالنسبة للفيجوال وهذه الرسائل تعمل ارباك للبرنامج

اشكرك يا اخي جارى التجريب ان شاء الله

اخى الكريم فيه رسالتين فى الفيجوال بيسك بتظهر خطأ رسالة تظهر عند عدم وجود كمبية للصنف فى حدث Private Sub Category_Code_Exit(Cancel As Integer)نص الرسالة Run-time reeor "94" ( Invaild use null) ورسالة تظهر فى حدث Private Sub Category_Code_Exit(Cancel As Integer) نص الرسالة خطأ فى بناء الجملة ( عامل التشغيل مفقود) فى تعبير الاستعلام [Category_Code ]= اخى Peposat ان شاء الله الفضل يعود لله ثم للاحبة الى فى المنتدى يكمل لان لازم يكون البرنامج مظبوط ولا يحتمل نسبة خطأ 0.0000001 فيه بعض الاشياء مازالت لم تكمل ومحتاج مساعدة من اهل الخبرة واوعدك اول ما يخلص حرفعه فى المنتدى

اشكرك يا اخي نأخذ بالرأى الاصوب ان شاء الله

اخوانى اخوانى اريد كود يجعل اى نموذج فرعى فى النماذج الرئيسية Trans_in - Trans_out - frmControl لا يقبل بيانات إلا بعد إدخال البيانات الرئيسية فى رأس النماذج اولاً End4.rar

اخوانى سلام الله عليكم فى المرفق نموذج التصنيع frmControl والفرعى الخاص به frmControlSub عند ادخال بيانات فى النموذج الفرعى frmControlSub اختيار المنتج ثم كميته التى تصنع ثم اسم صنف المادة الخام ثم ((((( ادخال كمية المنصرف من المادة الخام )))) تظهر رسالة تحذيرية الرصيد غير كافي رغم اني بدخل كمية اقل من الرصيد الحالى وهذه الرسالة مفروض تظهر فقط عندما تكون الكمية المنصرفة للتصنيع اكبر من الرصيد وهذه الرسالة لا تختفى بل تقوم بغلق النموذج بالكامل الرجاء تصحيح الكود حيث انه عند الخروج من الكمية Cquantityout Private Sub Cquantityout_Exit(Cancel As Integer) If Cquantityout > ItemBalance Then MsgBox "الرصيد غـير كافي", vbCritical + vbOKOnly, "رسالة تحذيرية" Cancel = -1 Else Me.Total.SetFocus End If End Sub End4.rar

ممكن اعمل استعلام الحاق افضل من استعلام تحديد تجميع

اشكرك يا اخي ذوق ذوق ذوق

غيرت فى استعلام الالحاق نفس النتيجة عاوز المبلغ معاه تاريخه ونوعه غيرت فى استعلام الالحاق نفس النتيجة عاوز المبلغ معاه تاريخه ونوعه

اخى الكريم عملت تعديل على الكود عشان اضيف تاريخ السند والنوع والمبلغ فى جدول الخزنة مرة واحدة ولكن كل نوع فى سجل تحت بعض وانا عايز بيانات السند كلهم مرة واحدة فى سطر واحد فى جدول Treasury DoCmd.SetWarnings False If Me.Type = "ÕÑÝ" Then DoCmd.RunSQL "INSERT INTO Treasury (sader)SELECT [forms]![Receipt_voucher]![le] AS Expr1" DoCmd.RunSQL "INSERT INTO Treasury (BDate)SELECT [forms]![Receipt_voucher]![Date] AS Expr2" DoCmd.RunSQL "INSERT INTO Treasury (Bdata)SELECT [forms]![Receipt_voucher]![Type] AS Expr3" ElseIf Me.Type = "ÞÈÖ" Then DoCmd.RunSQL "INSERT INTO Treasury (Ward)SELECT [forms]![Receipt_voucher]![le] AS Expr1" DoCmd.RunSQL "INSERT INTO Treasury (BDate)SELECT [forms]![Receipt_voucher]![Date] AS Expr2" DoCmd.RunSQL "INSERT INTO Treasury (BDate)SELECT [forms]![Receipt_voucher]![Date] AS Expr2" DoCmd.RunSQL "INSERT INTO Treasury (Bdata)SELECT [forms]![Receipt_voucher]![Type] AS Expr3" Else Exit Sub End If DoCmd.SetWarnings True

لما اعمل ازالة لجدول سند الصرف والقبض Catch_pay استعلام المورد يظهر البيانات ولما اضعه لم يتظهر اي بيانات

وايه الحل

انا زودت فى استعلام الالحاق حقلي Bdata من جدول Treasury عشان اضع فيه نوع العملية صرف او قبض وحقل BDate عشان اضع تاريخ السند ولم انجح غيرت فى كود مفتاح ترحيل فى نموذج سند الدفع والقبض لم تنج ايضا

اشكر الاستاذ عبدالله على مروره واستاذنا ابو خليل اولاً جدول الاشخاص People شامل العملاء والموردين وحتى العمال الى شغالين فى الشركة ثانياً جدول الصرف والقبض Catch_pay واحد صرف وقبض المورد ( تعاملاته مشتريات يبقى فيه دفع او صرف ولو مردودات مشتريات يبقى فيه قبض ) العميل ( تعاملاته مبيعات وصيانة يبقى فيه قبض ولو مردودات مبيعات يبقى دفع او صرف ) بالنسبة لعدم وجود علاقات بين الجداول عملت علاقة بين جدول الاشخاص People وجدول الصرف والقبض Catch_pay ومازالت المشكلة فى الاستعلامين

اخوانى اريد المساعدة فى استعلاماين كشف حساب مورد وعميل فى المرفق عملت استعلامين الاول لكشف حساب مورد QSup شامل المشتريات ومردودات المشتريات ولقيت البيانات مكررة الثانى عملت كشف حساب عميل QCust لم تظهر أي بيانات بالنسبة لكشف حساب عميل وهو شامل فواتير البيع ومردودات البيع والصيانة نموذج Trans_in مشتريات - نموذج Trans_inOut مردودات مشتريات نموذج Trans_out مبيعات - نموذج Trans_outin مردودات مبيعات - نموذج Maintenance الصيانة End3.rar

اشكرك يا استاذنا الفاضل وبارك الله فيك وعليك اشكرك يا استاذنا الفاضل وبارك الله فيك وعليك

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

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