Difference between revisions of "COMPLETED()"
From Recital Documentation Wiki
Yvonnemilne (Talk | contribs) |
Yvonnemilne (Talk | contribs) |
||
| Line 22: | Line 22: | ||
<code lang="recital"> | <code lang="recital"> | ||
procedure recovery | procedure recovery | ||
| − | rollback | + | rollback |
| − | if rollback() | + | if rollback() |
| − | + | dialog box "Rollback was ok." | |
| − | else | + | else |
| − | + | dialog box "Rollback failed." | |
| − | endif | + | endif |
return | return | ||
| Line 33: | Line 33: | ||
on error do recovery | on error do recovery | ||
begin transaction | begin transaction | ||
| − | reset in comm_2 | + | reset in comm_2 |
| − | delete first 15 | + | delete first 15 |
| − | insert | + | insert |
| − | replace all t1 with (t2*t3)/100 | + | replace all t1 with (t2*t3)/100 |
| − | list | + | list |
end transaction | end transaction | ||
if completed() | if completed() | ||
| Line 51: | Line 51: | ||
[[Category:Documentation]] | [[Category:Documentation]] | ||
[[Category:Functions]] | [[Category:Functions]] | ||
| + | [[Category:Transaction Processing]] | ||
| + | [[Category:Transaction Processing Functions]] | ||
Revision as of 14:01, 2 June 2009
Class
Transaction Processing
Purpose
Function to determine whether an error occurred during a multi-statement transaction
Syntax
COMPLETED()
See Also
BEGIN TRANSACTION, END TRANSACTION, ISMARKED(), RESET IN, ROLLBACK, ROLLBACK(), SET ROLLBACK
Description
The COMPLETED() function returns .T. if no errors occurred during processing of any command issued between the BEGIN TRANSACTION and END TRANSACTION commands.
Example
procedure recovery rollback if rollback() dialog box "Rollback was ok." else dialog box "Rollback failed." endif return use setcomm on error do recovery begin transaction reset in comm_2 delete first 15 insert replace all t1 with (t2*t3)/100 list end transaction if completed() dialog box "Transaction completed OK else dialog box "Errors occurred during transaction" endif
Products
Recital Database Server, Recital Mirage Server, Recital Terminal Developer
