[Tora-cvs] tora NEWS,1.865,1.866 toanalyze.cpp,1.36,1.37 torollback.cpp,1.67,1.68 tosession.cpp,1.72,1.73

[<hp...@us...>]

Update of /cvsroot/tora/tora
In directory sc8-pr-cvs1:/tmp/cvs-serv14827

Modified Files:
	NEWS toanalyze.cpp torollback.cpp tosession.cpp 
Log Message:


Index: NEWS
===================================================================
RCS file: /cvsroot/tora/tora/NEWS,v
retrieving revision 1.865
retrieving revision 1.866
diff -C2 -d -r1.865 -r1.866
*** NEWS	24 Jul 2003 12:48:49 -0000	1.865
--- NEWS	24 Jul 2003 13:48:02 -0000	1.866
***************
*** 1,4 ****
--- 1,7 ----
  1.3.10:
  
+ 2003-07-24: Optimized rollback view (Loosed some precision though). (Thanx Jeff Price)
+ 2003-07-24: Don't list temporary or secondary tables in analyze tool.
+ 2003-07-24: Find long ops based on sid and serial in sessions.
  2003-07-24: Fixed code completion again.
  2003-07-24: Moved tools toolbar back to old position, works better.

Index: toanalyze.cpp
===================================================================
RCS file: /cvsroot/tora/tora/toanalyze.cpp,v
retrieving revision 1.36
retrieving revision 1.37
diff -C2 -d -r1.36 -r1.37
*** toanalyze.cpp	23 Apr 2003 01:37:11 -0000	1.36
--- toanalyze.cpp	24 Jul 2003 13:48:03 -0000	1.37
***************
*** 102,106 ****
  			   "       last_analyzed\n"
  			   "  from sys.all_all_tables\n"
! 			   " where iot_name is null",
  			   "Get table statistics, first three columns and binds must be same",
  			   "8.0");
--- 102,107 ----
  			   "       last_analyzed\n"
  			   "  from sys.all_all_tables\n"
! 			   " where iot_name is null\n"
! 			   "   and temporary != 'Y' and secondary = 'N'",
  			   "Get table statistics, first three columns and binds must be same",
  			   "8.0");
***************
*** 118,122 ****
  			    "       last_analyzed\n"
  			    "  from sys.all_tables\n"
! 			    " WHERE 1 = 1",
  			    "",
  			    "7.3");
--- 119,123 ----
  			    "       last_analyzed\n"
  			    "  from sys.all_tables\n"
! 			    " where temporary != 'Y' and secondary = 'N'",
  			    "",
  			    "7.3");

Index: torollback.cpp
===================================================================
RCS file: /cvsroot/tora/tora/torollback.cpp,v
retrieving revision 1.67
retrieving revision 1.68
diff -C2 -d -r1.67 -r1.68
*** torollback.cpp	12 Feb 2003 20:17:48 -0000	1.67
--- torollback.cpp	24 Jul 2003 13:48:04 -0000	1.68
***************
*** 260,264 ****
  
  #define MIN_HEIGHT 4
! #define TRANSCOL 18
  
  static bool BarsAlignLeft=true;
--- 260,264 ----
  
  #define MIN_HEIGHT 4
! #define TRANSCOL 17
  
  static bool BarsAlignLeft=true;
***************
*** 313,344 ****
  
  static toSQL SQLRollback("toRollback:Information",
! 			 "select a.segment_name \"Segment\",\n"
  			 "       a.owner \"Owner\",\n"
  			 "       a.tablespace_name \"Tablespace\",\n"
  			 "       a.status \"Status\",\n"
  			 "       b.xacts \"-Transactions\",\n"
! 			 "       ROUND(a.initial_extent/unit,3) \"-Initial (MB)\",\n"
! 			 "       ROUND(a.next_extent/unit,3) \"-Next (MB)\",\n"
  			 "       a.pct_increase \"-PCT Increase\",\n"
! 			 "       ROUND(b.rssize/unit,3) \"-Current (MB)\",\n"
! 			 "       ROUND(b.optsize/unit,3) \"-Optimal (MB)\",\n"
! 			 "       ROUND(b.aveactive/unit,3) \"-Used (MB)\",\n"
! 			 "       b.Extents \"-Extents\",\n"
  			 "       b.CurExt \"-Current\",\n"
  			 "       b.CurBlk \"-Block\",\n"
- 			 "       c.Blocks \"-Blocks\",\n"
  			 "       b.gets \"-Reads\",\n"
! 			 "       ROUND((b.gets-b.waits)*100/b.gets,2)||'%' \"-Hitrate\",\n"
  			 "       a.segment_id \" USN\"\n"
! 			 "  from sys.dba_rollback_segs a,\n"
  			 "       v$rollstat b,\n"
! 			 "       sys.dba_extents c,\n"
! 			 "       (select :unit<char[100]> unit from sys.dual) d\n"
! 			 " where a.segment_id = b.usn(+)\n"
! 			 "   and (a.owner = c.owner or a.owner = 'PUBLIC')\n"
! 			 "   and a.segment_name = c.segment_name\n"
! 			 "   and c.segment_type = 'ROLLBACK'\n"
! 			 "   and (c.extent_id = b.CurExt or (b.curext is null and c.extent_id = 0))\n"
! 			 " order by a.segment_name",
  			 "Get information about rollback segments.");
  
