[Gelöst] Lookup-Feld mit Werte aus fremder Tabelle

Hallo zusammen,

in der Form 5077 "Create Interaction", möchte ich gerne das LoopUp-Feld "Salesperson Code" vorbelegen.

Dazu habe ich alle relevanten Verkäufer in dem Feld "Funktion" die USERID eingetragen, anhand dessen kann der Datensatz identifiziert werden.

Folgenden aktuellen Code habe ich im OnOpenForm-Trigger gesetzt:

Code:

SalesPurchPerson.SETRANGE(SalesPurchPerson."Job Title",USERID);
                 IF SalesPurchPerson.FINDFIRST THEN BEGIN
                   IF SalesPurchPerson.GET(SalesPurchPerson.Code) THEN BEGIN
                     "Salesperson Code" := SalesPurchPerson.Code;
                     MESSAGE("Salesperson Code");
                   END;
                 END;

Testweise lasse ich mir über MESSAGE("Salesperson Code"); den Code ausgeben, was auch funktioniert.

Leider wird dieser jedoch nicht in das entsprechende Feld eingetragen.

Für jede Hilfe wäre ich euch dankbar.

Zuletzt geändert von mk-gfx am 28. Juli 2013 20:12, insgesamt 1-mal geändert.

Im OnOpenForm-Trigger wurde noch kein einziger Datensatz gelesen.
Platziere deinen Quelltext im OnAfterGetRecord-Trigger.

Hallo,

danke vorab für die schnelle Antwort.

Habe den Code nur im OnAfterGetRecord-Trigger gesetzt, jedoch durchläuft er hier diesen Part nicht.

Ergbenis: Es wird keine Message ausgegeben.

Ich habe so etwas schon befürchtet; ich hatte mir davor die Form aber nicht näher angesehen.
Also, wenn ich mir diese Form so ansehe, besteht sie ja aus mehreren "Seiten".
Ich nehme an, du möchtest auf Seite 2 (der ersten Seite mit Feldern zum Eingeben) unter "Geben Sie den zust. Verkäufer an." die Variable "Salesperson Code" vorbelegen, richtig?
Dann packe deinen Quelltext besser in Funktion ShowStep, und zwar ...

Code:

CASE "Wizard Step" OF
  "Wizard Step"::"1":
    BEGIN
      CurrForm.Step1.VISIBLE := Visible;
      IF Visible THEN BEGIN
        CurrForm.Back.ENABLED(FALSE);
        CurrForm.Finish.ENABLED(FALSE);
        CurrForm.Next.ENABLED(TRUE);
        /// Hier hin /// <------------
        CurrForm."Wizard Contact Name".ACTIVATE;
      END;
    END;

Hey, der erste Lösungsweg brachte auch den gewünscht Erfolg.
Die Form darf in dem Fall nicht ohne Kontakt gestartet werden, da ohne auch kein Record möglich ist.

Danke dir vielmals...

LG