*/ Basic wrapper for Net Send type functionality API call

LPARAMETERS pcUser, pcMessage

DECLARE INTEGER NetMessageBufferSend IN netapi32 ;
  STRING servername, STRING UserName, STRING fromname, ;
  STRING MessageBuf, INTEGER buflen
  
lcUser    = strconv( StrConv(pcUser,1), 5) + Chr(0)
lcMsg     = strconv( StrConv(pcMessage,1), 5) + Chr(0)
lcFrom    = strconv( Strconv(Sys(0),1), 5) + Chr(0)
lnLen     = len(lcMsg)

res = NetMessageBufferSend( 0, lcUser, lcFrom, lcMsg, lnLen )
RETURN res