الگوریتم قبوض پرداختی در اکسل

[mokaram]

با سلام خدمت دوستان

در این فایل آموزشی به بررسی موضوع الگوریتم قبوض و اینکه چطوری میشه صحت شناسه پرداخت و شناسه

قبض را چک کنیم وحتی مبلغ پرداختی هر قبض را بدست آوریم می پردازیم

ساختار کلی کدها به صورت زیر می باشد




برای به دست آوردن رقم های کنترلی ( شناسه قبض یکی و شناسه پرداخت دو تا ) طبق تصویر زیر عمل می کنیم




توضیح درباره بدست آوردن عدد کنترلی شناسه قبض:

از سمت راست شروع به دادن ضریب می کنیم به طوری که اولین عدد ضریب 2 را می گیره و عدد های بعدی یکی به 2 اضافه میشه تا زمانیکه ضریب به 7 برسه

بعد مجدد ضریب از 2 شروع میشه. مجموع عددها تقسیم بر 11 باقیمانده ای داره که اگر 0 یا 1 بود مستقیما به عنوان عدد کنترلی نوشته میشه در غیر اینصورت

مجدد از عدد 11 کم میشه و جواب به عنوان عدد کنترلی درج میشه

توضیح درباره بدست آوردن عدد کنترلی اول شناسه پرداخت :

مثل عملیات بالا انجام میشه

توضیح درباره بدست آوردن عدد کنترلی دوم شناسه پرداخت :

همون عملیات بالا با این تفاوت که ابتدا هر دو عدد ( شناسه قبض به صورت کامل به شناسه پرداخت چسبیده میشه و عملیات مورد نظر روی آن اعمال میشه )

نحوه به دست آوردن مبلغ قبض :

از فرمول زیر استفاده می شود

Int(ShenasePardakht / 100000) * 1000 

[~M*E*H*D*I~]

خیلی عالی بود محمد رضا جان ممنون