Exportfile for AOT version 1.0 or later
Formatversion: 1

***Element: CLS

; Microsoft Dynamics Class: GlobalCacheTest unloaded
; --------------------------------------------------------------------------------
  CLSVERSION 1
  
  CLASS #GlobalCacheTest
    PROPERTIES
      Name                #GlobalCacheTest
      Extends             #
      RunOn               #Called from
    ENDPROPERTIES
    
    METHODS
      Version: 3
      SOURCE #classDeclaration
        #class GlobalCacheTest
        #{
        #}
      ENDSOURCE
      SOURCE #printCaches
        #public void printCaches()
        #{
        #    print "Appl              ", appl.globalCache().isSet(        "Appl",                null);
        #    print "Infolog           ", infolog.globalCache().isSet(     "Infolog",             null);
        #    print "CF_Server         ", classfactory.globalCache().isSet("ClassFactory_Server", null);
        #    print "CF_Client         ", classfactory.globalCache().isSet("ClassFactory_Client", null);
        #    print "";
        #    print "CF_Server_Appl    ", classfactory.globalCache().isSet("Appl",                null);
        #    print "CF_Client_Infolog ", classfactory.globalCache().isSet("Infolog",             null);
        #}
      ENDSOURCE
      SOURCE #addAppl
        #client server static void addAppl()
        #{
        #    ;
        #    appl.globalCache().set("Appl", null, "Added from " + funcName());
        #}
      ENDSOURCE
      SOURCE #addClassFactory_Client
        #client static void addClassFactory_Client()
        #{
        #    ;
        #    classfactory.globalCache().set("ClassFactory_Client", null, "Added from " + funcName());
        #}
      ENDSOURCE
      SOURCE #addClassFactory_Server
        #server static void addClassFactory_Server()
        #{
        #    ;
        #    classfactory.globalCache().set("ClassFactory_Server", null, "Added from " + funcName());
        #}
      ENDSOURCE
      SOURCE #addInfolog
        #client server static void addInfolog()
        #{
        #    ;
        #    infolog.globalCache().set("Infolog", null, "Added from " + funcName());
        #}
      ENDSOURCE
      SOURCE #main
        #public static void main(Args _args)
        #{
        #    ;
        #    GlobalCacheTest::addAppl();
        #    GlobalCacheTest::addInfolog();
        #    GlobalCacheTest::addClassFactory_Client();
        #    GlobalCacheTest::addClassFactory_Server();
        #
        #    GlobalCacheTest::print_Client();
        #    GlobalCacheTest::print_Server();
        #
        #    pause;
        #}
      ENDSOURCE
      SOURCE #print_Client
        #client static void print_Client()
        #{
        #    print " === Client: ===";
        #
        #    new GlobalCacheTest().printCaches();
        #}
      ENDSOURCE
      SOURCE #print_Server
        #server static void print_Server()
        #{
        #    print " === Server: ===";
        #
        #    new GlobalCacheTest().printCaches();
        #}
      ENDSOURCE
    ENDMETHODS
  ENDCLASS

***Element: END