# | 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); |
– | Removed lines |
+ | Added lines |
< | Changed lines |
> | Changed lines |