>>Yes, it does, and thats what I did instead. But I'm just
>curious as to why PEMSTATUS fails.
>
>Can you post a snippet of your code?

I've been playing with this, and this code snippet shows the issue he brought up.

add this to a project 'recobj' and build the dll, then run the code.

loT = CREATEOBJECT('empty')
ADDPROPERTY(loT,'Name','OLE Test')

DELETE FILE 'c:\members.txt'
loM = CREATEOBJECT("recobj.members") && DLL name . class name
loM.TestMembers(loT)
loM = NULL

ADDPROPERTY(loT,'Name','PRG Test')
loM = CREATEOBJECT('members')
loM.TestMembers(loT)

MODIFY FILE 'c:\members.txt'

DEFINE CLASS members AS Custom OLEPUBLIC
   PROCEDURE TestMembers ( toIn AS Object ) AS Logical 
      LOCAL lnLoop, lcOut
      lcOut = TTOC(DATETIME()) + CHR(13)+CHR(10)
      FOR lnLoop = 1 TO AMEMBERS(laMem, toIn, 3)
         lcOut = lcOut + laMem[lnLoop, 1] + ',' + laMem[lnLoop, 2] + CHR(13) + CHR(10)
      NEXT
      IF TYPE('toIn.Name') = 'C'
         lcOut = lcOut + toIn.Name + CHR(13) + CHR(10)
      ENDIF
      STRTOFILE(lcOut, 'c:\members.txt', 1)
   ENDPROC
ENDDEFINE