I have 3 free tables on the server.
All of them have optimistic table buffering and have been made transactionable.
Set Reprocess is set to 5
The application will sometimes hang on the last TABLEUPDATE.
What could be causing it to hang?


IF RLOCK("b2btrips")
Begin transaction
Replace CONTROL With lcControl, ;
MSGPK With nMSGPK, ;
MSGDESC With cMsgDesc, ;
REQID With nNewReq, ;
MSGSTATUS With 4, ;
MSGREC With g_DateNow, ;
STARTDATE With g_DateNow, STARTZONE with cTimeZone ;
In B2BDISPD
Replace DOCID With cNewDOCID, ;
CONTROL With lcControl, ;
MSGPK With nMSGPK, ;
MSGPACKIT With nPackit, ;
MSGPRIOR With cPrior, ;
MSGIDORIG With B2BTRIPS.ORIGREQID, ;
MSGORDER With g_DateNow, ;
MSGCREATE With g_DateNow, ;
MSGDATE With g_DateNow, ;
MSGTYPE With 5, ;
MSGACTION With 2, ;
MSGSOURCE With 5, ;
DISPNO1 With BRBILL.DISPNO, ;
DESKLOC With B2BTRIPS.DESKLOC, ;
CRIT3 With cMsgDesc, ;
REQWHO With "B2BEVNT", ;
MSGSTATUS With 1, MSGSHOW With 2 ;
In B2BREQ
Replace MSGSTATUS With 4, MSGDATE With g_DateNow, ;
MSGDESC With cMsgDesc, REQID With nNewReq ;
In B2BTRIPS
lUpdated= Tableupdate(.F.,.T.,"B2BDISPD")
IF lUpdated
lUpdated= Tableupdate(.F.,.T.,"B2BREQ")
endif
IF lUpdated
lUpdated= Tableupdate(.F.,.T.,"B2BTRIPS") && It sometimes hangs on this tableupdate
endif
If lUpdated
End transaction
Else
Rollback
ENDIF
endif