Power Builder - Demo-Restricciones al sistema

tengo un sistema al cual quiero ponerle restricciones.
al haber ingresado el el registro nº 10, que deje de funcionar.

he estado intentando con este caso:

formularion datosper

variable global

integer op1

guardar click

codigo para guardar xxxxxxxxxxx
op1=op1+1

w_datosper open

if op1=1 then
st_2.text="Version Demo Caducada"
cb_nuevo.enabled=false
end if

quisera que ya no me permitiera entrar registros al sistema, que de una vez por todas me permita ni siquiera entrar al sistema.

cunado yo algo del sistema y vuelvo a entrar es como si nada

no deberia ser if op1 = 10

si pero yo le pongo 1 para para probar y no estar ingresando 10 registros.
como para no demorar.