Power Builder - Vencer Una Aplicacion

Hola,
Compañeros , tengo una duda, quiero realizar una aplicacion de prueba que a un cierto tiempo caduque, si alguien puede ayudarme ......

Gracias..

Lo que yo hago es lo siguiente en el evento de la aplicacion codifico de la siguiente manera:
codificar en el evento open de la aplicacion
lo siguiente
Integer lrt_resultado
DATE ldt_fecha
ldt_fecha=date('13/08/2003') ==> fecha de inicio

If sqlca.sqlcode=0 Then
lrt_resultado=DaysAfter(date('13/08/2003'), today())
If lrt_resultado >=15 Then
Messagebox("Atencion", "el tiempo de prueba a caducado")
else
open(w_xxx)
end if
else
Messagebox("Error", "No se Puede Conectar a la BD, Llame a Soporte Técnico")
end if

Hola que tal:

Tomando el ejemplo de Vicky Raquel, puedes almacenar la fecha de instalacion en una llave en el registro de windows y despues estar tomado esa fecha mas los dias que diste de vigencia asi una vez cumplidos envias los mensajes de error.

O almacenar la fecha aen que caducara, asi es mas simple porque solo comparas si es igual o mayor y envias el mensaje de error.

Suerte!