[تنبيه - عنوان غير مناسب : ]مساعدتكم في دالة like مع الارقام

[waleed74 2]

السلام عليكم ورحمة الله وبركاته

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

وعندي رمز حساب 311 خاص بالرواتب ويتفرع منه 3111 3112و 3113

المهم احتاج لدالة تقوم بجمع الرواتب وفق الرمز الحسابي 311

[alaaqasem 20]

السلام عليكم ورحمة الله وبركاته

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

وعندي رمز حساب 311 خاص بالرواتب ويتفرع منه 3111 3112و 3113

المهم احتاج لدالة تقوم بجمع الرواتب وفق الرمز الحسابي 311

SUM [eExpressionList] [scope] [FOR lExpression1] [WHILE lExpression2]

[TO MemVarNameList | TO ARRAY ArrayName] [NOOPTIMIZE]

[LionIraq 189]

SUM [eExpressionList] [scope] [FOR lExpression1] [WHILE lExpression2]

[TO MemVarNameList | TO ARRAY ArrayName] [NOOPTIMIZE]

مثال على جواب الاستاذ وفي حالة سوالك لنفترض نعمل حساب عند الاتصال و عند عدم الاتصال

لاحظ الشرط الاول او القيمة عندما تكون .T.

CLOSE DATABASES
OPEN DATABASE (HOME(2) + 'data\testdata')
USE products  && Opens Products table
SET FILTER TO discontinu =.t. 
SUM in_stock, on_order, in_stock+on_order ;
   TO gnInStock, gnOnOrder, gnUnits

CLEAR
?
? 'Total in stock : ', gnInStock  && Displays 101.000
? 'Total on order:  ', gnOnOrder  && Displays 0.000
? 'Total # units :  ', gnUnits  && Displays 101.000

اما في حالة .F.

CLOSE DATABASES
OPEN DATABASE (HOME(2) + 'data\testdata')
USE products  && Opens Products table
SET FILTER TO discontinu =.F. 
SUM in_stock, on_order, in_stock+on_order ;
   TO gnInStock, gnOnOrder, gnUnits

CLEAR
?
? 'Total in stock : ', gnInStock  && Displays 3018.000
? 'Total on order:  ', gnOnOrder  && Displays 780.000
? 'Total # units :  ', gnUnits  && Displays 3798.000

تحياتي للجميع

[LionIraq 189]

الأخ الكريم/الأخت الكريمة

السلام عليكم ورحمة الله وبركاته

مرحباً بكم في منتدى الفريق العربي للبرمجة

نود تنبيهك أن العنوان غير مناسب.

الرجاء اختيار عنوان مناسب أكثر في مواضيعك القادمة، وهذا بمثابة إشعار للأهمية.

وفي حال التكرار سيتعرض موضوعك للإغلاق والحذف!!!

قواعد المشاركة

http://www.arabteam2000-forum.com/index.php?showtopic=29343

شاكرين لكم حُسن تعاونكم

[waleed74 2]

تحياتي الى كل من شارك في الرد ع هذا الموضوع

وبارك الله بيكم