get-complete-dbname-list procedure

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

Parameters:

OUTPUT pcList AS CHARACTER

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

Example:

{auditing/include/_aud-utils.i}

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

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

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