Difference between revisions of "TABLEREVERT()"

From Lianjapedia
Jump to: navigation, search
m (Text replace - "Recital" to "Lianja")
Line 1: Line 1:
 
==Purpose==
 
==Purpose==
 
Function to discard changes and restore OLDVAL() or currect disk data during buffered processing  
 
Function to discard changes and restore OLDVAL() or currect disk data during buffered processing  
 
  
 
==Syntax==
 
==Syntax==
 
TABLEREVERT(<expL> | <expN> [, <workarea | alias>])
 
TABLEREVERT(<expL> | <expN> [, <workarea | alias>])
 
  
 
==See Also==
 
==See Also==
 
[[CURSORGETPROP()]], [[CURSORSETPROP()]], [[CURVAL()]], [[GETFLDSTATE()]], [[OLDVAL()]], [[TABLEUPDATE()]], [[SETFLDSTATE()]]
 
[[CURSORGETPROP()]], [[CURSORSETPROP()]], [[CURVAL()]], [[GETFLDSTATE()]], [[OLDVAL()]], [[TABLEUPDATE()]], [[SETFLDSTATE()]]
 
  
 
==Description==
 
==Description==
Line 15: Line 12:
  
 
If the optional <workarea | alias> is specified, then the function will operate in the required location.  
 
If the optional <workarea | alias> is specified, then the function will operate in the required location.  
 
  
 
==Example==
 
==Example==
Line 60: Line 56:
 
?
 
?
 
</code>
 
</code>
 
  
 
==Products==
 
==Products==

Revision as of 11:16, 12 December 2012

Purpose

Function to discard changes and restore OLDVAL() or currect disk data during buffered processing

Syntax

TABLEREVERT(<expL> | <expN> [, <workarea | alias>])

See Also

CURSORGETPROP(), CURSORSETPROP(), CURVAL(), GETFLDSTATE(), OLDVAL(), TABLEUPDATE(), SETFLDSTATE()

Description

The TABLEREVERT() function is used to discard changes and restore OLDVAL() or currect disk data during buffered processing. If <expL> is .T. or <expN> 1 (True), TABLEREVERT() applies to all rows. If <expL> is .F. or <expN> 0 (False), TABLEREVERT() only applies to the current row.

If the optional <workarea | alias> is specified, then the function will operate in the required location.

Example

close databases
clear
set exclusive off
open database southwind
use customers
// Set to known value before start
replace customerid with "ALFKI"
 
cursorsetprop("Buffering", 5, "customers")
messagebox("Buffering set to " +etos(cursorgetprop("Buffering")))
 
? "Original customerid value: " + customerid
? "Curval(): " + curval("customerid")
? "Oldval(): " + oldval("customerid")
? "Fieldstate at start: " + getfldstate("customerid")
 
replace customerid WITH "RECIT"
 
// Alter in another session
! recital -c "update southwind\!customers set customerid = 'MULTI' where recno() = 1"
? "Someone else just updated the record!"
? "New customerid value: " +  customerid 
? "Curval(): " + curval("customerid")
? "Oldval(): " + oldval("customerid")
? "Fieldstate after replace: " + getfldstate("customerid")
tablerevert(.T.)
 
? "Reverted customerid value: " +  customerid
? "Curval(): " + curval("customerid")
? "Oldval(): " + oldval("customerid")
? "Fieldstate after revert: " + getfldstate("customerid")
 
replace customerid WITH "RECIT"
? "New customerid value: " +  customerid 
tableupdate(.T.)
? "Updated customerid value: " +  customerid
? "Curval(): " + curval("customerid")
? "Oldval(): " + oldval("customerid")
? "Fieldstate after replace and update: " + getfldstate("customerid")
?

Products

Lianja, Lianja Server