get-dbname-list procedure

Gets list of connected databases with auditing enabled by calling src/auditing/_get-db-list.p. It also handles cases where the database is on the AppServer, if there is a connection to an AppServer. The list contains entries separated by the value of CHR(1). Each entry contains the logical database name. It may also contain additional information such as "read-only" or "appserver". List of possible entries is defined in src/auditing/include/_aud-std.i.

Parameters:

OUTPUT pcList AS CHARACTER

List of databases, each database separated by the value of CHR(1).

Example:

{auditing/include/_aud-utils.i}

DEFINE VARIABLE cdbInfo AS CHARACTER NO-UNDO.
DEFINE VARIABLE cList   AS CHARACTER NO-UNDO.
DEFINE VARIABLE iLoop   AS INTEGER   NO-UNDO.

RUN get-dbname-list IN hAuditUtils (OUTPUT cList).

DO iLoop = 1 TO NUM-ENTRIES(cList, CHR(1)):
  ASSIGN cdbInfo = ENTRY(iLoop, cList, CHR(1)).
END.