Message de rapport:
 

Re: NUMERO AUTO

Sujet: Re: NUMERO AUTO
par marcello50 sur 4/1/2005 15:07:53

Pas ce que j'attendais.
Si la valeur est initialemnt B36001 elle doit passer a B36002 puis a B36003.....B36999 etc.

Voici la formule utilisée en Access :

VraiFaux(Choisir(Format(Date();"aaaa")-2003;"A";"B";"C";"D") Comme (Gauche(MaxDom("[N° COMMANDE]";"COMMANDES FOURNISSEURS");1));Choisir(Format(Date();"aaaa")-2003;"A";"B";"C";"D") & "36" & VraiFaux((Droite(MaxDom("[N° COMMANDE]";"COMMANDES FOURNISSEURS");3)+1)<10;"00" & Droite(MaxDom("[N° COMMANDE]";"COMMANDES FOURNISSEURS");3)+1;VraiFaux((Droite(MaxDom("[N° COMMANDE]";"COMMANDES FOURNISSEURS");3)+1)<100;"0" & Droite(MaxDom("[N° COMMANDE]";"COMMANDES FOURNISSEURS");3)+1;(Droite(MaxDom("[N° COMMANDE]";"COMMANDES FOURNISSEURS");3)+1)));Choisir(Format(Date();"aaaa")-2003;"A";"B";"C";"D") & "36001")

Cela permet d'incrementer chaque nouvelle fiche et lors du changement d'année de repartir à 0.

EX : année 2004 A36001 à A36XXX
année 2005 B36001 à B36XXX
année 2006 C36001 à C36XXX



Connexion
Menu
Chercher WDForge
Chercher Web
Partenaires
Visualiser tous les Partenaires...
WinDev, WebDev, WinDev Mobile et HyperFile sont des marques déposées par PCSoft. |  Voter |  Legal |  Contact |   XOOPS 2.0.13.2