Note de ce sujet :
  • Moyenne : 0 (0 vote(s))
  • 1
  • 2
  • 3
  • 4
  • 5
Incrémentation
#1
Bonjour 

Je voudrais incrémenté automatiquement un numéro d'adhérent  a chaque ajout du style M-00001 dans une fenêtre.
pouvez-vous m'aider?

amicalement
A3xxx
A+
A3xxx
Répondre
#2
(16-01-2020, 04:20 PM)a3xxx a écrit : Bonjour 

Je voudrais incrémenté automatiquement un numéro d'adhérent  a chaque ajout du style M-00001 dans une fenêtre.
pouvez-vous m'aider?

amicalement
A3xxx

j'ai résolu le problème tout seul
A+
A3xxx
Répondre
#3
Bonjour,
Pour incrémenter les numéros de factures en fonction de l''année, moi j'utilise cette procédure locale.
PROCÉDURE Procedure_Nouvelle()

//** Déclaration des Variables **
DerniereRef est un entier
Zeros est une chaîne

HLitDernier(Facture,Code_Facture)
SI HEnDehors(Facture)ALORS
// Toute première facture
sai_Code_facture=Gauche(Société.DateD,4)+"0001"
SINON
SI Gauche(Facture.Code_Facture,4)<>Gauche(Société.DateD,4)ALORS
// Une nouvelle année est commencée
sai_Code_facture=Gauche(Société.DateD,4)+"0001"
SINON
// Incrémentation de la numérotation
DerniereRef=Val(Droite(Facture.Code_Facture,4))
DerniereRef++
SELON Taille(NumériqueVersChaîne(DerniereRef))
CAS 1: Zeros="000"
CAS 2: Zeros="00"
CAS 3: Zeros="0"
CAS 4: Zeros=""
FIN
sai_Code_facture=Gauche(Société.DateD,4)+Zeros+NumériqueVersChaîne(DerniereRef)
FIN
FIN

Avec mes salutations
Répondre
#4
Merci Abdou, nikel ca fonctionne bien !
A+
A3xxx
Répondre
#5
Bonsoir
Vous pouvez simplifier avec les conseils de l'aide en ligne :
Syntaxe

<Résultat> = NumériqueVersChaîne(<Nombre> [, <Format>])

<Zéro>
Si ce paramètre est spécifié (<Zéro> ="0"), le nombre sera complété par des zéro à gauche du premier chiffre significatif si la partie significative du nombre est plus petite que la taille demandée et si le nombre est justifié à droite.
Par défaut, le nombre n'est pas complété à gauche par des "0".
Par exemple : NumériqueVersChaîne(123,"05d") donnera "00123".
Répondre
#6
Bonjour,
Avec NumériqueVersChaîne(123,"05d") donnera "00123". c'est plus simple.
Merci
Ne craignez pas d'etre lent, craignez juste d'etre a  l'arret.
Coordialement!
Répondre
#7
(02-04-2021, 11:06 AM)gaymath2 a écrit : Bonjour,
Avec NumériqueVersChaîne(123,"05d") donnera "00123". c'est plus simple.
Merci
Bonsoir, exactement ce que j'ai dit un an déjà :
Par exemple : NumériqueVersChaîne(123,"05d") donnera "00123".
Ce forum n'avance pas trop vite
Répondre


Sujets apparemment similaires…
Sujet Auteur Réponses Affichages Dernier message
  Incrementation numero de facture[RESOLU] Francoisisere 2 5,152 22-10-2012, 06:18 PM
Dernier message: Francoisisere
  problème d'incrementation tof50 4 3,879 27-04-2012, 08:43 AM
Dernier message: tof50
  AUTO-INCREMENTATION SUR TABLEAU BENKOUIDER 9 3,514 03-08-2009, 08:19 PM
Dernier message: BENKOUIDER
  Auto Incrementation hamid 2 3,946 01-06-2009, 03:26 AM
Dernier message: hamid

Atteindre :


Utilisateur(s) parcourant ce sujet : 1 visiteur(s)