Calcul clé de contrôle d'un RIO

dsigmoun Messages postés 135 Date d'inscription jeudi 31 juillet 2008 Statut Membre Dernière intervention 25 février 2023 - 11 déc. 2008 à 10:15
 pstad - 9 janv. 2013 à 22:56
Bonjour à tous,

Je cherche à vérifier la conformité des RIO Mobile (Relevé Identité Opérateur).
J'ai trouvé le mode calcul pour la vérification des cartes bleu, des billets, des RIB, des codes barres, mais rien sur les RIO.

Est-ce quelqu'un aurait cela sous le coude ?

Merci par avance,
A voir également:

2 réponses

dsigmoun Messages postés 135 Date d'inscription jeudi 31 juillet 2008 Statut Membre Dernière intervention 25 février 2023 2
Modifié le 4 mars 2021 à 17:39
J'ai trouvé un script en Java. Est-ce que quelqu'un serait convertir ce script en vb.net?

function is_RIO(sRio, sMsisdn){
    if(sRio.length !=12) return false;
    var sOperateur=sRio.substr(0, 2);
    var sTypeContrat=sRio.substr(2, 1);
    var sRefClient=sRio.substr(3, 6);
    if(sTypeContrat!="P" && sTypeContrat!="E") return false;
    var sOrdre="ABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789+";
    var nRes=new Array(0, 0, 0);
    var sTmp=sOperateur+sTypeContrat+sRefClient+sMsisdn;
    for(n=0;n<19;n++) {
        var nPos=sOrdre.indexOf(sTmp.substr(n, 1));
        nRes[0]=(nRes[0]+nPos)%37;
        nRes[1]=((2*nRes[1])+nPos)%37;
        nRes[2]=((4*nRes[2])+nPos)%37;
    }
    var sCleCalculee=sOrdre.substr(nRes[0],1)+sOrdre.substr(nRes[1],1)+sOrdre.substr(nRes[2],1);
    if(sRio.substr(9)!=sCleCalculee) return false;
    return true;
}
2
Rejoignez-nous