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

اليكم استعلام يحتاحة المحاسبين بشدة, حيث انه يقسم اي مبلغ الي الفئات المالية المعروفة 100جنية، 50 جنية......................الــــخ

select 
trunc (&X/100) "100 LE" ,

trunc(((&X-trunc(&X/100)*100))/50)  "50 LE" ,

trunc ( (&X - trunc(&X/100)*100 - trunc ( (&X-trunc(&X/100)*100) / 50 ) * 50) /20 ) "20 LE" ,

trunc( ( (&X - trunc(&X/100)*100 - trunc ( (&X-trunc(&X/100)*100) / 50 ) * 50)
     - trunc ( (&X - trunc(&X/100)*100 - trunc ( (&X-trunc(&X/100)*100) / 50 ) * 50)/20)*20 ) / 10 ) "10 LE" ,

trunc ( (
 (&X - trunc(&X/100)*100 - trunc ( (&X-trunc(&X/100)*100) / 50 ) * 50)
     - trunc ( (&X - trunc(&X/100)*100 - trunc ( (&X-trunc(&X/100)*100) / 50 ) * 50)/20)*20 
     
     - trunc ( trunc(  (&X - trunc(&X/100)*100 - trunc ( (&X-trunc(&X/100)*100) / 50 ) * 50)
     - trunc ( (&X - trunc(&X/100)*100 - trunc ( (&X-trunc(&X/100)*100) / 50 ) * 50)/20)*20 )/10)*10 
     ) / 5 ) "5 LE" ,

TRUNC ( 
 (&X - TRUNC(&X/100)*100 - TRUNC ( (&X-TRUNC(&X/100)*100) / 50 ) * 50)
     - TRUNC ( (&X - TRUNC(&X/100)*100 - TRUNC ( (&X-TRUNC(&X/100)*100) / 50 ) * 50)/20)*20 
     
     - TRUNC ( TRUNC(  (&X - TRUNC(&X/100)*100 - TRUNC ( (&X-TRUNC(&X/100)*100) / 50 ) * 50)
     - TRUNC ( (&X - TRUNC(&X/100)*100 - TRUNC ( (&X-TRUNC(&X/100)*100) / 50 ) * 50)/20)*20 )/10)*10 
     ) 
-	TRUNC (
TRUNC ( 
 (&X - TRUNC(&X/100)*100 - TRUNC ( (&X-TRUNC(&X/100)*100) / 50 ) * 50)
     - TRUNC ( (&X - TRUNC(&X/100)*100 - TRUNC ( (&X-TRUNC(&X/100)*100) / 50 ) * 50)/20)*20 
     
     - TRUNC ( TRUNC(  (&X - TRUNC(&X/100)*100 - TRUNC ( (&X-TRUNC(&X/100)*100) / 50 ) * 50)
     - TRUNC ( (&X - TRUNC(&X/100)*100 - TRUNC ( (&X-TRUNC(&X/100)*100) / 50 ) * 50)/20)*20 )/10)*10)

/5
)*5  "1 LE"

from dual

حيث انة اذا كانت x مثلا =1037
ستكون النتيجة

100LE =10
50LE =0
20LE =1
10LE =1
5LE =1
1LE=2


And so on to any given number.

Please, I will be more than happy with any feedback


ارجو الدعاء لي و لوالدي و جزاكم الله كل الخير

Please, I will be more than happy with any feedback

انا اعتقد ان مفيش ناس كتير عملت feedback لسببان :-

الاول :-

لو عملت كوبى و بيست للكود فى ال SQL*PLUS فالكود هيبوظ خالص ..... لأن ال SQL*PLUS مش هيتعرف على السالب - على انه اشارة سالب و علشان كده انا عملتلها format ببرنامج ال Toad for Oracle Version 9.0.1 علشان تبقى اسهل فى طريقة التشغيل .... انا شايف انه من الاحسن انه بعد الدخول على الملف المرفق نعمل له save as فى فولدر ال bin و نغير بعد كده امتداده من ال txt ل sql و بعد كده نشغله بالأمر

@accounting.sql

و ده بالنسبة للنقطه الاولى.

ثانياً :-

فكرة الكود نفسه حلوه جداً و طلعت معايا ..... بس تعرف بعد كام مرة من كتابة رقم 1037 ( الرقم اللى انت كتبته كمثال للتجريب ) طلع معايا الناتج ؟؟؟؟؟
بعد 148 مرة .... اه والله بعد 148 مرة من كتابة الرقم 1037 طلع معايا الناتج ....... و ده سببه انك استخدمت عامل ال & و بكده فى كل مرة الاوراكل بينفذ ال & بيطلب من المستخدم ان يحط الرقم .... لكن لو انت استخدمت ال && بدل ال & هتلاقى انك هتكتب الرقم مرة واحده بس .... و ده اللى انا ظبطه فى كودك و أرفقته بهذه المشاركة .

بس والله يا جماعة فكرة كود اخى العزيز Slamonty حلوه جداً ...... و هى مفيدة فعلاً للمحاسبيين .

accounting.txt

فكرة حلوة الف شكر اخي وبالتوفيق الدائم

الاخ العزيز/ هاني, جزاك الله كل الخير علي المشاركة و المجهود في تصحيح الكود "" الله ينور ""

الاخ العزيز/ عبد اللطيف جزاك الله كل الخير علي المرور وانه لفخر لي مرورك بهذا الموضوع

السلام عليكم.

فكره جميله وأتمنى مزيد من النجاح لك وإيانا. جزاك الله خيراً...