Package com.intersys.objects

Examples of com.intersys.objects.Database


      {

         String[] selectedViews = getSelectedViews();


         Database cacDb =  (JBindDatabase) CacheDatabase.getDatabase(_session.getSQLConnection().getConnection());
         StringBuffer script = new StringBuffer();

         for (int i = 0; i < selectedViews.length; i++)
         {
            CacheQuery qry = new CacheQuery(cacDb, "%Library.SQLCatalog", "SQLViewInfo");
View Full Code Here


      try
      {
         Dataholder[] argv = new Dataholder[1];
         argv[0] = Dataholder.create(list);

         Database conn =  CacheDatabase.getDatabase(con);

         Dataholder res;

         try
         {
            res = conn.runClassMethod("CM.methgetClassDefinition", "getClassDefinition", argv, Database.RET_OBJECT);
         }
         catch (CacheException e)
         {
            Statement stat = con.createStatement();
            stat.executeUpdate
            (

               "CREATE METHOD CM.getClassDefinition(IN className %String)\n" +
                  "RETURNS Integer\n" +
                  "PROCEDURE\n" +
                  "LANGUAGE COS\n" +
                  "{\n" +
                  "   new id,oref,oFile,file\n" +
                  "   if $F($ZV,\"Linux\") \n" +
                  "      set file = \"$HOME/CacheTemp\"_$job_\".xml\"\n" +
                  "   else \n" +
                  "      set file = \"c:\\\\temp\\\\$CacheTemp\"_$job_\".xml\"   \n" +
                  "   do $SYSTEM.OBJ.ExportCDL(className ,file, \"-d\")\n" +
                  "   set oFile = ##class(%FileBinaryStream).%New()\n" +
                  "   do oFile.LinkToFile(file)\n" +
                  "\n" +
                  "   set outStream = ##class(%GlobalCharacterStream).%New()\n" +
                  "   do outStream.CopyFrom(oFile)\n" +
                  "   quit outStream\n" +
                  "}"
            );
            stat.close();

            res = conn.runClassMethod("CM.methgetClassDefinition", "getClassDefinition", argv, Database.RET_OBJECT);
         }


         CacheObject cobj = res.getCacheObject();
         CharacterStream characterStream = (CharacterStream) (cobj.newJavaInstance());
View Full Code Here

   {
      try
      {
         String curServerName = getUrlBegin(_session.getSQLConnection().getConnection().getMetaData().getURL());

         Database conn = (JBindDatabase) CacheDatabase.getDatabase(_session.getSQLConnection().getConnection());
         CacheQuery qry = new CacheQuery(conn, "%Library.RoutineMgr", "NamespaceList");
         ResultSet resNamespaces = qry.execute();

         Hashtable aliasesByNamespaces = new Hashtable();
         while (resNamespaces.next())
View Full Code Here

      try
      {
         Dataholder[] argv = new Dataholder[1];
         argv[0] = Dataholder.create(selectSQL);

         Database conn =  (JBindDatabase) CacheDatabase.getDatabase(_session.getSQLConnection().getConnection());
         //Dataholder res = conn.runClassMethod("%Library.CMUtilities", "getExecutionPlan", argv, Database.RET_OBJECT);

         Dataholder res = null;
         try
         {
            res = conn.runClassMethod("CM.methM2", "M2", argv, Database.RET_OBJECT);
         }
         catch (CacheException e)
         {
            Statement stat = _session.getSQLConnection().createStatement();
            stat.executeUpdate
            (

            "CREATE METHOD CM.M2(IN sql %String)" +
                     "  RETURNS %GlobalCharacterStream" +
                     "  LANGUAGE COS" +
                     "  {" +
                     "     quit:$get(sql)=\"\" \"\"" +
                     "     kill %plan\n" +
                     "     set outStream = ##class(%GlobalCharacterStream).%New()" +
                     "     set sql(1)=sql,sql=1" +
                     "     do ShowPlan^%apiSQL(.sql,1)" +
                     "     set nSub = 1,line = \"\"" +
                     "     set to = +$g(%plan)+1" +
                     "     while nSub<to " +
                     "     {" +
                     "        set line = $g(%plan(nSub))" +
                     "        do outStream.WriteLine(line)" +
                     "        set nSub = nSub + 1" +
                     "     }" +
                     "     kill %plan\n" +
                     "     quit outStream" +
                     "  }"
            );
            stat.close();

            res = conn.runClassMethod("CM.methM2", "M2", argv, Database.RET_OBJECT);
         }


         CacheObject cobj = res.getCacheObject();
         CharacterStream characterStream = (CharacterStream) (cobj.newJavaInstance());
View Full Code Here

TOP

Related Classes of com.intersys.objects.Database

Copyright © 2018 www.massapicom. All rights reserved.
All source code are property of their respective owners. Java is a trademark of Sun Microsystems, Inc and owned by ORACLE Inc. Contact coftware#gmail.com.