El primero, que he solucionado, pero no se porque es así, es el siguiente:
Code: Select all
ACTIVATE WINDOW oWnd2 on paint (if(tmpcab->(eof()) .or. tmpcab->(bof()),obton2:disable(),obton2:enable()),if(tmpcab->(eof()) .or. tmpcab->(bof()),obton3:disable(),obton3:enable()),oWnd2:SayBitmap( 0, 0, oBmp ))
Code: Select all
ACTIVATE WINDOW oWnd2 on init (if(tmpcab->(eof()) .or. tmpcab->(bof()),obton2:disable(),obton2:enable()),if(tmpcab->(eof()) .or. tmpcab->(bof()),obton3:disable(),obton3:enable()),oWnd2:SayBitmap( 0, 0, oBmp ))
El otro es:
use <fichero> alias temporal new
temporal solo es accesible desde la funcion que lo crea, cuando de siempre yo he usado alias (públicas) en otros PRG's. Si ejecuto una funcion que está en otro PRG que hace referencia a temporal, me dice que 'Alias does not exist'.
No se si me he explicado bien. De todas formas lo del tema de las publicas creo que a lo mejor es por flag de compilación, no se.
Muchas Gracias de Antemano.