اختصاص دادن کد به فاکتور

[fanavar]

سلام :
من فاکتوری طراحی کردم حالامی خوام زمانیکه درآن دیتائی روثبت کردم باتوجه به کدی که به اون فاکتوردادم مثلا
فروش=610
خرید=510
هرزمان من فاکتورفروش ثبت کردم درجدول حساب کد اون روبرابر610واگرفاکتورخریدبو� �برابر510 بذاره به نظرشمامن بایدچه کاری انجام بدم ؟
باتشکر

[مهدی قربانی]

سلام
اگر درست متوجه شده باشم می تونید در فرم مربوطه یک Combo حاوی دو گزینه فروش و خرید ایجاد کنید و در خداد After Update اون کد زیر رو بنویسید :

Private Sub Combo1_AfterUpdate()
If Me.Combo1.code.Value = "فروش" Then
Me.code.Value = 610
Else
Me.code.Value = 510
End If
End Sub