[gelöst] Meldung "Datensatz umbennen" obwohl Filteraufruf

[rom]

Hallo,

ich habe hoffentlich nur ein kleines Problem.

Ich habe ein Form, welches im OnOpen-Form auf Datensätze mittels der Satzmarken filtert.
In diesem Form besteht die Möglichkeit, sich aus diesen Datensätze auf noch ein speziellen DS filtern zu lassen. Dieses geschieht mittels ein Textfeldes und einer Globalen Variable.
Folgender Code wird in diesem Textfeld ausgeführt.

Code:

IF gcoResourceNo <> '' THEN BEGIN // gcoResourceNo -> globale Variable
  RESET;
  SETRANGE("User Status","User Status"::Freigegeben);
  SETFILTER("Approval Status Responsible",'<>%1',"Approval Status Responsible"::Released);
  SETFILTER("Resource No.",gcoResourceNo);
  CurrForm.UPDATECONTROLS;
END;

IF gcoResourceNo = '' THEN
  setMarkedFilter;


Wenn die globale Variable wieder geleert wird bekomme ich anscheinend nach dem Ausführen "setMarkedFilter" -Funktion die Meldung, ob ich den DS umbenennen möchte.

der Code der Funktion

Code:

CLEARMARKS;
CLEARALL;
CLEAR(Rec);

gcoResourceNo := '';
SETCURRENTKEY("Posting Date");

lreUserzuordnung.RESET;
FILTERGROUP(2);
SETRANGE("User Status","User Status"::Freigegeben);
SETFILTER("Approval Status Responsible",'<>%1',"Approval Status Responsible"::Released);
FILTERGROUP(0);
IF FINDFIRST THEN BEGIN
  REPEAT
   lreUserzuordnung.RESET;
   lreUserzuordnung.SETRANGE(BenutzerID,"Resource No.");
   IF lreUserzuordnung.FINDFIRST THEN BEGIN
    IF lreUserzuordnung.VorgesetzterID = UPPERCASE(FORMAT(USERID)) THEN BEGIN
      MARK(TRUE);
    END ELSE IF lreUserzuordnung.VertreterID = UPPERCASE(FORMAT(USERID)) THEN BEGIN
      MARK(TRUE);
    END;
   END;
  UNTIL NEXT=0;
END;
FILTERGROUP(2);
  MARKEDONLY(TRUE);
FILTERGROUP(0);



Hat jdm. eine Idee, wieso der DS unbenannt werden soll?

Danke schon mal

vg
ROm

Zuletzt geändert von rom am 8. März 2010 18:20, insgesamt 1-mal geändert.

Führe nach deiner zweiten Funktion ein CurrForm.UPDATE(FALSE) aus.

Ok, danke funktioniert.


lg Martin