Funny thing... Your code works for me as well, it sees to come into play when I build a .dll. Try making a .PRG with this code and add it to a new project file called Test.

DEFINE CLASS SessionSubClass As Session OLEPUBLIC
Name="SessionSubClass"
ENDDEFINE


Build an MTDLL and try this from the command line:


oX=CREATEOBJECT('Test.SessionSubClass')
?oX.name