Bonjour,

Le modérateur a dans un premier temps déplacer ce sujet (à juste titre) vers le forum Windev, pour autant, ayant fini par trouver la solution, j'ai souhaité remercier ceux m'ayant aider et ceux qui auraient le même problème que moi, donc voici la solution que je viens de mettre sur le forum Windev

Bon, j'ai résolu mon problème de génération de code barre.
Vu que j'ai mis 15 jours à y arriver, et que j'ai dû lire 2 bouquins de SQLPro pour se faire, j'ai décidé de mettre le code concerné à disposition de ceux pour qui le problème pourrait se poser
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
 
sVariable_EAN est une chaîne
préfixe_AEN est une chaîne
nouveauCode_AEN est une chaîne
Cle est un entier
Total est un entier
Requete est une chaîne="SELECT ART_UVC FROM CODE_AEN " 
SI SQLExec(Requete, "REQ1") ALORS
	SI SQLAvance("REQ1")=0 ALORS
		sVariable_EAN=SQLLitCol("REQ1", 1)
		préfixe_AEN=Gauche(variable,12)
		préfixe_AEN=Val(préfixe_AEN)+1
	    FIN
	 	FIN
		 //calcul du caractère de contrôle 
nouveauCode_AEN=préfixe_AEN + Cle
POUR ii = 1 A Taille(préfixe_AEN)        //Code est les 12 premiers caractères du code barre
SI EstPair(ii) ALORS
	Total+=Val(préfixe_AEN[[ii]])*3
SINON
	Total+=Val(préfixe_AEN[[ii]])
FIN
FIN
Cle = ((PartieEntière(Total/10)+1)*10)-Total
SI Cle = 10 ALORS
	Cle = 0
FIN
Afin de bien interpréter ce code, il est destiné à une application de gestion de prêt à porter qui gère entre autre des modèles, à la couleur et à la taille

Développer sur:
WINDOWS XP
WINDEV14
SQL SERVER 2005

Et un grand merci à ceux qui m'ont apportés leurs lumières m'ayant permis de créer la fiche article de mon application.

Raptor92