select versionnumber, version_timestamp from sysibm.sysversions;

select user from sysibm.sysdummy1;
select session_user from sysibm.sysdummy1;

SELECT foo FROM bar fetch first 1 rows only;

SELECT SUBSTR(’abc’,2,1) FROM sysibm.sysdummy1;  — returns b

Normal “–” and C-style /**/ comments are allowed:
select 123; — sdfjsdlkfj
select 123; /* sdfsdf */ 

Not via DBI in PERL.  Subsequent statements seem to get ignored:
select blah from table where foo = 1; select … doesn’t matter this is ignored. 

select top 10 blah from table;
select first 10 blah form table; 

Astoundingly, this doesn’t seem to be possible!

select table_name, table_owner from iitables;
select relid, relowner, relloc from iirelation;
select relid, relowner, relloc from iirelation where relowner != ‘$ingres’; 

First connect to iidbdb, then:
select name, password from iiuser; 

No.  You don’t need to select form “dual” or anything.  The following is legal:
select 1; 

Yes.  Nothing tricky here.  The following is legal:
select 1 union select 2; 

select dbmsinfo(’db_admin’);
select dbmsinfo(’create_table’);
select dbmsinfo(’create_procedure’);
select dbmsinfo(’security_priv’);
select dbmsinfo(’select_syscat’);
select dbmsinfo(’db_privileges’);
select dbmsinfo(’current_priv_mask’);

The function “bit_and” exists, but seems hard to use.  Here’s an
example of ANDing 3 and 5 together.  The result is a “byte” type
with value \001:

select substr(bit_and(cast(3 as byte), cast(5 as byte)),1,1);

First you need to connect to iidbdb, then:
select roleid, rolepass from iirole;

First you need to connect to iidbdb, then:
select dbp_name,  dbp_owner from iiprocedure;

First you need to connect to iidbdb, then:
create user pm with password = ‘password’;
grant all on current installation to pm;