RelatedTablesString

Meeting place for R&R customers and clients to share tips and ideas. Post your questions, messages or problems here.
Post Reply
Yves_(Guest)
Posts: 14
Joined: Tue Oct 10, 2017 12:44 pm

RelatedTablesString

Post by Yves_(Guest) » Mon Sep 09, 2002 8:28 am

I, is there a maximum number of related tables strings that I can specify in my code ?__This is an example, I use Delphi 5 with R&R v8.____ RRReport.RelatedTablesString :=^cFmr1ma=^ + Cumul + ^Fmr1ma,^ + Cumul + ^Fmr1ma1.ntx;^ +__ ^Fmr1mt1=^ + Fmrq + ^Fmr1mt,^ + Fmrq + ^Fmr1mt1.ntx;^ +__ ^Fmr1mt2=^ + Fmrq + ^Fmr1mt,^ + Fmrq + ^Fmr1mt1.ntx;^ +__ ^Fmr1mt3=^ + Fmrq + ^Fmr1mt,^ + Fmrq + ^Fmr1mt1.ntx;^ +__ ^Fmr1mt4=^ + Fmrq + ^Fmr1mt,^ + Fmrq + ^Fmr1mt1.ntx;^ +__ ^Fmr1mt5=^ + Fmrq + ^Fmr1mt,^ + Fmrq + ^Fmr1mt1.ntx;^ +__ ^Fmr1mt6=^ + Fmrq + ^Fmr1mt,^ + Fmrq + ^Fmr1mt1.ntx;^ +__ ^Fmr1mt7=^ + Fmrq + ^Fmr1mt,^ + Fmrq + ^Fmr1mt1.ntx;^ +__ ^Fmr1mt8=^ + Fmrq + ^Fmr1mt,^ + Fmrq + ^Fmr1mt1.ntx;^ +__ ^Fmr1mt9=^ + Fmrq + ^Fmr1mt,^ + Fmrq + ^Fmr1mt1.ntx;^ +__ ^Fmr1mt10=^ + Fmrq + ^Fmr1mt,^ + Fmrq + ^Fmr1mt1.ntx;^ +__ ^Fmr1mt11=^ + Fmrq + ^Fmr1mt,^ + Fmrq + ^Fmr1mt1.ntx;^ +__ ^Fmr1mt12=^ + Fmrq + ^Fmr1mt,^ + Fmrq + ^Fmr1mt1.ntx;^ +__ ^Fmr1mt13=^ + Fmrq + ^Fmr1mt,^ + Fmrq + ^Fmr1mt1.ntx;^ +__ ^Fmr1mt14=^ + Fmrq + ^Fmr1mt,^ + Fmrq + ^Fmr1mt1.ntx;^;__ if RgStage.ItemIndex = 1 then__ begin__ // Stage de cumul__ RRReport.RelatedTablesString := RRReport.RelatedTablesString +__ ^Fmr1mac=^ + Cumul + ^Fmr1mac,^ + Cumul + ^Fmr1mac2.ntx;^;__ end__ else__ begin__ // Stage du Gestion__ RRReport.RelatedTablesString := RRReport.RelatedTablesString +__ ^Fmr1mac=^ + Gestion + ^Fmr1mac,^ + Gestion + ^Fmr1mac2.ntx;^;__ end;__ __ RRReport.RelatedTablesString := RRReport.RelatedTablesString +__ ^Fmr1mt30=^ + Fmrq + ^Fmr1mt,^ + Fmrq + ^Fmr1mt1.ntx;^ +__ ^Fmr1mt31=^ + Fmrq + ^Fmr1mt,^ + Fmrq + ^Fmr1mt1.ntx;^ +__ ^Fmr1mt32=^ + Fmrq + ^Fmr1mt,^ + Fmrq + ^Fmr1mt1.ntx;^ +__ ^Fmr1mt33=^ + Fmrq + ^Fmr1mt,^ + Fmrq + ^Fmr1mt1.ntx;^ +__ ^Fmr1mt34=^ + Fmrq + ^Fmr1mt,^ + Fmrq + ^Fmr1mt1.ntx;^ +__ ^Fmr1mt35=^ + Fmrq + ^Fmr1mt,^ + Fmrq + ^Fmr1mt1.ntx;^ +__ ^Fmr1mt20=^ + Fmrq + ^Fmr1mt,^ + Fmrq + ^Fmr1mt1.ntx;^ +__ ^Fmr1mt21=^ + Fmrq + ^Fmr1mt,^ + Fmrq + ^Fmr1mt1.ntx;^ +__ ^gPointeu=^ + Gestion + ^Point,^ + Gestion + ^Point1.ntx;^ +__ ^gFmr1mab=^ + Gestion + ^Fmr1mab,^ + Gestion + ^Fmr1mab1.ntx;^ +__ ^gFmr1map=^ + Gestion + ^Fmr1map,^ + Gestion + ^Fmr1map1.ntx;^ +__ ^gFmr1mar=^ + Gestion + ^Fmr1mar,^ + Gestion + ^Fmr1mar1.ntx^;__

freitas
Posts: 68
Joined: Tue Oct 10, 2017 12:44 pm

=> RE: RelatedTablesString

Post by freitas » Mon Sep 09, 2002 9:19 am

I^m only guessing here, but I^ll bet you can not go over 254 characters in any one statement.

Marcelo_Alaggio_(Guest)
Posts: 15
Joined: Tue Oct 10, 2017 12:44 pm

=> Using the OCX

Post by Marcelo_Alaggio_(Guest) » Wed Sep 11, 2002 11:33 am

This is not a problem as long as you split the line before 256 car.

Yves_(Guest)
Posts: 14
Joined: Tue Oct 10, 2017 12:44 pm

==> RE: RelatedTablesString

Post by Yves_(Guest) » Thu Sep 12, 2002 7:08 am

Are you successfully using the OCX component within Delphi 5.0 ?__We tried to do so sometime ago and it failed.____Thanks.____Marcelo Alaggio.__Delphus Informatica.__Brazil__alaggio@delphus-inf.com.br

Yves_(Guest)
Posts: 14
Joined: Tue Oct 10, 2017 12:44 pm

==> RE: Using the OCX

Post by Yves_(Guest) » Thu Sep 12, 2002 7:28 am

I use the activeX in Delphi since several years now in many projet.__It work fine. Here I include a complete code example that you include in. You also have to drop the R&R activeX on the window.__This is an example of some of the most used Properties. You don^t have to set all this every time.__If you need more help ya@videotron.ca____procedure TFmMenu.ListeMembresBottin1Click(Sender: TObject);__ var LeFiltre: String;__begin__ rrReport.ReportName := ^C:ListeEleParSecteurCourt.rrw^;__ rrReport.MasterTable := Gestion + ^Fmr1ma.dbf^;__ rrReport.MasterIndex := Gestion + ^Fmr1ma4.ntx^;__ rrReport.RelatedTablesString :=^cFmr1ma=^ + Cumul + ^Fmr1ma,^ + Cumul + ^Fmr1ma1.ntx;^ +__ ^gFmr1ma=^ + Fmrq + ^Fmr1ma,^ + Fmrq + ^Fmr1ma1.ntx^;__ rrReport.GroupFieldsString := ^Resid->Permis;Stage->Stage^;__ rrReport.SortFieldsString := ^Resid->NomPrenom;Stage->Stage^;__ LeFiltre := ^Nom_elect <> ""^;__ rrReport.Filter := LeFiltre;__ rrReport.Query := 2; // Override__ rrReport.ParametersString := ^AuLong="1"^;__ rrReport.LowScope := ^R012312^;__ rrReport.HighScope := ^R012312^;__ rrReport.Scope := 2; // Override__ rrReport.WriteAllow := True;__ rrReport.Destination := 1; // Window__ rrReport.Action := 1;__end;__

Yves_(Guest)
Posts: 14
Joined: Tue Oct 10, 2017 12:44 pm

=> RE: RelatedTablesString

Post by Yves_(Guest) » Thu Sep 12, 2002 7:31 am

Finally, I think that there is a limitation of 10 relations, as state in the book, but, you can use only the Alias that will change instead of using all Alias in order as explain in the same book.

Post Reply