action getDatabases(
  string serviceId,
  string user,
  string password,
  action< string, sequence<Database> > callback)

action getDatabasesFull(
  string serviceId,
  string locationURL,
  string user,
  string password,
  dictionary<string,string> extraParams,
  action < string, sequence<Database> > callback)

event Database
{
  string shortName;
  string dbUrl;
  string description;
  dictionary<string,string> extraParams;
}

action handleAvailableServers(string error,
    sequence<com.apama.database.DataSource> results)
  {
    if error.length() != 0 then {
      log "Error occurred getting available data sources: " +
           error at ERROR;
    }
    else {
      if results.size() > 0 then {
        
        // Save off first service ID found.
        // Assumes first data source has at least one db
        if getDbServiceId() = "" then {
          dbServiceId := results[0].serviceId;
        }
        com.apama.database.DataSource ds;
        log " DataSources: " at INFO;
        for ds in results {
          log " " + ds.name + " - " + ds.serviceId at INFO;
        }
        log "Finding Databases ..." at INFO;

        for ds in results {
          adbc.getDatabases(ds.serviceId, USER, PASSWORD,
             handleAvailableDatabases);  
        }
      }
      else {
        log " No DataSources found" at INFO;
      }
    }    
  }

string dbName;

action handleAvailableDatabases(string error,
sequence<com.apama.database.Database> results)  
{
    if error.length() != 0 then {
      log "Error occurred getting available databases: " +
           error at ERROR;
    }
    else {
      if results.size() > 0 then {
        // Save name of first db found
        if getDbName() = "" then {
          dbName := results[0].shortName;
        }
        com.apama.database.Database db;
        log " Databases: ";
        for db in results {
          log " " + db.shortName + " - " +
              db.description + " - " + db.dbUrl at INFO;
        }

        // ... other logic...

      }
      else {
        log " No Databases found" at INFO;
      }
    }
  }