Estoy creando un metodo y me da error de que no existe el método. Creo que lo tengo bien creado. Me estaré saltando algo y no me doy cuenta.


/*
* Evento OnClick.
*/
METHOD Button1OnClick( oSender ) CLASS TForm44
::CLOSE()


return
/*
* Evento MUESTRA CAMPOS.
*/

METHOD Muestracampos() CLASS TForm1
::LABELEDEDIT1:CAPTION := STR(PRIMAS->(RECNO())) + "/" + LTRIM(STR(PRIMAS->(RECCOUNT())))
::EDIT1:CAPTION := PRIMAS->CODIGO
::EDIT2:CAPTION := PRIMAS->TIPO
::EDIT3:CAPTION := PRIMAS->CLASE
::EDIT4:CAPTION := PRIMAS->NOMBRE
::EDIT5:CAPTION := PRIMAS->PROVEEDOR
::EDIT6:CAPTION := PRIMAS->PMP
::EDIT7:CAPTION := PRIMAS->PRECIOMES
::EDIT8:CAPTION := PRIMAS->EINI
::EDIT9:CAPTION := PRIMAS->ENTRA
::EDIT10:CAPTION := PRIMAS->CONSU
::EDIT11:CAPTION := PRIMAS->CESIONES
::EDIT12:CAPTION := PRIMAS->EFIN
::EDIT13:CAPTION := PRIMAS->VALEINI
::EDIT14:CAPTION := PRIMAS->VALENT
::EDIT15:CAPTION := PRIMAS->VALSAL
::EDIT16:CAPTION := PRIMAS->VALCES
::EDIT17:CAPTION := PRIMAS->VALOR
::EDIT18:CAPTION := PRIMAS->ACENTRA
::EDIT19:CAPTION := PRIMAS->V_ACENTRA
::EDIT20:CAPTION := PRIMAS->ACCONSU
::EDIT21:CAPTION := PRIMAS->V_ACCONSU

return


METHOD Form44OnShow( oSender ) CLASS TForm44
USE PRIMAS ALIAS PRIMAS
PRIMAS->(DBCREATEINDEX("PRIMAS.NTX","CODIGO"))
::Muestracampos()
return

/*
* Evento OnClick.
*/
METHOD SpeedButton1OnClick( oSender ) CLASS TForm44
PRIMAS->(DBGOTOP())
::Muestracampos()

return

/*
* Evento OnClick.
*/
METHOD SpeedButton2OnClick( oSender ) CLASS TForm44
PRIMAS->(DBSKIP(-1))
::Muestracampos()

return

/*
* Evento OnClick.
*/
METHOD SpeedButton3OnClick( oSender ) CLASS TForm44
PRIMAS->(DBSKIP())
::LABELEDEDIT1:CAPTION := STR(PRIMAS->(RECNO())) + "/" + LTRIM(STR(PRIMAS->(RECCOUNT())))
::Muestracampos()

return

/*
* Evento OnClick.
*/
METHOD SpeedButton4OnClick( oSender ) CLASS TForm44
PRIMAS->(DBGOBOTTOM())
::Muestracampos()

return

José Manuel,

supongo que te da error en el método Muestracampos, es un método definido por tí y tienes que declararlo en el inspector de objetos, selecciona el formulario y haz click en el botón que hay a la derecha de la lista de controles del formulario, su dibujo es una tabla con un lapicero.

_________________
Un saludo,
Bruno Cantero
www.c3compiler.com

Hola, José, un apunte.
Existe un error MUY EXTENDIDO, que es lo que tu haces en el metodo OnShow... Esto es que cada vez que abres la tabla CREAS el indice (mal), esto cuando tienes pocos registros en la tabla ni se nota, pero con muchos registros es lento, lo que tienes que hacer es ABRIR el fichero indice y lo de crearlo SOLO cuando se corrompa o no exista.
Un saludo

_________________
Un saludo.
Jesús P. Melgar Velasco

Gracias Bruno, ya funciona, la verdad que no me había percatado de eso.........


Saludos



José Manuel