Can you get the name of the DB you are currently connected to in SQL?

[Fooch]

I have a program with a lot of SQL connections in it and although I know how to open, close, use, change, etc. I can't find a way to pull the DB name I am currently connected to. I have a service program with a log procedure in it that does SQL connects. What I want to do is when the "logger" is called I want to check the current SQL connection, then reset it, do my logging and change the connection back to what it was before leaving the logger. Is there a was in embedded SQL to get the DataBase name that I am connected to?

 

[mikrom]

On AS/400 the database name is IBM DB/2 UDB. Do you mean the table names on which your SQL Statements operates?

 

[mikrom]

Or did you mean the library?

There is a command PRTSQLINF, which prints some SQL info.

 

[Mercury2]

Is there a was in embedded SQL to get the DataBase name that I am connected to?

d CurrentServer       s         18a   Varying
 /free
  exec sql Set :CurrentServer = CURRENT SERVER;

 

[flapeyre]

Using STRSQL:

SELECT current server FROM sysibm/sysdummy1

returns the server name (i.e., the machine).

Nullum gratuitum prandium.
--Sleipinir214