Re: Numerierfunktion

From: Klaus Sobel (klausso_at_hotmail.com)
Date: 11/29/04 

Date: Mon, 29 Nov 2004 11:10:13 +0100

Hallo Simona,

etwa so

LPARAMETERS tdLastDay, tnCounter

IF tdLastDay != DATE() THEN

lnCounter = 1

ELSE

lnCounter = tnCounter

ENDIF

RETURN TTOC(DATE(), 1) + "." + PADL(tnCounter, 2, "0")

mit freundlichen Grüssen

Klaus Sobel

Microsoft Developer Support EMEA

"Simona Struck" <sistruck@aol.com> schrieb im Newsbeitrag
news:96qlq0t5khofnhju377cmv0451773v07it@4ax.com...
> Hi,
>
> irgendwie steh ich aufm Schlauch, weil ich krieg es nicht hin,
> in einer neuen Tabelle ein bestimmtes berechnetes Feld zu
> erzeugen. Es soll eine Art ID-Feld sein, in dem Datum und
> laufende Nr. automatsch für jeden neuen Satz erscheint.
>
> Also für die erste Eintragung heute: 041129.01, dann weiter
> 041129.02 etc., morgen 041130.01...
>
> Wie müsste das in der BERECHNEN-Option aussehen?
> (VFP7)
>