--- 313,343 ----
  
  static toSQL SQLRollback("toRollback:Information",
! 			 "SELECT a.segment_name \"Segment\",\n"
  			 "       a.owner \"Owner\",\n"
  			 "       a.tablespace_name \"Tablespace\",\n"
  			 "       a.status \"Status\",\n"
  			 "       b.xacts \"-Transactions\",\n"
! 			 "       ROUND ( a.initial_extent / :unit<char[100]>,\n"
! 			 "	       3 ) \"-Initial (MB)\",\n"
! 			 "       ROUND ( a.next_extent / :unit<char[100]>,\n"
! 			 "	       3 ) \"-Next (MB)\",\n"
  			 "       a.pct_increase \"-PCT Increase\",\n"
! 			 "       ROUND ( b.rssize / :unit<char[100]>,\n"
! 			 "	       3 ) \"-Current (MB)\",\n"
! 			 "       ROUND ( b.optsize / :unit<char[100]>,\n"
! 			 "	       3 ) \"-Optimal (MB)\",\n"
! 			 "       ROUND ( b.aveactive / :unit<char[100]>,\n"
! 			 "	       3 ) \"-Used (MB)\",\n"
! 			 "       b.EXTENTS \"-Extents\",\n"
  			 "       b.CurExt \"-Current\",\n"
  			 "       b.CurBlk \"-Block\",\n"
  			 "       b.gets \"-Reads\",\n"
! 			 "       ROUND ( ( b.gets - b.waits ) * 100 / b.gets,\n"
! 			 "	       2 ) || '%' \"-Hitrate\",\n"
  			 "       a.segment_id \" USN\"\n"
! 			 "  FROM sys.dba_rollback_segs a,\n"
  			 "       v$rollstat b,\n"
! 			 " WHERE a.segment_id = b.usn ( + )\n"
! 			 " ORDER BY a.segment_name",
  			 "Get information about rollback segments.");
  
***************
*** 365,369 ****
  	for (int i=TRANSCOL;!text(i).isEmpty();i++) {
  	  items.insert(items.end(),text(i).toDouble());
! 	  curExt.insert(curExt.end(),text(12).toDouble()+text(13).toDouble()/text(14).toDouble());
  	  maxExt.insert(maxExt.end(),text(11).toDouble());
  	}
--- 364,368 ----
  	for (int i=TRANSCOL;!text(i).isEmpty();i++) {
  	  items.insert(items.end(),text(i).toDouble());
! 	  curExt.insert(curExt.end(),text(12).toDouble());
  	  maxExt.insert(maxExt.end(),text(11).toDouble());
  	}

Index: tosession.cpp
===================================================================
RCS file: /cvsroot/tora/tora/tosession.cpp,v
retrieving revision 1.72
retrieving revision 1.73
diff -C2 -d -r1.72 -r1.73
*** tosession.cpp	23 Apr 2003 08:05:42 -0000	1.72
--- tosession.cpp	24 Jul 2003 13:48:04 -0000	1.73
***************
*** 276,280 ****
  
    QString sql=toSQL::string(TOSQL_LONGOPS,connection);
!   sql+=" AND b.sid = :sid<char[101]>";
    LongOps=new toResultLong(true,false,toQuery::Background,ResultTab);
    LongOps->setSQL(sql);
--- 276,280 ----
  
    QString sql=toSQL::string(TOSQL_LONGOPS,connection);
!   sql+=" AND b.sid = :sid<char[101]> AND b.serial# = :ser<char[101]>";
    LongOps=new toResultLong(true,false,toQuery::Background,ResultTab);
    LongOps->setSQL(sql);
***************
*** 513,517 ****
  	ConnectInfo->changeParams(item->text(0));
        else if (CurrentTab==LongOps)
! 	LongOps->changeParams(item->text(0));
        else if (CurrentTab==PendingLocks)
  	PendingLocks->query(item->text(0));
--- 513,517 ----
  	ConnectInfo->changeParams(item->text(0));
        else if (CurrentTab==LongOps)
! 	LongOps->changeParams(item->text(0),item->text(1));
        else if (CurrentTab==PendingLocks)
  	PendingLocks->query(item->text(0));