Provide a GET SQL OBJECT TYPE for IBM i Objects API

We need a way to pass in an IBM i object and return a value that indicates (A) The SQL Object Type and (B) whether or not is is an SQL Object.

Effectively this would allow us to check if the object is an SQL object and obtain its SQL Object Type. For example, if a user provides a Data Area Name, we'd like to know by passing that name into this API that it is an SQL SEQUENCE or just a regular data area. In the latest builds of OBJECT_STATISTICS this information is available, however a one-object API is what's called for, for better HLL usage and less overhead.

A user (programmer, end-user etc.) passes in the name of an object, the application calls this API to determine if (A) The Object Exists, and (B) What the SQL Object Type is for the object.
Here's an example in RPG IV of calling it:

dcl-ds rtnInfo Qualified Inz;
object_found char(1);
isSQLObject char(1);
rtnLib char(10);
rtnObjType char(10);
sqlType char(32);
long_object_name char(128);
long_schema_Name char(128);
end-ds;


dcl-ds Object Qualified;
name char(10);
library char(10);
end-ds
dcl-s OBJTYPE char(10);
object.name = 'ORDERS';
object.library = 'QGPL';
objType = '*DTAARA';

call QSQRSOT( rtnInfo : object : objtype);

if (rtnInfo.object_found = '1'); // Object Located!
if (rtnInfo.isSQLObject = '1'); // It is an SQL Object!
if (rtnInfo.SQLType = 'SEQUENCE');
values next value...
endif
endif;
endif;


As you can see from the returned data structure, the SQL name and schema along with the Object Type would be returned, in addition to the Exists flag, and the Is_SQL_Object flag and SQLType.