<i><font color="#663300">4) then I modified the adaaenv.prg with the following:
***************************************************
DEFINE CLASS TestDataEnvironment AS testEnvironment
FUNCTION LoadCursors()
DIMENSION this.aCursors[1]
this.aCursors[1] = 'v_TerminalLocation'
ENDFUNC
ENDDEFINE
DEFINE CLASS v_TerminalLocation AS CDynamicViewCursor
CursorSource = 'v_TerminalLocation'
ENDDEFINE
****************************************************
5) Then I created a subclass of iSessionEnvironment called testEnvironment and set the cDatabase property to Test(the name of my DBC)</font></i>
I think you are cofusing DataEnvironments (and their Codebook subclasses), which control the opening and closing of cursors and relations, with SessionEnvironments, which simply perform a series of SET functions which are scoped to a data session. Your 'testEnvironment' should be a subsclass of iDataEnvironment, and should be created when you run NewApp.
<font color="#cc0000"> ___/
/
__/
/
____/</font>
Ed Leafe
©2001 Ed Leafe |
