SQLTABLES()

From Recital Documentation Wiki
Revision as of 16:15, 4 July 2011 by Yvonnemilne (Talk | contribs)

(diff) ← Older revision | Latest revision (diff) | Newer revision → (diff)
Jump to: navigation, search

Purpose

Store data source table names to a table


Syntax

SQLTABLES(<nStatementHandle>[, <cTableTypes>] [, <cCursorName>])


See Also

CREATE CONNECTION, SQLCANCEL(), SQLCOLUMNS(), SQLCOMMIT(), SQLCONNECT(), SQLDISCONNECT(), SQLERROR(), SQLEXEC(), SQLGETPROP(), SQLMORERESULTS(), SQLPREPARE(), SQLROLLBACK(), SQLSETPROP(), SQLSTRINGCONNECT()


Description

The SQLTABLES() function is used to store table name information for a specified connection to a table.

The SQLTABLES() function operates on the data source specified by <nStatementHandle>.


Keywords Description
nStatementHandle The workarea in which the gateway data source is open
cTableType The table type or types to include. ’TABLE’, ’VIEW’ and ’SYSTEM_TABLE’ are all valid table types. If cTableType is omitted or empty, all types of table are included
cCursorName The name of the table to create. If cCursorName is not specified, the default name SQLRESULT is used. The table column information is shown in the table below

cCursorName Table Columns:


Column Description
TABLE_QUALIFIER Table qualifier id
TABLE_OWNER Table owner id
TABLE_NAME Table name
TABLE_TYPE Table type
REMARKS Table description


Return values:

Return Value Description
1 The cursor was created successfully
0 SQLTABLES() still executing


Example

nStatHand=SQLSTRINGCONNECT("mysql@linux1:user1/pass1-database1.tcpip",.T.)
if nStatHand < 1
  dialog box [Could not connect]
else
  // Store names for all table types to default results table
  nTabEnd = SQLTABLES(nStatHand)
  if nTabEnd = 1
    select sqlresult
    browse
  endif
endif
 
nStatHand= SQLSTRINGCONNECT("mysql@linux1:user1/pass1-database1.tcpip",.T.)
if nStatHand < 1
  dialog box [Could not connect]
else
  // Store names for specified table types to specified results table
  nTabEnd = SQLTABLES(nStatHand, "’SYSTEM_TABLE’,’VIEW’", "myresults")
  if nTabEnd = 1
    select myresults
    browse
  endif
endif

Products

Recital, Recital Server