Takes no arguments; returns the number of connected databases as an INTEGER value.

Syntax

NUM-DBS

Example

This procedure uses NUM-DBS to display the logical name and database restrictions of all connected databases:

r-numdbs.p 

DEFINE VARIABLE ix AS INTEGER NO-UNDO.

REPEAT ix = 1 TO NUM-DBS:
  DISPLAY LDBNAME(ix) DBRESTRICTIONS(ix) FORMAT "x(40)".
END.

See also

ALIAS function, CONNECT statement, CONNECTED function, CREATE ALIAS statement, CREATE CALL statement, DATASERVERS function, DBCODEPAGE function, DBCOLLATION function, DBRESTRICTIONS function, DBTYPE function, DBVERSION function, DELETE ALIAS statement, DISCONNECT statement, FRAME-DB function, LDBNAME function, PDBNAME function, SDBNAME function