TPQUIT, Cannot QUIT out of a routine with an active transaction
Run Time Error: This indicates that an implicit or explicit QUIT attempted to leave an invocation level where a transaction or subtransaction was TSTARTed but not matched by either a TCOMMIT or TROLLBACK.
Action: Modify the routine to TCOMMIT or TROLLBACK the transaction before QUITting, or move the TSTART to a prior invocation level.
