Nächste freie Kundennummer automatisch eintragen

[Huxley]

Hallo zusammen,

Um das Anlegen von Kunden zu vereinfachen, möchte ich, dass die nächste freie Kundennummer automatisch in das Formular für neue Kunden eingetragen wird.
Momentan bin ich soweit, dass die nächste freie Nummer bei AdminCustomerCompany.pm aus der Datenbank ausgelesen wird

Code: Select all

		my $NextID = 0;
		my $SQL = "SELECT MAX(customer_id)+1 FROM customer_company";			#Beziehen der nächsten Freien Kundennummer
		$Self->{DBObject}->Prepare(SQL => $SQL, Limit => 15);

		while (my @Row = $Self->{DBObject}->FetchrowArray()) {
			$NextID = $Row[0];
			$Self->{LogObject}->Log( Priority => 'info', Message => "CompanyID= $NextID" );
		}

Allerdings weiß ich nicht, wie ich diesen Wert nun in das Formular eintragen kann.
Kann mir jemand helfen?