وارد شدن موجودی ( فوری )

[vahid-masoudi]

سلام

من فرمی دارم که داری کد کالا و نام کالا و مقدار ورود و مقدار خروج است سوالم اینجاست که چگونه می توانم در فرم برای کالاهای متفاوت موجودی گرفت و موجودی همان کالا در تاریخهای متفاوت که ثبت می کنم آن موجودی در فیلد موجودی ثبت گردد امیدارم که مفهومم را خوب رسانده باشم.
اگر می شود نمونه را اصلاح فرمایید

با تشکر فراوان

[Abbas Amiri]

احتمالا در مورد فیلترها و ساخت کوئری سررشته ندارید وفقط جدول را ساخته اید . حداقل نمونه جدول را آپلود کنید تا دوستان سریع ودقیق راهنمایی کنند

[Mohammad_chz]

دوست من سئوالتون واضخ نیست. شما چند تا موجودی در تاریخ های مختلف برای یک کالا داریدیا یک موجودی؟
اگر مجبور به ثبت چند موجودی برای یک کالای خاص هستید باید جدول موجودی کالا را از جدول کالا جدا کنید.
در هر صورت فکر کنم شما با مبحث نرمال سازی پایگاه داده مشکل دارید.

[Abbas Amiri]

کد زیر را جایگزین کنید . درضمن نظر دوستمان راجع به طراحی جدول درست بود


Private Sub Command11_Click()
Dim db As Database
Dim rst As Recordset
Dim k As Integer
Set db = CurrentDb
Set rst = db.OpenRecordset("Table1")
rst.AddNew
rst.Fields("a1").Value = Me.Text10
rst.Fields("a0").Value = Me.Text0
rst.Fields("a2").Value = Me.Text1
rst.Fields("a3").Value = Me.Text2
rst.Fields("a4").Value = Me.Text3
k = Nz(DSum("a3 - a4", "Table1"), 0) + Val(Me.Text2) - Val(Me.Text3)
rst.Fields("a5").Value = k
rst.Fields("a6").Value = Me.Text4
rst.Update
Me.Text0 = Null
Me.Text1 = Null
Me.Text2 = Null
Me.Text3 = Null
Me.Text4 = Null
Me.Text10 = Null
rst.Close
db.Close

Set rst = Nothing
Set db = Nothing
End Sub

[vahid-masoudi]

سلام آقای عباس امیری
خسته نباشی
دست شما درد نکن از پاسخ شما ولی من می خواهم مثلا" موجودی کتاب ریاضی را جدا و موجودی کتاب فارسی را جداگانه به من بدهد
مثلا" اگر کتاب فارسی 10 عدد ورود داشتم و 2 عدد آن خارج شد موجودی فارسی را 8 عدد
و اگر کتاب ریاضی 5 عدد ورود داشتیم و 1 عدد خارج شد 4 عدد ثبت گردد
و ضمنا" اگر ثبت جدید کتاب ریاضی یا فارسی داشته باشیم به موجودی هر یک اضافه گردد
با تشکر

[dadsara]

سلام
دوست عزیز به جنابعالی پیشنهاد می کنم فیلدهای محاسباتی از جمله موجودی را تا حد امکان ذخیره ننمائید .
باتوجه به اینکه احتمال دارد یک رکورد را اصلاح بفرمائید در این حالت نتیجه نیز بایستی در رکوردهای بعدی تاثیر بگذارد.

[Mohammad_chz]

آقای مسعودی عزیز!
سلام
مشکل شما، مشکل مشترک اغلب دوستانی هست که پایگاه داده را به صورت تجربی یاد میگیرند. پیشنهاد من به شما و خیلی از دوستان اینه که قبل از شروع به طراحی پایگاه داده مبحث نرمال سازی را مطالعه و تمرین کنید.
یکی از قوانین نرمال سازی پایگاه داده همانطور که مدیر محترم بخش جناب dadsara گفتند اینه که هیچ فیلد محاسباتی نباید توی جداول ذخیره بشه بلکه باید در مواقع لزوم محاسبه بشه.

[vahid-masoudi]

لطفا" این فایل را برایم اصلاح کنید
http://up.iranblog.com/images/u55gnppgj99217yssj90.rar
موجودی برای کالای غیر مشترک جدا شود
با تشکر

[emami.sie]

سلام
توی بحث محاسبه موجودی نمونه زیر به من خیلی کمک کرد
با یه کم جستجو توی برنامه می تونین ازش خیلی کمک بگیرید
یا علی

[Abbas Amiri]

فابل زیر راببینید: