End User Reporting with Elevate DB

rbuser

I am using Delphi 2007 with RB Pro 11.03 and ElevateDB 2.02.

I am using daElevateDB to use produce an End User Reporting application
based on the demonstration program.

I can design a report and run the report. The procedure
TdaEDBSession.GetTableNames is called with the database name as a
parameter. Everything at this point is working.

However, if I then right click the report in the Report Design and
select "Design" from the popup menu and click either the "Tables",
"Fields", "Calcs" buttons from the "Data" tab, an error occurs.

The error occurs because the procedure TdaEDBSession.GetTableNames is
called with the database name set to an empty string instead of the
database name.

I have changed TdaEDBSession.GetDatabaseType so that the result is
dtElevateDB instead of dtNexusDB.

Richard Harding

nardmoseley

I researched this and we will update the plug-in and example for the next
maintenance release.

For now, make the following mods..

1. Update two methods in daElevateDB.pas

function TdaEDBSession.GetDatabaseType(const aDatabaseName: String):
TppDatabaseType;
begin
Result := dtElevateDB;

end;

function TdaEDBSession.ValidDatabaseTypes: TppDatabaseTypes;
begin
Result := [dtElevateDB];

end;

2. Update the ElevateDB Enduser example, myEURpt.pas.

a. Select the TppDesigner and use the object inspector to update the
DataSettings. First set the database type and then retype the database name.

Designer.DataSettings.DatabaseType := dtElevateDB
Designer.DataSettings.DatabaseName := 'euDatabase'

b. In the Form.OnCreate event-handler, delete the following line

// Delete this line
ppDesigner1.DataSettings.SessionType := 'ElevateDBSession';




--
Nard Moseley
Digital Metaphors
www.digital-metaphors.com

rbuser

Nard Moseley (Digital Metaphors) wrote:


Great - Thank you - It is working well.

Richard Harding