Muchas gracias y un saludo
Code: Select all
redefine XBROWSE oBrw id 1007 OF ownd1 ;
COLUMNS "REG_SISAAD","DNI","APELLIDO","NOMBRE","REG_COMUNI",;
"ANO_EXPEDI","DIRECCION","LOCALIDAD","COD_POSTAL",;
"TELEFONO","DICTAMEN","FEC_VALORA","TEC_VALORA","FEC_IN_SOC",;
"TEC_TRSOCI","FEC_FIR_PI","TEC_PIA",;
"TEC_EST_EC","TEC_VAL_EC","GRADO_VALO","NIVEL_VALO","SELECTOR";
HEADERS "SISAAD","NIF","Apellidos","Nombre","Nª Comun.","Año","Dirección","Localidad","C. Postal",;
"Teléfono","Dictamen","Valoración","Valorador","I. Social","T. Social","PIA","Tec. Pia",;
"Est. econ.","Tec. Estudio","Grado","Nivel","Selector";
COLSIZES 150,90,200,100,150,;
50,200,150,60,;
90,300,60,150,60,;
150,60,150,;
60,150,30,30,110;
on DBLCLICK (empleado(sisaad->(recno())), obrw:refresh(),obrw:setfocus());
font ofont ;
AUTOSORT alias "sisaad" FOOTERS LINES CELL ;
BACKGROUND aGrad VERTICAL