If I create the following objects:
Code: Select all
drop table TBL_WITH_FLOAT_SUBTYPE purge; drop type T_FLOAT_DATA; CREATE OR REPLACE TYPE T_FLOAT_DATA Authid current_user AS object ( minx float(64), miny float(64) ); / CREATE TABLE TBL_WITH_FLOAT_SUBTYPE ( A NUMBER, B NUMBER, C NUMBER, FLOAT_DATA T_FLOAT_DATA ); Insert into TBL_WITH_FLOAT_SUBTYPE (A, B, C, FLOAT_DATA ) Values (1, 2, 3, T_FLOAT_DATA (1,2)); COMMIT;
I have discovered that if I edit TOraType.DescribeAttribute, in OraObjects.pas, adding "SQLT_FLT," right before OCI_TYPECODE_INTEGER in the case statement, then the problem goes away.
Is this the correct solution? If so, please include it in the next version. If not, please let me know what the correct solution is. Thank you.