In selbe Tabelle Kopieren

Hallo,

ich habe vor, unsere Notebooks in Navision zu verwalten. Dazu gehört dann auch eine Art Software- und Hardwaretabelle in der alle Mitgelieferten Komponenten des Notebooks abgebildet sind.
Da ich jedes Notebook allerdings erstmal manuell erfassen muss, damit ich später automatisiert buchen kann, will ich den Teil der Software und Hardwarekomponenten automatisieren.

Das heißt: Ich lege Notebook 1 mit der Verknüpfung auf die Softwaretabelle an. Aber Software eingefügt. Nun hat Notebook 2 genau die selbe Software wie das erste Notebook! Das heißt ich möchte die gesamte Software von Notebook 1 kopieren. Dies sollte eigentlich so geschehen:

klappt aber nicht:

Code:

notebooksoftware.SETRANGE(notebooksoftware."Serial No.",xserie);
//notebooksoftware.SETRANGE(notebooksoftware.Software,'%1','');
IF notebooksoftware2.FIND('-') THEN REPEAT
  test := notebooksoftware.Software;
 
  notebooksoftware.SETRANGE(notebooksoftware."Serial No.",newserial);
  IF NOT notebooksoftware.FIND('-') THEN BEGIN
     notebooksoftware."Serial No." := newserial;
     notebooksoftware.Software := test;
     notebooksoftware.INSERT;
  END ELSE


  notebooksoftware.SETFILTER(notebooksoftware."Serial No.",'%1','');
    IF NOT notebooksoftware.FIND('-') THEN BEGIN
     notebooksoftware."Serial No." := newserial;
     notebooksoftware.Software := test;
     notebooksoftware.INSERT;
    END;
UNTIL notebooksoftware2.NEXT = 0

Die Schlüssel zur Softwaretabelle sind: Seriennummer Notebook (Serial No.) Text Software (Software) und Lizenz Code.

Viele Grüße und vielen Dank

Hi,

was mir bei dem Code auffaellt:
* Du filterst zuerst auf notebooksoftware und machst dann ein FIND auf notebooksoftware2?
* Der Primary Key ist "Serial No.", "Software" & "Lizenz Code". Beim INSERT ist "Lizenz Code" immer leer, hast du den Wert zu diesem Zeitpunkt nicht?

Aus dem Code werde ich nicht ganz schlau, vielleicht kannst du nochmal genau erklaeren, was beim Kopieren geschehen soll

Gruesse
feri