المشاركات : 654
المواضيع 82
:
: 68
الإنتساب : Mar 2011
تحية طيبة وبعد
هل يمكن انشاء رقم الضمان الاجتماعي برمجيا اعتمادا على شهادة الميلاد ؟ علما انه مكون من 12 رقم
حيث 6 الارقام الاولى متكونة من رقمين لتاريخ الازدياد و الاربع لرقم شهادة الميلاد
مثلا 660017000000
واحتمال ان يكون الرقمين الاخيرين مفتاح لاكن كيف يتم توليد 4 ارقام لا اضن الامر عشوائي
كل من 1 user says قال شكرا ل onexite على المشاركة المفيدة1 user says Thank You to onexite for this post
• sabre
المشاركات : 3,686
المواضيع 98
:
: 567
الإنتساب : Feb 2008
على ما اعتقد الارقام المتبقية يتم توليدها عند الضمان الاجتماعي
شيئ مثل عداد inc auto
تحتاج لشخص يعمل عندهم للخبر اليقين
رَبَّنَا اغْفِرْ لِي وَلِوَالِدَيَّ وَلِلْمُؤْمِنِينَ يَوْمَ يَقُومُ الْحِسَابُ
المشاركات : 654
المواضيع 82
:
: 68
الإنتساب : Mar 2011
29-04-2019, 01:41 PM
(آخر تعديل لهذه المشاركة: 29-04-2019, 01:43 PM بواسطة onexite.)
calucc10.png (الحجم : 16.47 ك ب / التحميلات : 34)
احتمال وارد
هذه طريقة حساب المفتاح
المشاركات : 614
المواضيع 70
:
: 222
الإنتساب : Jun 2010
السلام عليكم
لكن من أين جاءت الأرقام 0009 بعد رقم عقد الميلاد لكي تستخرج المفتاح
عموما جربت القاعدة على رقم ضمان ولم أجد نفس النتيجة..
أدبني الدهر فأراني نقص عقلي وإذا ما ازددت علما زادني علما بجهلي
المشاركات : 966
المواضيع 55
:
: 210
الإنتساب : Feb 2008
السلام عليكم
الدالة حسب فهمي للخوارزمية ان لم اكن مخطأ
PHP كود :
function CalculCleNss(const NSS: string): Integer;
const
AConst: Integer = 99;
var
I, X1, X2, N: Integer;
begin
X1 := 0;
X2 := 0;
for I := 1 to 10 do
begin
N := StrToInt(NSS[I]);
if Odd(I) then
X2 := X2 + N * 2
else
X1 := X1 + N;
end;
Result := 99 - (X1 + X2);
end;
و لرب نازلة يضيق لها الفتى ذرعا و عند الله منها المخرج
ضاقت فلما استحكمت حلقاتها فرجت و كنت اضنها لا تفرج
كل من 1 user says قال شكرا ل S.FATEH على المشاركة المفيدة1 user says Thank You to S.FATEH for this post
• onexite
المشاركات : 654
المواضيع 82
:
: 68
الإنتساب : Mar 2011
(29-04-2019, 05:09 PM)S.FATEH كتب : السلام عليكم
الدالة حسب فهمي للخوارزمية ان لم اكن مخطأ
PHP كود :
function CalculCleNss(const NSS: string): Integer;
const
AConst: Integer = 99;
var
I, X1, X2, N: Integer;
begin
X1 := 0;
X2 := 0;
for I := 1 to 10 do
begin
N := StrToInt(NSS[I]);
if Odd(I) then
X2 := X2 + N * 2
else
X1 := X1 + N;
end;
Result := 99 - (X1 + X2);
end;
مشكور اخي العزيز
الدالة لحساب المفتاح اخر رقمين وتستخدم للتاكد من صحة الرقم
المشاركات : 141
المواضيع 22
:
: 107
الإنتساب : Nov 2015
لا معنى لرقم عقد الميلاد والسنة إذا كان غير مقرون برقم الولاية ورقم البلدية هذا ضروري لكي لا يقع تكرار