• نرجوا من الإخوة المواطنين الإبلاغ عن أي خطأ قد يجدونه ببيانات شهادات ميلادهم، إما بالتقرب لمصالح الحالة المدنية أو من هنا عبر نموذج اتصل بنا مع مراعاة إدراج سنة الميلاد و رقم العقد. و هذا لغرض حصر الأخطاء قدر الإمكان.

  • يمكن لجميع المواطنين الحائزين على جواز سفر بيومتري طلب بطاقة التعريف البيومترية عبر موقع الوزارة و دون عناء التنقل لمقر البلدية

  • يمكن للمواطنين الغير الحائزين على جواز سفر بيومتري التقرب من مصالح البلدية ( المصلحة البيومترية ) لإتمام الإجراءات الخاصة بالعملية و الحصول على البطاقة

دالة IRG 2020 للاستخدام مع اكسل و أكسس و Windev

دالة IRG 2020 للاستخدام مع اكسل و أكسس و Windev

المبرمج
بوسعيد مصطفى
متطلبات التشغيل
كافة نظم التشغيل
هاتف المبرمج
049.97.31.28


السلام عليكم

دالة حساب الضريبة IRG 2020 للاستخدام الجاهز و الحساب التلقائي مع Windev و اكسل و أكسس كماكرو مضمن

الضريبة و صيغتها
Exemple dans MS Excel:
=IRG_New(رقم الخلية)
VBA

VBA:
' IRG 2020 Function By Boussaid Mustafa
' APC SALI 2020
Function IRG_New(moTr)

moTr = (Int(moTr / 10)) * 10

Select Case moTr
    Case 0 To 30000: IRG_New = 0
    Case 30010 To 34999: IRG_New = (moTr - 30000) * 0.8
    Case 35000 To 120000: IRG_New = 2500 + ((moTr - 30000) / 10) * 3
    Case Is > 120000: IRG_New = 29500 + ((moTr - 120000) / 10) * 3.5
End Select

End Function
WINDEV PROCEDURE
مثال الاستخدام:
Exemple Usage:
SAI_Irg = IRG_2020(SAI_Brut)
الجنوب الكبير:
Grand Sud:
SAI_Irg = IRG_2020(SAI_Brut)/2
PROCEDURE

WINDEV:
// IRG 2020 PROCEDURE By Boussaid Mustafa
// APC SALI 2020
PROCEDURE irg_2020(i is currency)

cyIrgn is currency
p is currency = IntegerPart((IntegerPart(i))/10)*10

SWITCH i
    CASE 0 TO 30000: cyIrgn = 0
    CASE 30010 TO 34999: cyIrgn = (p - 30000) * 0.8
    CASE 35000 TO 120000: cyIrgn = 2500 + ((p - 30000) / 10) * 3     
    CASE > 120000: cyIrgn = 29500 + ((p - 120000) / 10) * 3.5
END

RESULT  cyIrgn
الكاتب
بلدية سالي
المشاهدات
1,822
الإصدار الأول
آخر تحديث
تقييم
0.00 نجوم 0 تقييمات

المزيد من المنتجات من بلدية سالي

آخر التحديثات

  1. تحديث للدوال

    بعد صدور قانون الضريبة الجزائري الجديد، تم تحديث الدوال النهائية لحساب IRG 2020 في وينداف و VBA

تابعنا على المواقع الاجتماعية


إتصل بنا
أعلى