VAT LuhnKey : Différence entre versions

De BlueWiki
(Page créée avec « {| class="wikitable" !Paramètres !Type ! !Description |- |Numéro de carte |Texte |caption |Nombre dont vous voulez calculer la clef de Luhn |- |Mul... »)
 
(Description)
Ligne 31 : Ligne 31 :
 
=== Description ===
 
=== Description ===
 
----
 
----
Cette Calcul la clef de Luhn d'un nombre
+
Cette méthode calculs la clef de Luhn d'un nombre
 
+
  
 
=== Exemple de code===
 
=== Exemple de code===

Version du 5 mai 2013 à 16:00


Paramètres Type Description
Numéro de carte Texte caption Nombre dont vous voulez calculer la clef de Luhn
Multiplicateur initial Entier long caption 1 ou 2


Resultat Entier Long caption Clef de Luhn

Description


Cette méthode calculs la clef de Luhn d'un nombre

Exemple de code


 // Nom utilisateur (OS) : Paul Kühn - BlueCompany
 // Date et heure : 28/12/11, 16:34:48
 // ----------------------------------------------------
 // Méthode : VAT_CheckCardNumber

C_BOOLEEN($0;$isOK)
C_TEXTE($cardNumber;$1)
$cardNumber:=$1

Si (Longueur($cardNumber)=16)
$15Premier:=Sous chaine($cardNumber;1;15)
$LuhnKey:=VAT_LuhnKey ($15Premier;2)
Si ($LuhnKey=Num(Sous chaine($cardNumber;16;1)))
$isOK:=Vrai
Fin de si 
Fin de si 
$0:=$isOK