| 142 |
|
ibxeTokenQueueUnderflow, |
| 143 |
|
ibxErrorParsing, |
| 144 |
|
ibxeDLInfoError, |
| 145 |
< |
ibxeDifferentAPIs |
| 145 |
> |
ibxeDifferentAPIs, |
| 146 |
> |
ibxeInvalidDateTimeStr, |
| 147 |
> |
ibxeBadTimeZoneID, |
| 148 |
> |
ibxeBadBCDConversion, |
| 149 |
> |
ibxeBadTimeZoneName, |
| 150 |
> |
ibxeTimeZoneUnknown, |
| 151 |
> |
ibxeBadTimeSpecification, |
| 152 |
> |
ibxeBCDTooBig, |
| 153 |
> |
ibxeInvalidTimeZoneID, |
| 154 |
> |
ibxeBadTimestampOrNoTimeZoneDBEntry, |
| 155 |
> |
ibxeBCDOverflow, |
| 156 |
> |
ibxeNoTimezoneSupport, |
| 157 |
> |
ibxeDecFloatNotSupported, |
| 158 |
> |
ibxeInt128NotSupported, |
| 159 |
> |
ibxeUnknownParamTypeName, |
| 160 |
> |
ibxInvalidQueryAction, |
| 161 |
> |
ibxeSQLTypeUnchangeable, |
| 162 |
> |
ibxeCannotIncreaseMetadatasize, |
| 163 |
> |
ibxeBatchModeNotSupported, |
| 164 |
> |
ibxeNotInBatchMode, |
| 165 |
> |
ibxeInBatchMode, |
| 166 |
> |
ibxeInvalidBatchQuery, |
| 167 |
> |
ibxeBatchRowBufferOverflow, |
| 168 |
> |
ibxeBatchBufferSizeTooBig, |
| 169 |
> |
ibxeNoScrollableCursors, |
| 170 |
> |
ibxeUnableTosetaTextType, |
| 171 |
> |
ibxeCantDropAcquiredDB, |
| 172 |
> |
ibxeTransactionNotOwned, |
| 173 |
> |
ibxeIntegerOverflow, |
| 174 |
> |
ibxIntegerUnderflow, |
| 175 |
> |
ibxeScaleCannotBeChanged, |
| 176 |
> |
ibxeStringOverflow |
| 177 |
|
); |
| 178 |
|
|
| 179 |
|
function GetErrorMessage(ErrMess: TIBClientError): AnsiString; |
| 190 |
|
STrue = 'true'; |
| 191 |
|
SFalse = 'false'; |
| 192 |
|
SArray = '(array)'; |
| 193 |
+ |
SBatchCompletionError = 'Error Processing update/insert batch on row number %d - '; |
| 194 |
|
|
| 195 |
|
implementation |
| 196 |
|
|
| 212 |
|
SSQLClosed = 'IBSQL Closed'; |
| 213 |
|
SUnknownSQLDataType = 'Unknown SQL Data type (%d)'; |
| 214 |
|
SInvalidColumnIndex = 'Invalid column index (index exceeds permitted range)'; |
| 215 |
< |
SInvalidDataConversion = 'Invalid data conversion'; |
| 215 |
> |
SInvalidDataConversion = 'Invalid data conversion from %s'; |
| 216 |
|
SBlobCannotBeRead = 'Blob stream cannot be read'; |
| 217 |
|
SBlobCannotBeWritten = 'Blob stream cannot be written'; |
| 218 |
|
SBlobNotOpen = 'The Blob is not open'; |
| 267 |
|
SErrorParsing = 'Error parsing SQL Statement at clause starting with %s'; |
| 268 |
|
SDLInfoError = 'dlinfo returned error - %s'; |
| 269 |
|
SDifferentAPIs = 'All transaction attachments must use the same Firebird Library'; |
| 270 |
+ |
SInvalidDateTimeStr = '%s is not a valid Date/Time string'; |
| 271 |
+ |
SBadTimeZoneID = 'Invalid Time Zone ID (%d,%d)'; |
| 272 |
+ |
SBadBCDConversion = 'Conversion to BCD failed'; |
| 273 |
+ |
SBadTimeZoneName = 'Invalid Time Zone Name "%s"'; |
| 274 |
+ |
STimeZoneUnknown = 'Time Zone Unknown'; |
| 275 |
+ |
SBadTimeSpecification = '%d:%d:%d.%d is not a valid time specification'; |
| 276 |
+ |
SBCDTooBig = 'BCD Precision (%d) is too large for Firebird Data Type max precision (%d)'; |
| 277 |
+ |
SInvalidTimeZoneID = 'Invalid Time Zone ID (%d)'; |
| 278 |
+ |
SBadTimestampOrNoTimeZoneDBEntry = 'Bad Timestamp or missing time zone DB entry (%s) TZ ID = %d'; |
| 279 |
+ |
SBCDOverflow = 'BCD Precision too large for Firebird data type,[%s]'; |
| 280 |
+ |
SNoTimezoneSupport = 'TIME/TIMESTAMP WITH TIME ZONE data type not supported'; |
| 281 |
+ |
SDecFloatNotSupported = 'DecFloat Data Type not supported'; |
| 282 |
+ |
SInt128NotSupported = 'INT128 Data Type not supported'; |
| 283 |
+ |
SUnknownParamTypeName = '%s:Unknown Param Type Name "%s"'; |
| 284 |
+ |
SInvalidQueryAction = 'Query Action only valid for an Update or Insert Query'; |
| 285 |
+ |
SSQLTypeUnchangeable = 'Cannot change SQL Type from %s to %s'; |
| 286 |
+ |
SCannotIncreaseMetadatasize = 'Cannot increase Metadata size from %d to %d'; |
| 287 |
+ |
SBatchModeNotSupported = 'Batch Mode is not available. Firebird 4 or later client and server is required'; |
| 288 |
+ |
SNotInBatchMode = 'Not in Batch Mode - have you called AddToBatch?'; |
| 289 |
+ |
SInBatchMode = 'Invalid Operation: a Batch is pending'; |
| 290 |
+ |
SInvalidBatchQuery = 'This query type (%s) cannot be batched'; |
| 291 |
+ |
SBatchRowBufferOverflow = 'Adding Row No. %d - batch buffer size limit (%d bytes) exceeded'; |
| 292 |
+ |
SBatchBufferSizeTooBig = 'Requested Batch Buffer Size (%d bytes) exceeds 256MB limit'; |
| 293 |
+ |
SNoScrollableCursors = 'Scrollable cursors are not supported'; |
| 294 |
+ |
SUnableTosetaTextType = 'Param[%d] "%s": Unable to change from a %s to a string type'; |
| 295 |
+ |
SCantDropAcquiredDB = 'Drop database not allowed by acquired attachment'; |
| 296 |
+ |
STransactionNotOwned = 'Cannot Commit or Rollback a linked transaction'; |
| 297 |
+ |
SIntegerOverflow = 'Integer overflow when scaling numeric'; |
| 298 |
+ |
SIntegerUnderflow = 'Integer underflow when scaling numeric'; |
| 299 |
+ |
SScaleCannotBeChanged = 'Unable to change numeric field scale'; |
| 300 |
+ |
SStringOverflow = 'String overflow. String Length %d exceeds permitted maximum (%d)'; |
| 301 |
|
|
| 302 |
|
const |
| 303 |
|
IBErrorMessages: array[TIBClientError] of string = ( |
| 367 |
|
STokenQueueUnderflow, |
| 368 |
|
SErrorParsing, |
| 369 |
|
SDLInfoError, |
| 370 |
< |
SDifferentAPIs |
| 370 |
> |
SDifferentAPIs, |
| 371 |
> |
SInvalidDateTimeStr, |
| 372 |
> |
SBadTimeZoneID, |
| 373 |
> |
SBadBCDConversion, |
| 374 |
> |
SBadTimeZoneName, |
| 375 |
> |
STimeZoneUnknown, |
| 376 |
> |
SBadTimeSpecification, |
| 377 |
> |
SBCDTooBig, |
| 378 |
> |
SInvalidTimeZoneID, |
| 379 |
> |
SBadTimestampOrNoTimeZoneDBEntry, |
| 380 |
> |
SBCDOverflow, |
| 381 |
> |
SNoTimezoneSupport, |
| 382 |
> |
SDecFloatNotSupported, |
| 383 |
> |
SInt128NotSupported, |
| 384 |
> |
SUnknownParamTypeName, |
| 385 |
> |
SInvalidQueryAction, |
| 386 |
> |
SSQLTypeUnchangeable, |
| 387 |
> |
SCannotIncreaseMetadatasize, |
| 388 |
> |
SBatchModeNotSupported, |
| 389 |
> |
SNotInBatchMode, |
| 390 |
> |
SInBatchMode, |
| 391 |
> |
SInvalidBatchQuery, |
| 392 |
> |
SBatchRowBufferOverflow, |
| 393 |
> |
SBatchBufferSizeTooBig, |
| 394 |
> |
SNoScrollableCursors, |
| 395 |
> |
SUnableTosetaTextType, |
| 396 |
> |
SCantDropAcquiredDB, |
| 397 |
> |
STransactionNotOwned, |
| 398 |
> |
SIntegerOverflow, |
| 399 |
> |
SIntegerUnderflow, |
| 400 |
> |
SScaleCannotBeChanged, |
| 401 |
> |
SStringOverflow |
| 402 |
|
); |
| 403 |
|
|
| 404 |
|
function GetErrorMessage(ErrMess: TIBClientError): AnsiString; |
| 412 |
|
Format(GetErrorMessage(ErrMess), Args)); |
| 413 |
|
end; |
| 414 |
|
|
| 415 |
+ |
|
| 416 |
|
end. |
| 417 |
|
|
