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
[email protected]
https://lists.sourceforge.net/lists/listinfo/xharbour-developers
