Nummernserie

30. April 2015 14:15

Hallo Community,

ich benötige Hilfe beim erstellen einer Nummernserie.

Ziel des ganzen soll sein, wenn im Verkaufskopf das Feld Nr. leer ist, dass dann eine bestimmte Nummernserie verwendet werden soll.

IF "Sales Header"."No." = ' ' THEN BEGIN
"Sales Header"."No." := ???????;
END;

Was mache ich Falsch?

Vielen dank im Vorau!

Re: Nummernserie

30. April 2015 14:31

Mach wie im Standard <\geflügelteswort>
Hier:
IF "No." = '' THEN BEGIN
TestNoSeries;
NoSeriesMgt.InitSeries(GetNoSeriesCode,xRec."No. Series","Posting Date","No.","No. Series");
END;
aus dem SalesHeader.
Also Rec initialisieren und dann (mit No='') einfügen.

Re: Nummernserie

4. Mai 2015 12:31

Danke @Markus Merkl,

Ich habe es anders gelöst.

Mein erster Fehler war, dass ich im Falschen Trigger war. Ich habe versucht meinen Quelltext im OnAfterGetRecord() zu schreiben. Der richtige Trigger ist der OnPreDataItem().

Item.RESET; \\ alle gesetzten Filter entfernen

Item.INIT; \\ initialisieren einer Recordvariable
IF Item.INSERT(TRUE) THEN BEGIN; \\ INSERT fügt in einer Tabelle einen neuen Datensatz zu.
MESSAGE(Text001); \\ Eine Nachricht erscheint in form einer Textkonstante
END;

Ziel dieser Übung, war es einfach mal programmtechnisch mithilfe der Nummernserie einen Artikel anzulegen.

Re: Nummernserie

5. Mai 2015 09:21

Hallo Dennis,

denkst du bitte daran, das Thema mit [gelöst] als gelöst zu markieren, sofern der Beitrag aus deiner Sicht gelöst ist?