General information
Category:
The Mere Mortals Framework
I have a Business object class (DataEntry) that I created which instantiates the CAbstractFactory class in order to utilize the GetClassName() method. However, this same class (DataEntry) also uses THIS.AddObject('oTapeHistory', 'TapeHistory'). All works fine until oTapeHistory.Init() calls GetDefaultDatabase(). GetDefaultDatabase() the checks for a prior version of CAbstract factory and, since this is in the command window and will be a COM object, it does not find goMMFactory nor does it find goApp.oMMFactory. So, my question, then, would be 'Am I programming incorrectly, or is there something in MM that is not correct?' I have looked at CAbstractFactory::Init() and found the following code:
IF NOT DODEFAULT()
RETURN .F.
ENDIF
USE CLASSES IN 0 SHARED
This.Parent.RegisterBizObj(This)
Should there not be the statement:
IF !USED('CLASSES')
USE CLASSES IN 0 SHARED
ENDIF
Followed by the This.Parent...? Any suggestions are appreciated.
Thank You,
Andrews Software, Inc.
Justin L. Spies
Next
Reply
View the map of this thread
View the map of this thread starting from this message only
View all messages of this thread
View all messages of this thread starting from this message only