Difference between revisions of "SQLCOMMIT()"

From Recital Documentation Wiki
Jump to: navigation, search
Line 48: Line 48:
 
         messagebox("Manual Transactions enabled")
 
         messagebox("Manual Transactions enabled")
 
     else
 
     else
         messagebox("Unable to enable Manual Transactions. Continue?)
+
         if messagebox("Unable to enable Manual Transactions",36,"Continue?") = 6
        if lastkey() <> 89
+
 
             SQLDISCONNECT(nStatHand)
 
             SQLDISCONNECT(nStatHand)
 
             return
 
             return
Line 56: Line 55:
 
     nRET=SQLEXEC(nStatHand,"INSERT INTO example (ACCOUNT_NO, TITLE, LAST_NAME, FIRST_NAME, INITIAL, STREET, CITY, STATE, ZIP, LIMIT, START_DATE) VALUES ('00200','Mr','Doe','John','L','1 High Street','Beverly','MA','01916', 12000, {05/12/2003})")
 
     nRET=SQLEXEC(nStatHand,"INSERT INTO example (ACCOUNT_NO, TITLE, LAST_NAME, FIRST_NAME, INITIAL, STREET, CITY, STATE, ZIP, LIMIT, START_DATE) VALUES ('00200','Mr','Doe','John','L','1 High Street','Beverly','MA','01916', 12000, {05/12/2003})")
 
     if SQLGETPROP(nStatHand, "Transactions") = 2
 
     if SQLGETPROP(nStatHand, "Transactions") = 2
         messagebox("Commit Insert?")
+
         if messagebox("Commit Insert?",36,"Transaction") = 6
        if lastkey() = 89
+
 
             messagebox("SQLCOMMIT() returned " + etos(SQLCOMMIT(nStatHand)))
 
             messagebox("SQLCOMMIT() returned " + etos(SQLCOMMIT(nStatHand)))
 
         else
 
         else

Revision as of 14:17, 27 August 2010

Purpose

Commit a transaction


Syntax

SQLCOMMIT(<nStatementHandle>)


See Also

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

Description

The SQLCOMMIT() function is used to commit a transaction. The SQLCOMMIT() function is only required when Manual Transactions are in effect. The Transactions setting, set using SQLSETPROP(), can be either Automatic (1) or Manual (2). Manual Transactions can be can be rolled back using the SQLROLLBACK() function.

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


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


Return values:

Return Value Description
1 SQL statement was committed successfully
–1 Error occurred


Example

nStatHand=SQLSTRINGCONNECT("rec@rec1:user1/pass1-southwind.tcpip",.T.)
if nStatHand < 1
    messagebox("Cannot make connection", 16, "SQL Connect Error")
else
    messagebox("Connection made", 48, "SQL Connect Message")
    nSetEnd = SQLSETPROP(nStatHand,"Transactions",2)
    if nSetEnd = 1
        messagebox("Manual Transactions enabled")
    else
        if messagebox("Unable to enable Manual Transactions",36,"Continue?") = 6
            SQLDISCONNECT(nStatHand)
            return
        endif
    endif
    nRET=SQLEXEC(nStatHand,"INSERT INTO example (ACCOUNT_NO, TITLE, LAST_NAME, FIRST_NAME, INITIAL, STREET, CITY, STATE, ZIP, LIMIT, START_DATE) VALUES ('00200','Mr','Doe','John','L','1 High Street','Beverly','MA','01916', 12000, {05/12/2003})")
    if SQLGETPROP(nStatHand, "Transactions") = 2
        if messagebox("Commit Insert?",36,"Transaction") = 6
            messagebox("SQLCOMMIT() returned " + etos(SQLCOMMIT(nStatHand)))
        else
            messagebox("SQLROLLBACK() returned " + etos(SQLROLLBACK(nStatHand)))
        endif
    endif
    nSetEnd = SQLSETPROP(nStatHand, "Transactions",1)
    if nSetEnd = 1
        messagebox("Automatic Transactions enabled")
    else
        messagebox("Unable to enable Automatic Transactions.")
    endif
endif
SQLDISCONNECT(nStatHand)


Products

Recital, Recital Server