Verkaufsbemerkungszeile vs FA-Bemerkungszeile

Hallo,

Ich übergebe mittel einer Funktion die Verkaufsbemerkungszeile in die FA-Bemerkungszeile.
soweit so gut.
Wenn ich jetzt in die FA-Bemerkungszeile eine neue Zeile hinzufüge , Füge ich dann aber in der Verkaufsbemerkungszeile eine Bemerkungszeile hinzu, dann überschreibt diese die im FA-Bemerkungszeile eingefügte Zeile.
es Sollen ALLE Bemerkungen in der FA nicht überschrieben sondern aus der Verkaufsbemerkungszeile ergänzt werden.
was muss noch ändern damit statt Überschreibung eine Aktualisierung erfolgt?
Danke im voraus.

Code:

 

//Diese Funktion überführt die Bemerkungen aus dem Verkaufsauftrag in die Fertigungsauftragsbemerkungen

SalesCommentLine.SETRANGE("Document Type",SalesCommentLine."Document Type"::Order);
SalesCommentLine.SETRANGE("No.",ProductionOrder."Source No.");
IF SalesCommentLine.FIND('-') THEN BEGIN
  REPEAT
    ProdOrderCommentLine.INIT;
    ProdOrderCommentLine.Status := ProductionOrder.Status;
    ProdOrderCommentLine."Prod. Order No.":= ProductionOrder."No.";
    ProdOrderCommentLine."Line No.":=SalesCommentLine."Line No.";
    ProdOrderCommentLine.Date:=SalesCommentLine.Date;
    ProdOrderCommentLine.Code:=SalesCommentLine.Code;
    ProdOrderCommentLine.Comment:=SalesCommentLine.Comment;
    ProdOrderCommentLine."Source No." := SalesCommentLine."No.";

    IF NOT ProdOrderCommentLine.INSERT THEN
      ProdOrderCommentLine.MODIFY;


  UNTIL SalesCommentLine.NEXT =0;
END;



Ich würde vermuten, diese Zeile ist schuld:

Code:

ProdOrderCommentLine."Line No.":=SalesCommentLine."Line No.";

Du müsstest zunachst die letzte Zeile FA-Bemerkung ausfindig machen und diese um 10000 hochzählen.

Hallo,

danke für den Hinweis!!
Ich habe die Letztezeile ausfindig gemacht & hochgezählt.
jetzt werden die Zeilen nicht überschrieben sondern neu angelegt.

was habe ich falsch gemacht?

Code:


//Diese Funktion überführt die Bemerkungen aus dem Verkaufsauftrag in die Fertigungsauftragsbemerkungen

SalesCommentLine.SETRANGE("Document Type",SalesCommentLine."Document Type"::Order);
SalesCommentLine.SETRANGE("No.",ProductionOrder."Source No.");
IF SalesCommentLine.FIND('-') THEN BEGIN
  REPEAT
    ProdOrderCommentLine.SETRANGE("Source No.",SalesCommentLine."No.");//die Auftragsnummer
      IF ProdOrderCommentLine.FINDLAST THEN
      LastLineNo := ProdOrderCommentLine."Line No.";
      ProdOrderCommentLine.INIT;
      ProdOrderCommentLine."Line No.":=LastLineNo + 10000;
      ProdOrderCommentLine.Status :=ProductionOrder.Status;
      ProdOrderCommentLine."Prod. Order No.":=ProductionOrder."No.";
      ProdOrderCommentLine.Date:=SalesCommentLine.Date;
      ProdOrderCommentLine.Code:=SalesCommentLine.Code;
      ProdOrderCommentLine.Comment:=SalesCommentLine.Comment;     
      ProdOrderCommentLine."Source No." := SalesCommentLine."No.";

    ProdOrderCommentLine.INSERT;
     
  UNTIL SalesCommentLine.NEXT =0;
END;


Ich möchte mich ja nicht rein drängeln, aber wie soll das überhaupt gehen?¿

SalesCommentLine.SETRANGE("No.",ProductionOrder."Source No.");

Die "Source No." ist die Herkunftsnummer des FA. Also der Artikel, der hergestellt wird.

Hallo,

Die "Source No." ist die Auftrag Nr. (die AB).

hoffe das das was du meintest

In meinem Nav ist das die Herkunftsnummer ..

Hallo ,

in unserem NAV werden keine Artikeln gefertigt sondern nur Leistungen aus dem VK-Auftrag in die Produktion übergeben(bitte siehe Anhang.)
ich hätte es vorher erklären müssen (sorry )

Du hast keine ausreichende Berechtigung, um die Dateianhänge dieses Beitrags anzusehen.

Ui :) Den Weg nutze ich nicht, aber sieht ja interessant aus ...