Consultor Eletrônico



Kbase P105946: 4GL/ABL: How to check if there are any active database transactions?
Autor   Progress Software Corporation - Progress
Acesso   Público
Publicação   11/28/2008
Status: Verified

GOAL:

4GL/ABL: How to check if there are any active database transactions?

GOAL:

Which Virtual System Table (VST) has the current database transactions information?

FACT(s) (Environment):

All Supported Operating Systems
Progress 9.x
OpenEdge 10.x

FIX:

One way to determine whether there is any active database transaction or not is to query the Transaction Virtual System Table (_Trans). For example:
FIND FIRST _Trans WHERE _Trans-State <> ? NO-LOCK NO-ERROR.
IF AVAILABLE(_Trans) THEN
MESSAGE
"There is currently at least one database transaction!"
VIEW-AS ALERT-BOX INFO BUTTONS OK.
ELSE
MESSAGE
"There are currently NO database transactions!"
VIEW-AS ALERT-BOX INFO BUTTONS OK.