Difference between revisions of "SQLERROR()"

From Lianjapedia
Jump to: navigation, search
Line 25: Line 25:
 
==Example==
 
==Example==
 
<code lang="recital">
 
<code lang="recital">
nStatHand=SQLCONNECT("awhr")
+
nStatHand=sqlconnect("awhr")
 
if nStatHand < 1
 
if nStatHand < 1
 
messagebox("Cannot make connection", 16, "SQL Connect Error")
 
messagebox("Cannot make connection", 16, "SQL Connect Error")
 
else
 
else
 
messagebox("Connection made", 48, "SQL Connect Message")
 
messagebox("Connection made", 48, "SQL Connect Message")
SQLEXEC(nStatHand,"create table doc1 (ACCOUNT_NO char(5), lastname char(25), balance dec(10,2))")
+
sqlexec(nStatHand,"create table doc1 (account_no char(5), lastname char(25), balance dec(10,2))")
 
messagebox("Table created")
 
messagebox("Table created")
 
m_accno =  "00699"
 
m_accno =  "00699"
 
m_lastname = "Smith"
 
m_lastname = "Smith"
 
m_balance = 12345.67
 
m_balance = 12345.67
SQLEXEC(nStatHand,"INSERT INTO dbo.doc1 (ACCOUNT_NO,lastname,balance) VALUES ('&m_accno','&m_lastname',&m_balance)")
+
sqlexec(nStatHand,"insert into dbo.doc1 (account_no,lastname,balance) VALUES ('&m_accno','&m_lastname',&m_balance)")
nRET=SQLEXEC(nStatHand,"SELECT * from dbo.doc1","mycursor")
+
messagebox("Record inserted")
if nRET = -1
+
nRet = sqlexec(nStatHand,"select * from dbo.doc1","mycursor")
 +
if nRet = -1
 
messagebox(sqlerror(nstatHand))
 
messagebox(sqlerror(nstatHand))
 
else
 
else
Line 43: Line 44:
 
list
 
list
 
endif
 
endif
SQLDISCONNECT(nStatHand)
+
// Using prepared statement
 +
sqlprepare(nStatHand,"select * from dbo.doc1 where account_no = ?m_accno","mycursor")
 +
nRet = sqlexec(nStatHand)
 +
if nRet < 1
 +
messagebox(sqlerror(nstatHand))
 +
else
 +
messagebox("Record selected using prepared statement")
 +
list
 +
endif
 +
sqldisconnect(nStatHand)
 
endif
 
endif
 
</code>
 
</code>

Revision as of 09:54, 7 January 2013

Purpose

Function to return the error message for the last remote data connection error

Syntax

SQLERROR(<nStatementHandle>)

See Also

SQLCANCEL(), SQLCOLUMNS(), SQLCOMMIT(), SQLCONNECT(), SQLDISCONNECT(), SQLEXEC(), SQLGETPROP(), SQLMORERESULTS(), SQLPREPARE(), SQLROLLBACK(), SQLSETPROP(), SQLSTRINGCONNECT(), SQLTABLES()

Description

The SQLERROR() function is used to return the error message for the last remote data connection error.

The SQLERROR() function operates on the data source specified by <nStatementHandle>, which must be an active remote data connection handle.

Keywords Description
nStatementHandle The workarea in which the gateway data source is open.

Return values:

The SQLERROR() function returns a character string containing the descriptive message for the last error.

Example

nStatHand=sqlconnect("awhr")
if nStatHand < 1
	messagebox("Cannot make connection", 16, "SQL Connect Error")
else
	messagebox("Connection made", 48, "SQL Connect Message")
	sqlexec(nStatHand,"create table doc1 (account_no char(5), lastname char(25), balance dec(10,2))")
	messagebox("Table created")
	m_accno =  "00699"
	m_lastname = "Smith"
	m_balance = 12345.67
	sqlexec(nStatHand,"insert into dbo.doc1 (account_no,lastname,balance) VALUES ('&m_accno','&m_lastname',&m_balance)")
	messagebox("Record inserted")
	nRet = sqlexec(nStatHand,"select * from dbo.doc1","mycursor")
	if nRet = -1
		messagebox(sqlerror(nstatHand))
	else
		messagebox("Record selected")
		list
	endif
	// Using prepared statement
	sqlprepare(nStatHand,"select * from dbo.doc1 where account_no = ?m_accno","mycursor")
	nRet = sqlexec(nStatHand)
	if nRet < 1
		messagebox(sqlerror(nstatHand))
	else
		messagebox("Record selected using prepared statement")
		list
	endif
	sqldisconnect(nStatHand)
endif