porquie me da error esta declaracion de DEFAULT

[goosfancito]

Teniendo en cuenta que el objeto esta declarado y las variables tambien, porque esta declaracion me da que esta mal?

Gracias.

Code: Select all  Expand view  RUN

   DEFAULT  ::bBookMark TO {|n| IF(n==NIL,;
                           IF(::oQuery:RecCount()>0, ::oQuery:RecNo(),0),;
                           IF(::oQuery:RecCount()>0, ::oQuery:goto(n),0))}


Error que emite

Source\tgxBrowse.prg(44) Error E0030 Syntax error: "syntax error at 'DEFAULT'"

Gracias.

[goosfancito]

Solucionado.
Me faltó esta linea en el encabezado

#include "common.ch"

Teniendo en cuenta que el objeto esta declarado y las variables tambien, porque esta declaracion me da que esta mal?

Gracias.

Code: Select all  Expand view  RUN

   DEFAULT  ::bBookMark TO {|n| IF(n==NIL,;
                           IF(::oQuery:RecCount()>0, ::oQuery:RecNo(),0),;
                           IF(::oQuery:RecCount()>0, ::oQuery:goto(n),0))}


Error que emite

Source\tgxBrowse.prg(44) Error E0030 Syntax error: "syntax error at 'DEFAULT'"

Gracias.