كيفية حساب IRG

استعرض الموضوع السابق استعرض الموضوع التالي اذهب الى الأسفل

كيفية حساب IRG

مُساهمة من طرف abdelaziz boukouira في الأربعاء 13 أبريل 2011, 21:34

* PROGRAMME CALCUL IRG 2008/2007
* MINISTERE DES FINANCES
* DIRECTION GENERALE DES IMPOTS
* DIRECTION DE L'INFORMATION ET DE LA DOCUMENTATION
PARAMETERS SOUMIS,RTS1,abat
SET DECIMAL TO 1
STORE 0 TO TC,PAS,R1
SELECT 5
USE TAB07
BRTS=SOUMIS*12
* CALCUL DE L'IMPOT ANNUEL
DO WHILE .NOT.EOF()
IF BRTS<=TRS
EXIT
ELSE
SKIP +1
ENDIF
ENDDO
STORE TAX TO TAUX
SKIP -1
STORE TRS TO TB
STORE IMPAN TO TD
N=BRTS-TB
IMPOTA=(N*TAUX/100)+TD
* CALCUL DU CREDIT D'IMPOT MENSUEL
IMPM=IMPOTA/12
ABAT=(40*IMPM/100)
IF ABAT<1000
ABAT=1000
ENDIF
IF ABAT>1500
ABAT=1500
endif
RET=IMPM-ABAT
IF RET<0
RET=0
endif
***** IRG ARRONDIE A LA DIZAINE DE CENTIME INFERIEURE
*****RTS1=(RET*10)
*****RTS1=INT(RTS1)
*****RTS1=RTS1/10
************************ IRG ARRONDIE A LA DIZAINE DE CENTIME
INFERIEURE
SET DECIMALS TO 4
RTS1=(RET*10) + 0.0001
RTS1=INT(RTS1)
RTS1=RTS1/10
SET DECIMALS TO 2
RETURN
avatar
abdelaziz boukouira
 
 

ذكر

الاقامة : mila

المشاركات : 44

نقاط : 104

تاريخ التسجيل : 12/04/2011

العمل : administrateur

الرجوع الى أعلى الصفحة اذهب الى الأسفل

رد: كيفية حساب IRG

مُساهمة من طرف jameljean في الخميس 14 أبريل 2011, 17:52

الف شكر على كيفية الحساب
ارجو منكم شرح كيفية استعمالها على ملف الاكسل vb
توقيع : jameljean




[rand]اللهم لا اله الا انت سبحانك اني كنت من الظالمين[/rand]

avatar
jameljean
 
 

ذكر

الاقامة : الجزائر

المشاركات : 1276

نقاط : 1387

تاريخ التسجيل : 06/08/2010

العمر : 49

العمل : متصرف
المزاج المزاج : مبسوط


الرجوع الى أعلى الصفحة اذهب الى الأسفل

استعرض الموضوع السابق استعرض الموضوع التالي الرجوع الى أعلى الصفحة

إنشاء حساب أو تسجيل الدخول لتستطيع الرد

تحتاج إلى أن يكون عضوا لتستطيع الرد.

انشئ حساب

يمكنك الانضمام للمنتدى فهملية التسجيل سهلة !


انشاء حساب جديد

تسجيل الدخول

اذا كنت مسجل معنا فيمكنك الدخول بالضغط هنا


تسجيل الدخول

 
صلاحيات هذا المنتدى:
لاتستطيع الرد على المواضيع في هذا المنتدى

  • © phpBB | منتدى مجاني | منتدى مجاني للدعم و المساعدة | إتصل بنا | التبليغ عن محتوى مخالف | انشئ مدونتك الخاصة