ViewVC Help
View File | Revision Log | Show Annotations | Download File | View Changeset | Root Listing
root/public/ibx/branches/udr/testsuite/Test3.pas
(Generate patch)

Comparing ibx/branches/udr/testsuite/Test3.pas (file contents):
Revision 395 by tony, Mon Jan 10 10:08:03 2022 UTC vs.
Revision 396 by tony, Thu Feb 17 11:57:23 2022 UTC

# Line 169 | Line 169 | begin
169    DPB.Add(isc_dpb_user_name).AsString := Owner.GetUserName;
170    DPB.Add(isc_dpb_password).AsString := Owner.GetPassword;
171    DPB.Add(isc_dpb_lc_ctype).AsString := CharSet;
172  DPB.Add(isc_dpb_set_db_SQL_dialect).AsByte := SQLDialect;
172  
173    writeln(OutFile,'Opening ',Owner.GetEmployeeDatabaseName);
174    Attachment := FirebirdAPI.OpenDatabase(Owner.GetEmployeeDatabaseName,DPB);

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines