Discussion :

[diden138]

bonjour,
voila pour mon logiciel de facturation le client veut que le numéro de la facture soit formaté de la maniére suivante année/mois/numerofact exe:20070101
facture N°2 : 20070102 quelqun a t-il une idée comment faire ..
cordialement @++

[Andry]

Salut,

Quelle base de donnée compte tu utilisé.
Est ce que ton logiciel sera en monoposte ou multi-utilisateurs

Après, il faudra peut être poster dans le Forum Delphi et Base de donnée.

A+

[sjrd]

Euh Un truc comme ça : ?

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
var Year, Month, Day : Word;
begin
  DecodeDate(Date, Year, Month, Day);
  Result := IntToStr(Year*10000 + Month*100 + NoFacture);
end;

[Louis Griffont]

Bonjour,
C'est le format que nous utilisons pour tout (ou presque) nos codes qui nécessitent un index temporel (commande client/fournisseur, BL, facture, O.F., ect...)

Le systeme que nous utilisons est simple.
une table qui contient
un Indic >>> car(6) ( ex CDECLI pour commande client)
l'année >>> Num(4)
le mois >>> Num( 2)
Dernier numéro >>> num( 4)

une fonction globale qui permet de renvoyer le prochain numéro

La fonction recherche dans la table "NUMSYS" l'annee, le mois et le dernier numéro pour le type désiré.
Si l'annnée et le mois sont identique à l'année et le mois en cours on fait +1 sur le dernier numéro,
si le mois est différent, on remplace le mois par le mois en cours et on donne l'indice 1
si l'année est différente on affecte l'année et le mois et on donne l'indice 1 (pareil si on ne trouve pas : cas d'un nouveau code !)

Voila, en esperant t'avoir été utile
Kwasin