Funktion in Form beim nächsten DS

6. Februar 2013 13:12

Hallo,

gleich das zweite Thema heute.
Ich habe eine Funktion in einer Form geschrieben, die versch. Werte / Variablen berechnet. Diese habe ich aktuell nur bei einem Button (OnPush) aufrufbar gemacht.
Jetzt soll diese bei jedem Aufruf eines DS automatisch durchgeführt werden.

In welchem Trigger tue ich das? Beim OnAFtergetRecord in der Form, bekomme ich immer die Frage: Wollen Sie den DS wirklich umbennnen? :-?

Code:
CLEAR(TotalSchrank);
CLEAR(TotalTisch);
CLEAR(TotalContainer);
CLEAR(TotalGesamt);
CLEAR(TotalStuhl);

TourenplanZeileL.SETRANGE("Tourenplannr.","No.");
IF TourenplanZeileL.FINDFIRST THEN
REPEAT 
  SalesLineL.RESET;
  SalesLineL.SETRANGE("Document Type",SalesLineL."Document Type"::Order);
  SalesLineL.SETRANGE("Document No.",TourenplanZeileL."No.");
  IF SalesLineL.FINDFIRST THEN BEGIN
    REPEAT
      IF ItemL.GET(SalesLineL."No.") THEN BEGIN
        IF (ItemL."Item Category Code" = 'VKTISCHE') THEN
          TotalTisch := TotalTisch + SalesLineL.Quantity;

        IF (ItemL."Item Category Code" = 'SCHRANK') THEN
          TotalSchrank := TotalSchrank + SalesLineL.Quantity;

        IF (ItemL."Item Category Code" = 'STÜHLE') THEN
          TotalStuhl := TotalStuhl + SalesLineL.Quantity;

        IF (ItemL."Item Category Code" = 'CONTAINER') THEN
          TotalContainer := TotalContainer + SalesLineL.Quantity;

        TotalGesamt := TotalGesamt +SalesLineL.Quantity;
      END;
    UNTIL SalesLineL.NEXT = 0;
  END;
UNTIL TourenplanZeileL.NEXT = 0;

CurrForm.UPDATE;

Re: Funktion in Form beim nächsten DS

6. Februar 2013 13:42

PhilSan hat geschrieben:...Beim OnAFtergetRecord in der Form, bekomme ich immer die Frage: Wollen Sie den DS wirklich umbennnen? :-?

Das ist schon der richtige Trigger. Du musst nur aus dem

Code:
CurrForm.UPDATE;

ein
Code:
CurrForm.UPDATE(FALSE);

machen.

Re: Funktion in Form beim nächsten DS

6. Februar 2013 13:59

AAArgh....

Fehlermeldung beim Aufruf:
Es ist nicht genügend Arbeitsspeicher verfügbar, um diese Aktivität auszuführen...

Jemande eine Idee?

Re: Funktion in Form beim nächsten DS

6. Februar 2013 14:07

Probier es doch mal ohne das CurrForm.Update.

Re: Funktion in Form beim nächsten DS

6. Februar 2013 14:22

Danke... es hat funktioniert.

Kann mir das jemand erklären?

Re: Funktion in Form beim nächsten DS

6. Februar 2013 15:04

Was genau erklären?