ViewVC Help

View File | Revision Log | Show Annotations | Download File | View Changeset | Root Listing

root/public/ibx/trunk/runtime/nongui/IBExtract.pas

Comparing ibx/trunk/runtime/nongui/IBExtract.pas (file contents):
Revision 318 by tony, Thu Feb 25 11:56:36 2021 UTC vs.
Revision 319 by tony, Thu Feb 25 12:05:40 2021 UTC

#	Line 240 | Line 240 | const
240		(SqlType : blr_bool; TypeName : 'BOOLEAN'),
241		(SqlType : blr_dec64; TypeName : 'DECFLOAT'),
242		(SqlType : blr_dec128; TypeName : 'DECFLOAT'),
243	<	(SqlType : blr_int128; TypeName : 'NUMERIC'),
243	>	(SqlType : blr_int128; TypeName : 'INT128'),
244		(SqlType : blr_sql_time_tz; TypeName : 'TIME WITH TIME ZONE'),
245		(SqlType : blr_timestamp_tz; TypeName : 'TIMESTAMP WITH TIME ZONE')
246		);
#	Line 3750 | Line 3750 | begin
3750		if (FieldType = blr_int128) and (FieldScale < 0) then
3751		Result :=  Format('NUMERIC(38, %d)', [-FieldScale])
3752		else
3753	–	if FieldType = blr_int128 then
3754	–	Result := 'INT128'
3755	–	else
3753		Result :=  TypeName;
3754		end;
3755

Diff Legend

–	Removed lines
+	Added lines
<	Changed lines
>	Changed lines