LDBNAME function

LDBNAME function

Returns the logical name of a database that is currently connected.

Syntax
LDBNAME 
  ( 
    {   integer-expression 
      | logical-name 
      | alias 
      | BUFFER bufname 
    } 
  ) 
integer-expression

The sequence number of a database the ABL session is connected to. For example, LDBNAME(1) returns information on the first database the ABL session is connected to, LDBNAME(2) returns information on the second database the ABL session is connected to, etc. If you specify a sequence number that does not correspond to a database the ABL session is connected to, the LDBNAME function returns the Unknown value (?).

logical-name or alias

These forms of the LDBNAME function require a quoted character string or a character expression as a parameter. If the parameter is the logical name of a connected database or an alias of a connected database then the logical name is returned. Otherwise, the AVM returns the Unknown value (?).

BUFFER bufname

The name of a database table or buffer. The BUFFER option lets you determine the database a certain table belongs to without hard-coding the logical database name or alias.

Example

This procedure disconnects all currently connected databases. After a database is disconnected, the connected databases are renumbered to reflect the change. For example, if databases 1, 2, 3, and 4, are connected and the procedure disconnects database 3, database 4 becomes database 3.
r-ldbnm.p
DO WHILE LDBNAME(1) <> ? : /* the parameter. is the number 1 */ 
  DISCONNECT VALUE(LDBNAME(1)). 
END. 
Note

To determine if a particular name is an ALIAS or a logical database name, use the following procedure:
r-tstnm.p
DEFINE VARIABLE testnm AS CHARACTER NO-UNDO. 
SET testnm. 
IF LDBNAME(testnm) = testnm THEN  
  MESSAGE testnm "is a true logical database name.". 
ELSE IF LDBNAME(testnm) = ? THEN  
  MESSAGE testnm "is not the name or alias of any connected database.". 
ELSE  
  MESSAGE testnm "is an ALIAS for database " LDBNAME(testnm). 
See also

CONNECT statement, CONNECTED function, CREATE ALIAS statement, DBCODEPAGE function, DBCOLLATION function, DBRESTRICTIONS function, DBTYPE function, DELETE ALIAS statement, DISCONNECT statement, FRAME-DB function, NUM-DBS function, PDBNAME function

LDBNAME ( { `integer-expression` \| `logical-name` \| `alias` \| BUFFER `bufname` } )

r-ldbnm.p
DO WHILE LDBNAME(1) <> ? : /* the parameter. is the number 1 */ DISCONNECT VALUE(LDBNAME(1)). END.

r-tstnm.p
DEFINE VARIABLE testnm AS CHARACTER NO-UNDO. SET testnm. IF LDBNAME(testnm) = testnm THEN MESSAGE testnm "is a true logical database name.". ELSE IF LDBNAME(testnm) = ? THEN MESSAGE testnm "is not the name or alias of any connected database.". ELSE MESSAGE testnm "is an ALIAS for database " LDBNAME(testnm).

OpenEdge Release 10.2B