Andruck Nullposition

Hallo Zusammen,

kann mir jemand verraten, wo der Andruck aller Nullpositionen in den Rechnungen angedruckt wird?

Ich find leider die codestelle nicht

grüßle und danke

escabrosa

Hallo escabrosa,

die Stelle kannst du auch nicht finden, da NAV nicht zwischen Positionen mit und ohne Menge unterscheidet.
Die "Null-Positionen" werden angedruckt, weil sie in dem entsprechenden Beleg vorhanden sind.

Um Null-Positionen nicht mit anzudrucken, wäre (mindestens) eine Programmanpassungen im DataItem SalesInvLine nötig:

Code:

IF "Attached-to Line No." = 0 THEN
  SalesInvLine2 := SalesInvLine
ELSE
  SalesInvLine2.GET("Document No.","Attached-to Line No.");

IF NOT SalesInvLine2.Type IN [SalesInvLine2.Type::" ",SalesInvLine2.Type::"G/L Account"] THEN
  IF SalesInvLine2.Quantity = 0 THEN
    CurrReport.SKIP;

(Kein Anspruch auf Richtigkeit und Vollständigkeit.)

Hallo Timo, danke für die schnelle antwort.

ist es vllt diese stelle hier, wo die Nullposition angedruckt wird?
Wie kann ich am besten "sagen": Wenn Haken gesetzt, dann nullpositionen anzeigen, ansonsten Nullpos. nicht anzeigen(ganze zeile soll nicht angedruckt werden)?

Code:


OutputNullPosition - OnPreDataItem()
IF ("Sales Line".Type = "Sales Line".Type::" ") OR
   ("Sales Line".Type > "Sales Line".Type::"Charge (Item)") OR
   (NOT "Sales Line"."Print Line") OR
   ("Sales Line"."Null Position" = "Sales Line"."Null Position"::No)
THEN
  CurrReport.BREAK;

OutputNullPosition - OnAfterGetRecord()

IF ( "Sales Line".Type = "Sales Line".Type::"G/L Account" ) THEN BEGIN
  IF "Sales Line"."Print own No." THEN
    OutputNo := GeneralFunctionMST1.FormatItemNo("Sales Line"."No.")
  ELSE
    IF "Sales Line"."Print Reference No." THEN
       OutputNo := "Sales Line"."Cross-Reference No."
     ELSE
       OutputNo := '';
END
ELSE IF ( "Sales Line".Type = "Sales Line".Type::Item ) THEN BEGIN
  IF "Sales Line"."Print own No." THEN BEGIN
    IF "Sales Line"."Search No." <> '' THEN
      OutputNo := "Sales Line"."Search No."
    ELSE
      OutputNo := GeneralFunctionMST1.FormatItemNo("Sales Line"."No.");
  END ELSE BEGIN
    IF "Sales Line"."Print Reference No." THEN
       OutputNo := "Sales Line"."Cross-Reference No."
     ELSE
       OutputNo := '';
  END;
END
ELSE IF ( "Sales Line".Type = "Sales Line".Type::Resource ) THEN BEGIN
  IF NOT "Sales Line"."Print own No." THEN
    CLEAR(OutputNo)
  ELSE
    OutputNo := "Sales Line"."No.";
END
ELSE BEGIN
  OutputNo := "Sales Line"."No.";
END;


gruß escabrosa

Das sieht nicht so wirklich aus wie im Standard

Aber da steht doch "Sales Line"."Print Line" und es ist bool. Vielleicht kann man damit etwas anfangen, auch wenn noch ein paar Bedingungen mehr abgefragt werden.

:D..

okay, und wie sag ich ihm jetzt:

wenn häkchen, "Nullpos anzeigen" gesetzt dann andrucken ansonsten nicht?

*rotwerd*

Tja ... da kann ich nur raten. Scheint, als müsstest du den ganzen Klimbim im OnPreDataItem übersteuern.

welches klimbim? bitte genauer ausdrücken, ich nix blick :D

info: (falls überhaupt notwendig)
...also dieses "boolean" "Nullpos anzeigen" habe ich selbst hinzugefügt und muss es iwie dazu kombinieren...

Es scheint, als würde im OnPreDataItem entschieden, ob die Zeile gedruckt wird oder nicht. Alles, was mit dem Break zu tun hat.

Achso, wenn das Feld "Null Position" von dir ist, dann warst du ja schon selbst so weit. Es müsste dann die einzige Bedingung sein, wenn nur dieses Feld entscheidet, ob gedruckt werden soll oder nicht.

Btw: Ist das ein Optionsfeld, das ja und nein kann?

nein, ich habe ein zusatzliches "Feld" in der Debitorenkarte hinzugefügt. Wenn häkchen bei einem bestimmten debitor auf "ja gesetzt wird, dann soll er mir die nullpositionen anzeigen, ansonsten nicht.

Das Ganze von der Debitorenkarte abhängig zu machen, ist bei gebuchten Belegen immer so eine Sache. Wenn sich die Einstellung beim Debitor mal ändert - aus welchen Gründen auch immer - sieht ein nachträglicher Druck dann anders aus als der ursprüngliche. Das sollte man eigentlich vermeiden.