16. September 2021 08:28
ProdPlanungXTageTemp.DELETEALL();
ProdPlanungXTage.RESET;
ProdPlanungXTage.SETRANGE(Arbeitsplatz,'H2L2'); !!! Hier bräuchte ich den Filter!!!
ProdPlanungXTage.SETRANGE(Verfügbarnegativ,TRUE);
ProdPlanungXTage.SETRANGE(EndArtikelRechnen,TRUE);
RESET;
DELETEALL;
IF ProdPlanungXTage.FINDSET THEN
REPEAT
Rec := ProdPlanungXTage;
ProdPlanungXTageTemp := ProdPlanungXTage;
InProdPlanungCheck;
INSERT;
ProdPlanungXTageTemp.INSERT;
UNTIL ProdPlanungXTage.NEXT = 0;
RESET;
SETCURRENTKEY(Enddatum_Topf,Auftragstyp);
FINDFIRST;
17. September 2021 13:41
Global_FilterString := FilterString;
ProdPlanungXTage.SETRANGE(Arbeitsplatz,Global_FilterString);
CurrPage.SubPageName.PAGE.SetFilter('myFilterString');