Using hb_objSendMsg()
#include "FiveWin.ch"
function Main()
 local o := Test()
Â
 o:nData = 1234
Â
 SetValue( o, 4321 )
Â
 ? o:nData
return nil
CLASS Test
  DATA nData
 Â
ENDCLASS
#pragma BEGINDUMP
#include <hbapicls.h>
HB_FUNC( SETVALUE )
{
  hb_objSendMsg( hb_param( 1, HB_IT_OBJECT ), "_NDATA", 1, hb_param( 2, HB_IT_ANY ) );
}
#pragma ENDDUMP