PDA

View Full Version : وقتی فلید عشار داره



reza_optical
پنج شنبه 06 مهر 1385, 17:32 عصر
با سلام

من در دیتا بیسم فیلدی رو دارم که بعضی وقتها مقدارش عشاری میشه ولی اکثر اوقات عشار نداره

وقتی از قسمت number تنظیمات اون رو عشار میکنم تا بشه قسمت عشاری رو هم رویت کرد به اون رکوردهای که عشار هم ندارن(دو تاصفر میده ) در قسمت مربوط به فورمولا کد که مربوط به عشاره رفتم ونوشتم که اگر (فیلد)int همون قسمت صحیح برابر نباشه با خوده فیلد این کارو بکن(عشاری نشون بده) و no finde error هم داد ولی وقی اجرا میکنم میگه result is bade منظور میخوام اون فیلدها رو که عشار ندارند بعد رقم اصلی صفر نده (12/00)

ir_programmer
یک شنبه 05 آذر 1385, 08:48 صبح
می تونی با بکار بردن فرمول و حذف .00 با استفاده از توابع رشته ای مشکلت رو حل کنی

vbsqlhadi1
یک شنبه 05 آذر 1385, 09:23 صبح
کد زیر را در قسمت decimals بنویس
numberVar a := CurrentFieldValue;
numberVar b := fix(a);
numberVar c := a-b;
numberVar d:= 0 ;
c := abs (c);
d := len(cstr(c));
if c = 0 then 0
else if d >= 9 then 8
else if d = 8 then 7
else if d = 7 then 6
else if d = 6 then 5
else if d = 5 then 4
else if d = 4 then 3
else if d = 3 then 2
else if d = 2 then 1

و این کد را در قسمت rounding

numberVar a := CurrentFieldValue;
numberVar b := fix(a);
numberVar c := a-b;
numberVar d:= 0 ;
c := abs (c);
d := len(cstr(c));
if c = 0 then 0
else if d >= 9 then 8
else if d = 8 then 7
else if d = 7 then 6
else if d = 6 then 5
else if d = 5 then 4
else if d = 4 then 3
else if d = 3 then 2
else if d = 2 then 1
داده ها را در صورتی که اعشار داشته باشند تا 8 رقم برایتان اعمال مکند در غیر این صورت هیج نوع اعشاری نمی آورد