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