ViewVC Help
View File | Revision Log | Show Annotations | Download File | View Changeset | Root Listing
root/public/ibx/trunk/fbintf/IBUtils.pas
(Generate patch)
# Line 415 | Line 415
415   function QuoteIdentifierIfNeeded(Dialect: Integer; Value: AnsiString): AnsiString;
416   begin
417    if (Dialect = 3) and
418 <    (IsReservedWord(Value) or not IsSQLIdentifier(Value)) then
418 >    (IsReservedWord(Value) or not IsSQLIdentifier(Value) or (AnsiUpperCase(Value) <> Value)) then
419       Result := '"' + Value + '"'
420    else
421      Result := Value

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines