LowScope Highscope
-
- Posts: 14
- Joined: Tue Oct 10, 2017 12:44 pm
LowScope Highscope
I__I use R&R with Delphi, Great duo!!!__I have the following code call to show the report on screen.__When I run this report in R&R with a Low/HighScope, it works Ok.__In Delphi, it run via all records (several 1000), so it is very long.__It seems that the low high scope do not work so I suppose that one of my parameter is wrong. Witch one ?____ RRReport.DataDirectory := Fmrq;__ RRReport.ReportDirectory := Fmrq;__ RRReport.ReportName := Fmrq + ^FicheMembre.RRW^;__ RRReport.MasterTable := Gestion + ^Fmr1ma.dbf^;__ if RgImprimerQui.ItemIndex = 0 then__ // Le membre courant__ RRReport.MasterIndex := Gestion + ^Fmr1ma4.ntx^__ else__ // Tous les membres sélectionnés__ RRReport.MasterIndex := Gestion + ^Fmr1ma3.ntx^;____ if RgImprimerQui.ItemIndex = 0 then__ // Le membre courant__ begin__ RRReport.LowScope := vPerma;__ RRReport.HighScope := vPerma;__ RRReport.Scope := 2;__ rrReport.Query := 1; // Entire__ end__ else__ begin__ // Tous les membres sélectionnés__ rrReport.Filter := ^gFMR1MA->Select="O"^;__ rrReport.Query := 2; // Override__ RRReport.Scope := 1; // Entire__ end;____ if RgStage.ItemIndex = 2 then__ // Aucun Stage__ RRReport.ParametersString := ^Stage=Non^__ else__ RRReport.ParametersString := ^Stage=Oui^;____ if RgCotis.ItemIndex = 1 then__ // Aucune cotisation__ RRReport.ParametersString := ^Cotis=Non^__ else__ RRReport.ParametersString := ^Cotis=Oui^;____ RRReport.WriteAllow := True;__ RRReport.Destination := 1; // Window__ RRReport.Action := 1;__
-
- Posts: 14
- Joined: Tue Oct 10, 2017 12:44 pm
=> RE: LowScope Highscope
I have found a way to make it work.__Just remove the low and high scope in the report itself.__so Click on Beginning of table and End of table in the naster table screen.__Then via the runtime, the scope start working.__