A script-enabled browser is required for this page to function properly.

EXEC_SQL.CURR_CONNECTION built-in function

This function returns a connection handle that uses the same database connection originally established by Reports Builder. EXEC_SQL.Default_Connection replaces EXEC_SQL.CURR_CONNECTION.

Syntax


FUNCTION EXEC_SQL.CURR_CONNECTION
RETURN EXEC_SQL.CONNTYPE;

Returns

A handle to the primary connection.

Usage notes

Use EXEC_SQL.DEFAULT_CONNECTION in place of EXEC_SQL.CURR_CONNECTION. For backward compatibility, EXEC_SQL.CURR_CONNECTION is still supported.

Example


/* 
** This example illustrates the use of 
** EXEC_SQL.Default_Connection and 
** EXEC_SQL.Curr_Connection.
*/
PROCEDURE esdefaultcon2 IS
 connection_id EXEC_SQL.CONNTYPE;
  bIsConnected BOOLEAN;
  cursorID EXEC_SQL.CURSTYPE;
 sqlstr VARCHAR2(1000);
 nIgn PLS_INTEGER;
 nRows PLS_INTEGER := 0;
 nTimes PLS_INTEGER := 0;
 mynum NUMBER;

BEGIN
-- 
-- obtain the default connection and check that it is valid
--
  connection_id := EXEC_SQL.DEFAULT_CONNECTION;
  bIsConnected := EXEC_SQL.IS_CONNECTED;
 IF bIsConnected = FALSE THEN
  TEXT_IO.PUT_LINE('No primary connection. Please connect before retrying.');
 RETURN;
END IF;
--
-- subsequent calls to EXEC_SQL.Open_Cursor, EXEC_SQL.Parse, EXEC_SQL.Define_Column,
-- EXEC_SQL.Execute, EXEC_SQL.Fetch_Rows, EXEC_SQL.Column_Value,
-- EXEC_SQL.Close_Cursor, EXEC_SQL.Close_Connection all use this connection
-- implicitly from the cache
--
 cursorID := EXEC_SQL.OPEN_CURSOR;
 sqlstr := 'select empno from emp';
  EXEC_SQL.PARSE(cursorID, sqlstr, exec_sql.V7);
  EXEC_SQL.DEFINE_COLUMN(cursorID, 1, mynum);
 nIgn := EXEC_SQL.EXECUTE(cursorID);
LOOP
  IF (EXEC_SQL.FETCH_ROWS(cursorID) > 0) THEN
   EXEC_SQL.COLUMN_VALUE(cursorID, 1, mynum);
 ...
 ELSE
 exit;
 END IF;
END LOOP;
  EXEC_SQL.CLOSE_CURSOR(cursorID);
 EXEC_SQL.CLOSE_CONNECTION;
END;

See also

About the EXEC_SQL built-in package

EXEC_SQL built-in package