Forzar Commit??

[Anel Lazcano]

Hola a todos, en mi programa estoy generando una poliza y despues trato de compensarla pero me manda a la pantalla de compensacion donde me doy cuenta que NO tomo el numero de poliza, pero si lo corro con un break y le doy F5 si lo toma y no me marca error, le di commit, despues de generar la poliza y ni asi, mientras no lo corra en debuggin me marca ese error, alguien conoce alguna otra manera de forzar el commit o alguna otra instruccion que me funcione, actualmente asi tengo el codigo y pareciera q no tengo nada porque no funciona!!!

perform grabar_poliza.
COMMIT WORK.
SET UPDATE TASK LOCAL.
COMMIT WORK AND WAIT.
if documento <> ' '. "documento es el No.Doc de la poliza
perform compensar.
endif.