delphi4arab منتديات دلفي للعرب

نسخة كاملة : حساب مفتاح ccp
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
الصفحات : 1 2
(05-05-2020, 05:59 PM)sofiane201 كتب : [ -> ]هذا ما اتبعته, لكن النتيجة غير صحيحة.

ضع المحاولة لتصحيحها
(05-05-2020, 07:09 PM)larbiparadox كتب : [ -> ]
(05-05-2020, 05:59 PM)sofiane201 كتب : [ -> ]هذا ما اتبعته, لكن النتيجة غير صحيحة.

ضع المحاولة لتصحيحها
لا حاجة لذلك, ما فعلته هو استخدام الدالة مع رقم حساب لكن النتيجة لم تطابق المفتاح.
ملاحظة هامة : هذه الدالة تعطي الحساب لشيك القديم ، اما الان فالطريقة تغيرت ، هي نفسها حساب المفتاح لحسابات البنوك ، بالنسبة للبنبك يسمى RIB و للحساب الجاري يسمى RIP و وللخزينة RIT

RIP (Relevé d'Identité Postale) :
(05-05-2020, 08:57 PM)larbiparadox كتب : [ -> ]ملاحظة هامة : هذه الدالة تعطي الحساب لشيك القديم ، اما الان فالطريقة تغيرت ، هي نفسها حساب المفتاح لحسابات البنوك ، بالنسبة للبنبك يسمى RIB و للحساب الجاري يسمى RIP و وللخزينة RIT

RIP (Relevé d'Identité Postale) :
تم ادراج طريقة حساب Rip في المشاركة الاولى
يمكن اضافة 00799999 بعدها 10 ارقام الخاصة بالحساب وبعدها المفتاح RIP
PHP كود :
function CleCcpRip(Str: string): Word;
begin
  result 
:= 97 - ((((StrToInt(Str) mod 97) * 3 mod 97) + 85) mod 97);
end; 
(05-05-2020, 09:19 PM)onexite كتب : [ -> ]
(05-05-2020, 08:57 PM)larbiparadox كتب : [ -> ]ملاحظة هامة : هذه الدالة تعطي الحساب لشيك القديم ، اما الان فالطريقة تغيرت ، هي نفسها حساب المفتاح لحسابات البنوك ، بالنسبة للبنبك يسمى RIB و للحساب الجاري يسمى RIP و وللخزينة RIT

RIP (Relevé d'Identité Postale) :
تم ادراج طريقة حساب Rip في المشاركة الاولى
يمكن اضافة 00799999 بعدها 10 ارقام الخاصة بالحساب وبعدها المفتاح RIP
PHP كود :
function CleCcpRip(Str: string): Word;
begin
  result 
:= 97 - ((((StrToInt(Str) mod 97) * 3 mod 97) + 85) mod 97);
end; 


هذه الطريقة تعمل فقط مع RIP ، طريقة اخرى تعمل مع الجميع حتى حسابات البنوك  معروفة معتمدة لجميع بنوك العالم اقصد وطنيا 20 رقم

لا تختلف على كثيرا على RIP ، سأضع لاحقا

[صورة: 814281423.png]

[صورة: 233128747.png]
صح رمضانكم و ربي يتقبل الصيام و القيام
الاخ larbiparadox اطلعت على موضوع لك حول تصدير الاجور لملف txt الرجاء اذا كان ممكن اعادة رفعه وشكرا
(05-05-2020, 09:19 PM)onexite كتب : [ -> ]يمكن اضافة 00799999 بعدها 10 ارقام الخاصة بالحساب وبعدها المفتاح RIP
PHP كود :
function CleCcpRip(Str: string): Word;
begin
  result 
:= 97 - ((((StrToInt(Str) mod 97) * 3 mod 97) + 85) mod 97);
end; 

شكرا هذه نجحت معي
الصفحات : 1 2