244 |
|
ibxeInterfaceNotSupported, |
245 |
|
ibxeCharacterSetExists, |
246 |
|
ibxeUnknownUserCharSet, |
247 |
< |
ibxeUninitializedInputParameter |
247 |
> |
ibxeUninitializedInputParameter, |
248 |
> |
ibxeNegativeGenerator |
249 |
|
); |
250 |
|
|
251 |
|
function GetErrorMessage(ErrMess: TIBClientError): AnsiString; |
445 |
|
SCharacterSetExists = 'Character set "%s" is already defined'; |
446 |
|
SUnknownUserCharSet = 'Unknown user character set "%s"'; |
447 |
|
SUninitializedInputParameter = 'SQL Param No. %d (%s) is uninitialised'; |
448 |
+ |
SNegativeGenerator = 'A Generator Increment cannot be negative'; |
449 |
|
|
450 |
|
const |
451 |
|
IBErrorMessages: array[TIBClientError] of string = ( |
612 |
|
SInterfaceNotSupported, |
613 |
|
SCharacterSetExists, |
614 |
|
SUnknownUserCharSet, |
615 |
< |
SUninitializedInputParameter |
615 |
> |
SUninitializedInputParameter, |
616 |
> |
SNegativeGenerator |
617 |
|
); |
618 |
|
|
619 |
|
function GetErrorMessage(ErrMess: TIBClientError): AnsiString; |