Need help on No. Series

kine wrote:

It4Ch1 wrote:

OnNewRecord()

SalesSetup.GET;
SeriesList := SalesSetup."Order Nos.";
NoSeriesRelations.RESET;
NoSeriesRelations.SETFILTER(Code,SalesSetup."Order Nos.");
i:=1;
IF NoSeriesRelations.FIND('-') THEN
  REPEAT
    SeriesList := SeriesList+','+NoSeries."Series Code";
    SeriesCode[i] := NoSeriesRelations."Series Code";
    i:=i+1;
  UNTIL NoSeries.NEXT = 0;
CASE STRMENU(SeriesList,0,'Please choose a series:') OF
  1 : "No." := NoSeriesMgmt.GetNextNo(SalesSetup."Order Nos.",0D,TRUE);
  2 : "No." := NoSeriesMgmt.GetNextNo(SeriesCode[1],0D,TRUE);
  3 : "No." := NoSeriesMgmt.GetNextNo(SeriesCode[2],0D,TRUE);
  4 : "No." := NoSeriesMgmt.GetNextNo(SeriesCode[3],0D,TRUE);
  5 : "No." := NoSeriesMgmt.GetNextNo(SeriesCode[4],0D,TRUE);
  6 : "No." := NoSeriesMgmt.GetNextNo(SeriesCode[5],0D,TRUE);
END;

I've been trying to get this code to work. User will be prompt to choose a series No. before adding a new record.
However, faced with error: cant make any changes to database until a transaction has been started.

Any clues?

NoSeriesRelations = No. Series Relationships

You are using wrong trigger.