الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

عملية سداد

بدأه عز الدين احمد في 21 أبريل 2008 · 12 رد · 1,798 مشاهدة · في لغة Ms Visual Basic 6 وما قبلها من إصدارات
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

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

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

وشكرا وارجو ان يكون الكلام والمثال واضح

#2

أخى ضع بروجيكت أو مشروع صغير لنقوم بالتعديل لك عليه

أو على الأقل ضع فكرتك لنساعدك باذن الله على تطويرها كما ترغب

#3
D.EXPERINSE كتب:
أخى ضع بروجيكت أو مشروع صغير لنقوم بالتعديل لك عليه

أو على الأقل ضع فكرتك لنساعدك باذن الله على تطويرها كما ترغب

المشروع في المرفقاتhalmy.rar

ارجو سرعة الرد

#4
عز الدين احمد كتب:
المشروع في المرفقاتhalmy.rar

ارجو سرعة الرد

ايه ياجماعة ما حدش عارف الاجابة ولاايه ارجوا الاجابة بسرعة لان المشروع متوقف علي هذة الجزئية

#5

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

بالتوفيق ان شاء الله

00
 

فاضى 

 

00

#6
عز الدين احمد كتب:
ارجوكم عاوز اعمل عملية سداد علي فاتورة مبيعات بمعني انه عند انشاء الفاتورة يكون هناك بوتن وعند الضغط عليه يقوم بسداد الفاتورة وعند الاستعلام عن الفاتورة يجيب اجمالي الفاتورة والمبلغ المسدد بها والباقي يكون صفر

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

وشكرا وارجو ان يكون الكلام والمثال واضح

الموضوع ببساطة انني عاوز اسدد فاتورة بيع باي شكل ترونه

#7

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

بص ياأخى

اول شئ لازم يكون العميل اللى هيسدد الفاتورة ليه رقم موجود من قبل

ثانى شئ لو العميل سدد الفواتير اللى عليه يتم نقلها الى جدول اخر طبعا فى اى جدول يتحول معه رقم العميل طبعا

لتعريف الاكواد

im اسم الجدول الخاص بتسجيل سداد الفواتير

im_NO اسم حقل > لتسجيل قيمة الفاتورة <

im_QS اسم حقل المبلغ المطلوب سدادة بالكامل

im_p_nm اسم حقل "اسم العميل "

'للتأكد من اغلاق الاتصال بالجدول 
If RS.State = 1 Then RS.Close
'هنا انا استخدمة دالة SUM لجمع كل المبالغ التى تم دفعها ومجزنه فى الحقل اللى اسمة  IM_NO اللى  فى الجدول الخاص بسد الفوتير اللى اسمه IM انا هبدأ اطلع الاستعلام ده بشرط اسم العميل وهيكون الحقل اللى اسمه im_p_nm  وطبعا انا لو معملتش كده هيجبلى كل  
sim = "select sum(im_no) from im where im_p_nm='" + Trim(TEXT1) + "'"
' لفتح الجدول على جملة الاستعلام 
RS.Open sim, CN, 1, 3
'اخى دلوقت انت معاك RS(0)  ده بيساوى اجمالى المدفوعات للعميل المذكور اسمه فى التيكست يعنى تقدر تتعامل معاه اذا كان لمستخدم دخلRS(0)  اكتر من  im_QS طلع ماسج وعرف المستخدم ان المبلغ المسدد اكبر من المبلغ المطلوب دفعه وايضا اذا تم انتهاء مده الدفع وبيساوى بعض عرف المستخدم قد اتنهت الفواتير المفروضه

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

http://www.mediafire.com/?j9qdxzjsyxm

00
 

فاضى 

 

00

#8
wael abed كتب:
اخى بص والله انا مقدر انك محتاج الموضوع جدا فأنت يوجد عندك فكره لابد انك تثبت عليها حتى تصل اليها وعلى العموم انا هعاود كتابتك بصورة تقريبا مشابه لسوال ولكن انا عارف الحقول لكن برنامج انا مش عارف اى حاجه فى ولا حتى الحقول

بص ياأخى

اول شئ لازم يكون العميل اللى هيسدد الفاتورة ليه رقم موجود من قبل

ثانى شئ لو العميل سدد الفواتير اللى عليه يتم نقلها الى جدول اخر طبعا فى اى جدول يتحول معه رقم العميل طبعا

لتعريف الاكواد

im اسم الجدول الخاص بتسجيل سداد الفواتير

im_NO اسم حقل > لتسجيل قيمة الفاتورة <

im_QS اسم حقل المبلغ المطلوب سدادة بالكامل

im_p_nm اسم حقل "اسم العميل "

'للتأكد من اغلاق الاتصال بالجدول 
If RS.State = 1 Then RS.Close
'هنا انا استخدمة دالة SUM لجمع كل المبالغ التى تم دفعها ومجزنه فى الحقل اللى اسمة  IM_NO اللى  فى الجدول الخاص بسد الفوتير اللى اسمه IM انا هبدأ اطلع الاستعلام ده بشرط اسم العميل وهيكون الحقل اللى اسمه im_p_nm  وطبعا انا لو معملتش كده هيجبلى كل  
sim = "select sum(im_no) from im where im_p_nm='" + Trim(TEXT1) + "'"
' لفتح الجدول على جملة الاستعلام 
RS.Open sim, CN, 1, 3
'اخى دلوقت انت معاك RS(0)  ده بيساوى اجمالى المدفوعات للعميل المذكور اسمه فى التيكست يعنى تقدر تتعامل معاه اذا كان لمستخدم دخلRS(0)  اكتر من  im_QS طلع ماسج وعرف المستخدم ان المبلغ المسدد اكبر من المبلغ المطلوب دفعه وايضا اذا تم انتهاء مده الدفع وبيساوى بعض عرف المستخدم قد اتنهت الفواتير المفروضه

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

http://www.mediafire.com/?j9qdxzjsyxm

يا جماعة مش عارف اوصل لحاجة ارجو مساعدتي

#9

اخى عز الدين ايه اللى انت مش فاهمه ؟؟؟؟؟؟؟؟؟؟

00
 

فاضى 

 

00

#10
wael abed كتب:
اخى عز الدين ايه اللى انت مش فاهمه ؟؟؟؟؟؟؟؟؟؟

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

مع العلم انني استخدم تقنية الداو(DAO)

واستخدم الاندكس في البحث

ارجوا ان يكون الكلام واضح

وجزاكم الله خيرا

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

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

مع العلم انني استخدم تقنية الداو(DAO)

واستخدم الاندكس في البحث

ارجوا ان يكون الكلام واضح

وجزاكم الله خيرا

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

عدد المشاهدات كبير ولا يوجد رد حتي الان

#12

ياجماعة فين المشرفين عاب المنتدى للاجابة علي السؤال وهل السؤال صعب لهذة الدرجة انا منتظر اكثر من شهر

#13

السلام عليكم

بص اللى انا فهمته من طلبك أن المفروض مثلا فاتوره عميل الأجمالى ......المدفوع ......الباقى......

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

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

ويطبعلك الفواتيير كامله بأدق التفاصيل شوف الموضوع ده مجموعه من أهم برامجى

أدخل على برنامج المبيعات والمخازن وشئون الموظفين

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

سبحان الله وبحمده سبحان الله العظيم

s.gif

مواضيع مشابهة