Hi, guys,
when compiling the example below the error occurs
"Error E0047  Code block contains both macro and declared symbol references"
the last line
to remove the line LOCATE error "disappears"

Mario

<CODE>

#include "hbclass.ch"

PROCEDURE Main(  )
RETURN

CLASS test

    METHOD Locate( cExp )
ENDCLASS


METHOD Locate( cExp ) CLASS test

    Select( ::nArea )

    LOCATE FOR &cExp // coment this line

RETURN Self

STATIC FUNCTION EarlyFieldBlock( nField )

return {|Self, xVal| IIF( PCount() == 2, ( Self:nArea )->( FieldPut( 
nField, xVal ) ), ( Self:nArea )->( FieldGet( nField ) ) ) }



------------------------------------------------------------------------------
Check out the vibrant tech community on one of the world's most 
engaging tech sites, SlashDot.org! http://sdm.link/slashdot
_______________________________________________
xHarbour-developers mailing list
xHarbour-developers@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/xharbour-developers

Reply via email to