Lock not released after CLEAR_FORM(NO_VALIDATE, TO_SAVEPOINT)

Question

Forms 6.0.8.26.0 on W2K SP4 in client/server mode
Database Oracle9i Enterprise Edition Release 9.2.0.6.0.
=======================================================
I have 2 forms, DEPT and EMP. On form DEPT there is a button to call EMP:
call_form('EMP', HIDE, DO_REPLACE, NO_QUERY_ONLY);In form EMP I have this KEY-ENTQRY trigger:
CLEAR_FORM(NO_VALIDATE, TO_SAVEPOINT);
enter_query;This is the scenario:
Open form DEPT.
Click on the button and query on form EMP.
Update one EMP record without a commit.
Open SQLPlus and do an update of the same record.
update emp set ename='John Doe' where empno=1000;
This statement waits for a commit or rollback in form EMP. So far, so good.
Click on ENTER QUERY. Because of the CLEAR_FORM I expect a rollback on the update in form EMP.
However, the session in SQLPlus is still hanging and I can see the blocking lock in the database.
I have to exit both the EMP and the DEPT form before the lock is released.
If I follow almost the same scenario, but open form EMP directly instead of via the button on DEPT, the lock on the EMP record is released when I press ENTER QUERY.
If I replace the TO_SAVEPOINT with FULL_ROLLBACK, the lock is released in the first scenario too, but a FULL_ROLLBACK is not what I want.

Answer 1

I created this on-rollback trigger:
declare
  v_sp   varchar2(100);
begin
  v_sp := get_application_property(SAVEPOINT_NAME);
  message('Rollback to: '||v_sp);
  issue_rollback(v_sp);
end;The message showed that the form is issueing a rollback to savepoint fm1.
In the database I could indeed see the savepoint being set when form EMP is called:
SAVEPOINT fm_1
and rolled back to this savepoint when pressing enter-query:
ROLLBACK TO fm_1
This also showed me the difference when calling form EMP directly instead of via call_form. When you call the form directly, no savepoint is set, so the rollback is in fact a FULL_ROLLBACK.