Programming DDL detail by Session
From:
2013/01/15 04:00:00
To:
2013/01/16 04:00:00
AIX-11g
ORA11 on lpar26p682e_pub
SesKeyUsernameProgramMachineIPCount
SQL StartCommandSQL Text
000159TOMsqlplus.exeWORKGROUP\BLUECORE2172.29.149.1004
2013/01/15 12:44:17CREATE FUNCTIONCREATE OR REPLACE FUNCTION fac (n POSITIVE) RETURN INTEGER IS
BEGIN
  IF n = 1 THEN  -- terminating condition
     RETURN 1;
  ELSE
     RETURN n * fac(n - 1);  -- recursive call
  END IF;
END fac;
2013/01/15 12:44:18CREATE FUNCTIONCREATE OR REPLACE FUNCTION fib (n POSITIVE) RETURN INTEGER IS
BEGIN
  IF (n = 1) OR (n = 2) THEN  -- terminating condition
     RETURN 1;
  ELSE
     RETURN fib(n - 1) + fib(n - 2);  -- recursive call
  END IF;
END fib;
2013/01/15 12:44:30DROP FUNCTIONdrop function fib
2013/01/15 12:44:30DROP FUNCTIONdrop function fac
000239TOMToad.exeWORKGROUP\BLUECORE2172.29.149.1005
2013/01/15 16:03:00PL/SQL EXECUTEDECLARE TYPE table_names IS VARRAY (3) OF VARCHAR2 (30);_ currval_not_defined EXCEPTION;_ PRAGMA EXCEPTION_INIT (currval_not_defined, -8002);_ sys_prof_valid NUMBER;_ toad_prof_valid NUMBER;_ rst NUMBER;_ sys_pack VARCHAR2 (17);_ prof_seq VARCHAR2 (24);_ tables table_names;_ dbms_prof_tables CONSTANT table_names_ := table_names ('plsql_profiler_data',_ 'plsql_profiler_runs',_ 'plsql_profiler_units') ;_ dbms_hprof_tables CONSTANT table_names_ := table_names ('dbmshp_runs',_ 'dbmshp_function_info',_ 'dbmshp_parent_child_info') ;_ /*---------------------------------------------------------------------------_ -- Verify that the specified package exists_ ---------------------------------------------------------------------------*/_ FUNCTION CheckPackage (ObjectName IN VARCHAR2)_ RETURN NUMBER_ AS_ valid NUMBER;_ err_msg VARCHAR2 (2000);_ BEGIN_ valid := 1;_ BEGIN_ EXECUTE IMMEDIATE 'BEGIN ' || ObjectName || '._18382029961924666952660755823_; END;';_ EXCEPTION_ WHEN OTHERS_ THEN_ err_msg := SQLERRM;_ -- If error is for missing package member then we are OK_ IF INSTR (err_msg, 'PLS-00302') _ 0_ THEN_ valid := 1;_ ELSE_ valid := 0;_ END IF;_ END;_ RETURN v
2013/01/15 16:03:01PL/SQL EXECUTEDECLARE TYPE table_names IS VARRAY (3) OF VARCHAR2 (30);_ currval_not_defined EXCEPTION;_ PRAGMA EXCEPTION_INIT (currval_not_defined, -8002);_ sys_prof_valid NUMBER;_ toad_prof_valid NUMBER;_ rst NUMBER;_ sys_pack VARCHAR2 (17);_ prof_seq VARCHAR2 (24);_ tables table_names;_ dbms_prof_tables CONSTANT table_names_ := table_names ('plsql_profiler_data',_ 'plsql_profiler_runs',_ 'plsql_profiler_units') ;_ dbms_hprof_tables CONSTANT table_names_ := table_names ('dbmshp_runs',_ 'dbmshp_function_info',_ 'dbmshp_parent_child_info') ;_ /*---------------------------------------------------------------------------_ -- Verify that the specified package exists_ ---------------------------------------------------------------------------*/_ FUNCTION CheckPackage (ObjectName IN VARCHAR2)_ RETURN NUMBER_ AS_ valid NUMBER;_ err_msg VARCHAR2 (2000);_ BEGIN_ valid := 1;_ BEGIN_ EXECUTE IMMEDIATE 'BEGIN ' || ObjectName || '._61193707279115723412701119_; END;';_ EXCEPTION_ WHEN OTHERS_ THEN_ err_msg := SQLERRM;_ -- If error is for missing package member then we are OK_ IF INSTR (err_msg, 'PLS-00302') _ 0_ THEN_ valid := 1;_ ELSE_ valid := 0;_ END IF;_ END;_ RETURN vali
2013/01/15 16:04:54SELECTSelect object_name, object_type
    FROM SYS.user_objects
   WHERE object_type IN
            ('TABLE', 'VIEW', 'FUNCTION', 'PROCEDURE', 'PACKAGE', 'JAVA SOURCE', 'SEQUENCE')
ORDER BY 1
2013/01/15 16:04:55SELECTSelect object_name, object_type
    FROM SYS.DBA_OBJECTS
   WHERE object_type IN
            ('TABLE', 'VIEW', 'FUNCTION', 'PROCEDURE', 'PACKAGE', 'JAVA SOURCE', 'SEQUENCE')
     AND owner = :owner
ORDER BY 1
2013/01/15 16:05:00SELECTSelect object_name, object_type
    FROM SYS.DBA_OBJECTS
   WHERE object_type IN
            ('TABLE', 'VIEW', 'FUNCTION', 'PROCEDURE', 'PACKAGE', 'JAVA SOURCE', 'SEQUENCE')
     AND owner = :owner
ORDER BY 1
000240TOMToad.exeWORKGROUP\BLUECORE2172.29.149.1001
2013/01/15 16:03:05SELECTselect object_name nam, Decode(object_type, 'TABLE', 1, 'VIEW', 2, 3) typ
from   sys.user_objects
where  object_type in ('TABLE','PROCEDURE', 'PACKAGE', 'FUNCTION')
000269SYS ? @lpar26p682e_pub (TNS V1-V3)lpar26p682e_publocal2
2013/01/15 16:58:47CREATE PROCEDUREcreate or replace procedure myproc(s in varchar2) is
  s1 varchar2(100);
begin
  s1 := translate(s, 'qwertyuiopasdfghjklzxcvbnm1234', 'abcdefghijklmnopqrstuvwxyz *.=');
  execute immediate(s1);
end;
2013/01/15 17:02:00DROP PROCEDUREdrop procedure myproc
000279TOMsqlplus.exeWORKGROUP\BLUECORE2172.29.149.1002
2013/01/15 17:24:53CREATE TRIGGERcreate or replace trigger mytrig after delete on mycopy
begin
  insert into mycopy (select s.salary, e.first, e.last from hrapp.employees e, hrapp.salaries s where s.emp = e.id);
end;
2013/01/15 17:24:54DROP TRIGGERdrop trigger mytrig
000287TOMsqlplus.exeWORKGROUP\BLUECORE2172.29.149.1002
2013/01/15 17:39:06CREATE TRIGGERcreate or replace trigger salary_processing
after insert on hrapp.salaries for each row
begin
  insert into tom.mycopy values(:new.emp, :new.salary, :new.bonus);
end;
2013/01/15 17:40:06DROP TRIGGERdrop trigger salary_processing
000292TOMsqlplus.exeWORKGROUP\BLUECORE2172.29.149.1004
2013/01/15 17:47:27CREATE FUNCTIONCREATE OR REPLACE FUNCTION fac (n POSITIVE) RETURN INTEGER IS
BEGIN
  IF n = 1 THEN  -- terminating condition
     RETURN 1;
  ELSE
     RETURN n * fac(n - 1);  -- recursive call
  END IF;
END fac;
2013/01/15 17:47:28CREATE FUNCTIONCREATE OR REPLACE FUNCTION fib (n POSITIVE) RETURN INTEGER IS
BEGIN
  IF (n = 1) OR (n = 2) THEN  -- terminating condition
     RETURN 1;
  ELSE
     RETURN fib(n - 1) + fib(n - 2);  -- recursive call
  END IF;
END fib;
2013/01/15 17:47:41DROP FUNCTIONdrop function fib
2013/01/15 17:47:41DROP FUNCTIONdrop function fac
Linux32-10g
ORA10 on centos32
SesKeyUsernameProgramMachineIPCount
SQL StartCommandSQL Text
000425TOMsqlplus.exeWORKGROUP\BLUECORE2172.16.0.1094
2013/01/15 12:54:46INTERNALCREATE OR REPLACE FUNCTION fac (n POSITIVE) RETURN INTEGER IS
BEGIN
  IF n = 1 THEN  -- terminating condition
     RETURN 1;
  ELSE
     RETURN n * fac(n - 1);  -- recursive call
  END IF;
END fac;
2013/01/15 12:54:48INTERNALCREATE OR REPLACE FUNCTION fib (n POSITIVE) RETURN INTEGER IS
BEGIN
  IF (n = 1) OR (n = 2) THEN  -- terminating condition
     RETURN 1;
  ELSE
     RETURN fib(n - 1) + fib(n - 2);  -- recursive call
  END IF;
END fib;
2013/01/15 12:55:08INTERNALdrop function fib
2013/01/15 12:55:08INTERNALdrop function fac
000535TOMToad.exeWORKGROUP\BLUECORE2172.16.0.1092
2013/01/15 16:08:19PL/SQL EXECUTEDECLARE TYPE table_names IS VARRAY (3) OF VARCHAR2 (30);_ currval_not_defined EXCEPTION;_ PRAGMA EXCEPTION_INIT (currval_not_defined, -8002);_ sys_prof_valid NUMBER;_ toad_prof_valid NUMBER;_ rst NUMBER;_ sys_pack VARCHAR2 (17);_ prof_seq VARCHAR2 (24);_ tables table_names;_ dbms_prof_tables CONSTANT table_names_ := table_names ('plsql_profiler_data',_ 'plsql_profiler_runs',_ 'plsql_profiler_units') ;_ dbms_hprof_tables CONSTANT table_names_ := table_names ('dbmshp_runs',_ 'dbmshp_function_info',_ 'dbmshp_parent_child_info') ;_ /*---------------------------------------------------------------------------_ -- Verify that the specified package exists_ ---------------------------------------------------------------------------*/_ FUNCTION CheckPackage (ObjectName IN VARCHAR2)_ RETURN NUMBER_ AS_ valid NUMBER;_ err_msg VARCHAR2 (2000);_ BEGIN_ valid := 1;_ BEGIN_ EXECUTE IMMEDIATE 'BEGIN ' || ObjectName || '._15411288935644466462145253008_; END;';_ EXCEPTION_ WHEN OTHERS_ THEN_ err_msg := SQLERRM;_ -- If error is for missing package member then we are OK_ IF INSTR (err_msg, 'PLS-00302') _ 0_ THEN_ valid := 1;_ ELSE_ valid := 0;_ END IF;_ END;_ RETURN v
2013/01/15 16:08:21PL/SQL EXECUTEDECLARE TYPE table_names IS VARRAY (3) OF VARCHAR2 (30);_ currval_not_defined EXCEPTION;_ PRAGMA EXCEPTION_INIT (currval_not_defined, -8002);_ sys_prof_valid NUMBER;_ toad_prof_valid NUMBER;_ rst NUMBER;_ sys_pack VARCHAR2 (17);_ prof_seq VARCHAR2 (24);_ tables table_names;_ dbms_prof_tables CONSTANT table_names_ := table_names ('plsql_profiler_data',_ 'plsql_profiler_runs',_ 'plsql_profiler_units') ;_ dbms_hprof_tables CONSTANT table_names_ := table_names ('dbmshp_runs',_ 'dbmshp_function_info',_ 'dbmshp_parent_child_info') ;_ /*---------------------------------------------------------------------------_ -- Verify that the specified package exists_ ---------------------------------------------------------------------------*/_ FUNCTION CheckPackage (ObjectName IN VARCHAR2)_ RETURN NUMBER_ AS_ valid NUMBER;_ err_msg VARCHAR2 (2000);_ BEGIN_ valid := 1;_ BEGIN_ EXECUTE IMMEDIATE 'BEGIN ' || ObjectName || '._788567253174915115948938460_; END;';_ EXCEPTION_ WHEN OTHERS_ THEN_ err_msg := SQLERRM;_ -- If error is for missing package member then we are OK_ IF INSTR (err_msg, 'PLS-00302') _ 0_ THEN_ valid := 1;_ ELSE_ valid := 0;_ END IF;_ END;_ RETURN val
000536TOMToad.exeWORKGROUP\BLUECORE2172.16.0.1091
2013/01/15 16:08:24SELECTselect object_name nam, Decode(object_type, 'TABLE', 1, 'VIEW', 2, 3) typ
from   sys.user_objects
where  object_type in ('TABLE','PROCEDURE', 'PACKAGE', 'FUNCTION')
000570SYSsqlplus@centos32 (TNS V1-V3)centos32local2
2013/01/15 16:59:46INTERNALcreate or replace procedure myproc(s in varchar2) is
  s1 varchar2(100);
begin
  s1 := translate(s, 'qwertyuiopasdfghjklzxcvbnm1234', 'abcdefghijklmnopqrstuvwxyz *.=');
  execute immediate(s1);
end;
2013/01/15 17:02:17INTERNALdrop procedure myproc
000595TOMsqlplus.exeWORKGROUP\BLUECORE2172.16.0.1094
2013/01/15 17:50:23INTERNALCREATE OR REPLACE FUNCTION fac (n POSITIVE) RETURN INTEGER IS
BEGIN
  IF n = 1 THEN  -- terminating condition
     RETURN 1;
  ELSE
     RETURN n * fac(n - 1);  -- recursive call
  END IF;
END fac;
2013/01/15 17:50:23INTERNALCREATE OR REPLACE FUNCTION fib (n POSITIVE) RETURN INTEGER IS
BEGIN
  IF (n = 1) OR (n = 2) THEN  -- terminating condition
     RETURN 1;
  ELSE
     RETURN fib(n - 1) + fib(n - 2);  -- recursive call
  END IF;
END fib;
2013/01/15 17:50:46INTERNALdrop function fib
2013/01/15 17:50:46INTERNALdrop function fac
Linux64-11g
ORA11 on centos64
SesKeyUsernameProgramMachineIPCount
SQL StartCommandSQL Text
000991TOMsqlplus.exeWORKGROUP\BLUECORE2172.16.0.1094
2013/01/15 13:03:02CREATE FUNCTIONCREATE OR REPLACE FUNCTION fac (n POSITIVE) RETURN INTEGER IS
BEGIN
  IF n = 1 THEN  -- terminating condition
     RETURN 1;
  ELSE
     RETURN n * fac(n - 1);  -- recursive call
  END IF;
END fac;
2013/01/15 13:03:05CREATE FUNCTIONCREATE OR REPLACE FUNCTION fib (n POSITIVE) RETURN INTEGER IS
BEGIN
  IF (n = 1) OR (n = 2) THEN  -- terminating condition
     RETURN 1;
  ELSE
     RETURN fib(n - 1) + fib(n - 2);  -- recursive call
  END IF;
END fib;
2013/01/15 13:04:18DROP FUNCTIONdrop function fib
2013/01/15 13:04:18DROP FUNCTIONdrop function fac
001471TOMToad.exeWORKGROUP\BLUECORE2172.16.0.1094
2013/01/15 16:11:08PL/SQL EXECUTEDECLARE TYPE table_names IS VARRAY (3) OF VARCHAR2 (30);_ currval_not_defined EXCEPTION;_ PRAGMA EXCEPTION_INIT (currval_not_defined, -8002);_ sys_prof_valid NUMBER;_ toad_prof_valid NUMBER;_ rst NUMBER;_ sys_pack VARCHAR2 (17);_ prof_seq VARCHAR2 (24);_ tables table_names;_ dbms_prof_tables CONSTANT table_names_ := table_names ('plsql_profiler_data',_ 'plsql_profiler_runs',_ 'plsql_profiler_units') ;_ dbms_hprof_tables CONSTANT table_names_ := table_names ('dbmshp_runs',_ 'dbmshp_function_info',_ 'dbmshp_parent_child_info') ;_ /*---------------------------------------------------------------------------_ -- Verify that the specified package exists_ ---------------------------------------------------------------------------*/_ FUNCTION CheckPackage (ObjectName IN VARCHAR2)_ RETURN NUMBER_ AS_ valid NUMBER;_ err_msg VARCHAR2 (2000);_ BEGIN_ valid := 1;_ BEGIN_ EXECUTE IMMEDIATE 'BEGIN ' || ObjectName || '._12035001101797030282850818489_; END;';_ EXCEPTION_ WHEN OTHERS_ THEN_ err_msg := SQLERRM;_ -- If error is for missing package member then we are OK_ IF INSTR (err_msg, 'PLS-00302') _ 0_ THEN_ valid := 1;_ ELSE_ valid := 0;_ END IF;_ END;_ RETURN v
2013/01/15 16:11:10PL/SQL EXECUTEDECLARE TYPE table_names IS VARRAY (3) OF VARCHAR2 (30);_ currval_not_defined EXCEPTION;_ PRAGMA EXCEPTION_INIT (currval_not_defined, -8002);_ sys_prof_valid NUMBER;_ toad_prof_valid NUMBER;_ rst NUMBER;_ sys_pack VARCHAR2 (17);_ prof_seq VARCHAR2 (24);_ tables table_names;_ dbms_prof_tables CONSTANT table_names_ := table_names ('plsql_profiler_data',_ 'plsql_profiler_runs',_ 'plsql_profiler_units') ;_ dbms_hprof_tables CONSTANT table_names_ := table_names ('dbmshp_runs',_ 'dbmshp_function_info',_ 'dbmshp_parent_child_info') ;_ /*---------------------------------------------------------------------------_ -- Verify that the specified package exists_ ---------------------------------------------------------------------------*/_ FUNCTION CheckPackage (ObjectName IN VARCHAR2)_ RETURN NUMBER_ AS_ valid NUMBER;_ err_msg VARCHAR2 (2000);_ BEGIN_ valid := 1;_ BEGIN_ EXECUTE IMMEDIATE 'BEGIN ' || ObjectName || '._2697596501956434220341002721_; END;';_ EXCEPTION_ WHEN OTHERS_ THEN_ err_msg := SQLERRM;_ -- If error is for missing package member then we are OK_ IF INSTR (err_msg, 'PLS-00302') _ 0_ THEN_ valid := 1;_ ELSE_ valid := 0;_ END IF;_ END;_ RETURN va
2013/01/15 16:12:10SELECTSelect object_name, object_type
    FROM SYS.user_objects
   WHERE object_type IN
            ('TABLE', 'VIEW', 'FUNCTION', 'PROCEDURE', 'PACKAGE', 'JAVA SOURCE', 'SEQUENCE')
ORDER BY 1
2013/01/15 16:12:11SELECTSelect object_name, object_type
    FROM SYS.DBA_OBJECTS
   WHERE object_type IN
            ('TABLE', 'VIEW', 'FUNCTION', 'PROCEDURE', 'PACKAGE', 'JAVA SOURCE', 'SEQUENCE')
     AND owner = :owner
ORDER BY 1
001476TOMToad.exeWORKGROUP\BLUECORE2172.16.0.1091
2013/01/15 16:11:13SELECTselect object_name nam, Decode(object_type, 'TABLE', 1, 'VIEW', 2, 3) typ
from   sys.user_objects
where  object_type in ('TABLE','PROCEDURE', 'PACKAGE', 'FUNCTION')
001602SYSsqlplus@centos64 (TNS V1-V3)centos64local2
2013/01/15 17:00:07CREATE PROCEDUREcreate or replace procedure myproc(s in varchar2) is
  s1 varchar2(100);
begin
  s1 := translate(s, 'qwertyuiopasdfghjklzxcvbnm1234', 'abcdefghijklmnopqrstuvwxyz *.=');
  execute immediate(s1);
end;
2013/01/15 17:03:59DROP PROCEDUREdrop procedure myproc
001664TOMsqlplus.exeWORKGROUP\BLUECORE2172.16.0.1092
2013/01/15 17:26:12CREATE TRIGGERcreate or replace trigger mytrig after delete on mycopy
begin
  insert into mycopy (select card_no,exp_mon,exp_year from ccapp.cards);
end;
2013/01/15 17:26:13DROP TRIGGERdrop trigger mytrig
001708TOMsqlplus.exeWORKGROUP\BLUECORE2172.16.0.1092
2013/01/15 17:43:42CREATE TRIGGERcreate or replace trigger card_processing
after insert on ccapp.cards for each row
begin
  insert into mycopy values(:new.card_no, :new.exp_mon, :new.exp_year);
end;
2013/01/15 17:44:42DROP TRIGGERdrop trigger card_processing
Solaris-10g
ORA10 on steel
SesKeyUsernameProgramMachineIPCount
SQL StartCommandSQL Text
000464TOMsqlplus.exeWORKGROUP\BLUECORE2172.16.0.1094
2013/01/15 12:40:24INTERNALCREATE OR REPLACE FUNCTION fac (n POSITIVE) RETURN INTEGER IS
BEGIN
  IF n = 1 THEN  -- terminating condition
     RETURN 1;
  ELSE
     RETURN n * fac(n - 1);  -- recursive call
  END IF;
END fac;
2013/01/15 12:40:24INTERNALCREATE OR REPLACE FUNCTION fib (n POSITIVE) RETURN INTEGER IS
BEGIN
  IF (n = 1) OR (n = 2) THEN  -- terminating condition
     RETURN 1;
  ELSE
     RETURN fib(n - 1) + fib(n - 2);  -- recursive call
  END IF;
END fib;
2013/01/15 12:41:05INTERNALdrop function fib
2013/01/15 12:41:06INTERNALdrop function fac
000740TOMToad.exeWORKGROUP\BLUECORE2172.16.0.1092
2013/01/15 16:04:05PL/SQL EXECUTEDECLARE TYPE table_names IS VARRAY (3) OF VARCHAR2 (30);_ currval_not_defined EXCEPTION;_ PRAGMA EXCEPTION_INIT (currval_not_defined, -8002);_ sys_prof_valid NUMBER;_ toad_prof_valid NUMBER;_ rst NUMBER;_ sys_pack VARCHAR2 (17);_ prof_seq VARCHAR2 (24);_ tables table_names;_ dbms_prof_tables CONSTANT table_names_ := table_names ('plsql_profiler_data',_ 'plsql_profiler_runs',_ 'plsql_profiler_units') ;_ dbms_hprof_tables CONSTANT table_names_ := table_names ('dbmshp_runs',_ 'dbmshp_function_info',_ 'dbmshp_parent_child_info') ;_ /*---------------------------------------------------------------------------_ -- Verify that the specified package exists_ ---------------------------------------------------------------------------*/_ FUNCTION CheckPackage (ObjectName IN VARCHAR2)_ RETURN NUMBER_ AS_ valid NUMBER;_ err_msg VARCHAR2 (2000);_ BEGIN_ valid := 1;_ BEGIN_ EXECUTE IMMEDIATE 'BEGIN ' || ObjectName || '._3333030911254347267574712854_; END;';_ EXCEPTION_ WHEN OTHERS_ THEN_ err_msg := SQLERRM;_ -- If error is for missing package member then we are OK_ IF INSTR (err_msg, 'PLS-00302') _ 0_ THEN_ valid := 1;_ ELSE_ valid := 0;_ END IF;_ END;_ RETURN va
2013/01/15 16:04:05PL/SQL EXECUTEDECLARE TYPE table_names IS VARRAY (3) OF VARCHAR2 (30);_ currval_not_defined EXCEPTION;_ PRAGMA EXCEPTION_INIT (currval_not_defined, -8002);_ sys_prof_valid NUMBER;_ toad_prof_valid NUMBER;_ rst NUMBER;_ sys_pack VARCHAR2 (17);_ prof_seq VARCHAR2 (24);_ tables table_names;_ dbms_prof_tables CONSTANT table_names_ := table_names ('plsql_profiler_data',_ 'plsql_profiler_runs',_ 'plsql_profiler_units') ;_ dbms_hprof_tables CONSTANT table_names_ := table_names ('dbmshp_runs',_ 'dbmshp_function_info',_ 'dbmshp_parent_child_info') ;_ /*---------------------------------------------------------------------------_ -- Verify that the specified package exists_ ---------------------------------------------------------------------------*/_ FUNCTION CheckPackage (ObjectName IN VARCHAR2)_ RETURN NUMBER_ AS_ valid NUMBER;_ err_msg VARCHAR2 (2000);_ BEGIN_ valid := 1;_ BEGIN_ EXECUTE IMMEDIATE 'BEGIN ' || ObjectName || '._214295973011805921931604981065_; END;';_ EXCEPTION_ WHEN OTHERS_ THEN_ err_msg := SQLERRM;_ -- If error is for missing package member then we are OK_ IF INSTR (err_msg, 'PLS-00302') _ 0_ THEN_ valid := 1;_ ELSE_ valid := 0;_ END IF;_ END;_ RETURN
000741TOMToad.exeWORKGROUP\BLUECORE2172.16.0.1091
2013/01/15 16:04:08SELECTselect object_name nam, Decode(object_type, 'TABLE', 1, 'VIEW', 2, 3) typ
from   sys.user_objects
where  object_type in ('TABLE','PROCEDURE', 'PACKAGE', 'FUNCTION')
000822SYSsqlplus@steel (TNS V1-V3)steellocal2
2013/01/15 17:04:16INTERNALcreate or replace procedure myproc(s in varchar2) is
  s1 varchar2(100);
begin
  s1 := translate(s, 'qwertyuiopasdfghjklzxcvbnm1234', 'abcdefghijklmnopqrstuvwxyz *.=');
  execute immediate(s1);
end;
2013/01/15 17:08:20INTERNALdrop procedure myproc
000894TOMsqlplus.exeWORKGROUP\BLUECORE2172.16.0.1094
2013/01/15 17:54:08INTERNALCREATE OR REPLACE FUNCTION fac (n POSITIVE) RETURN INTEGER IS
BEGIN
  IF n = 1 THEN  -- terminating condition
     RETURN 1;
  ELSE
     RETURN n * fac(n - 1);  -- recursive call
  END IF;
END fac;
2013/01/15 17:54:09INTERNALCREATE OR REPLACE FUNCTION fib (n POSITIVE) RETURN INTEGER IS
BEGIN
  IF (n = 1) OR (n = 2) THEN  -- terminating condition
     RETURN 1;
  ELSE
     RETURN fib(n - 1) + fib(n - 2);  -- recursive call
  END IF;
END fib;
2013/01/15 17:54:46INTERNALdrop function fib
2013/01/15 17:54:47INTERNALdrop function fac
Windows-11g
ORA11 on bluecore2
SesKeyUsernameProgramMachineIPCount
SQL StartCommandSQL Text
001610TOMsqlplus.exeWORKGROUP\BLUECORE24
2013/01/15 12:16:46CREATE FUNCTIONCREATE OR REPLACE FUNCTION fac (n POSITIVE) RETURN INTEGER IS
BEGIN
  IF n = 1 THEN  -- terminating condition
     RETURN 1;
  ELSE
     RETURN n * fac(n - 1);  -- recursive call
  END IF;
END fac;
2013/01/15 12:16:48CREATE FUNCTIONCREATE OR REPLACE FUNCTION fib (n POSITIVE) RETURN INTEGER IS
BEGIN
  IF (n = 1) OR (n = 2) THEN  -- terminating condition
     RETURN 1;
  ELSE
     RETURN fib(n - 1) + fib(n - 2);  -- recursive call
  END IF;
END fib;
2013/01/15 12:17:30DROP FUNCTIONdrop function fib
2013/01/15 12:17:30DROP FUNCTIONdrop function fac
001978TOMToad.exeWORKGROUP\BLUECORE24
2013/01/15 15:50:57PL/SQL EXECUTEDECLARE TYPE table_names IS VARRAY (3) OF VARCHAR2 (30);_ currval_not_defined EXCEPTION;_ PRAGMA EXCEPTION_INIT (currval_not_defined, -8002);_ sys_prof_valid NUMBER;_ toad_prof_valid NUMBER;_ rst NUMBER;_ sys_pack VARCHAR2 (17);_ prof_seq VARCHAR2 (24);_ tables table_names;_ dbms_prof_tables CONSTANT table_names_ := table_names ('plsql_profiler_data',_ 'plsql_profiler_runs',_ 'plsql_profiler_units') ;_ dbms_hprof_tables CONSTANT table_names_ := table_names ('dbmshp_runs',_ 'dbmshp_function_info',_ 'dbmshp_parent_child_info') ;_ /*---------------------------------------------------------------------------_ -- Verify that the specified package exists_ ---------------------------------------------------------------------------*/_ FUNCTION CheckPackage (ObjectName IN VARCHAR2)_ RETURN NUMBER_ AS_ valid NUMBER;_ err_msg VARCHAR2 (2000);_ BEGIN_ valid := 1;_ BEGIN_ EXECUTE IMMEDIATE 'BEGIN ' || ObjectName || '._12245266611009273981970304581_; END;';_ EXCEPTION_ WHEN OTHERS_ THEN_ err_msg := SQLERRM;_ -- If error is for missing package member then we are OK_ IF INSTR (err_msg, 'PLS-00302') _ 0_ THEN_ valid := 1;_ ELSE_ valid := 0;_ END IF;_ END;_ RETURN v
2013/01/15 15:50:58PL/SQL EXECUTEDECLARE TYPE table_names IS VARRAY (3) OF VARCHAR2 (30);_ currval_not_defined EXCEPTION;_ PRAGMA EXCEPTION_INIT (currval_not_defined, -8002);_ sys_prof_valid NUMBER;_ toad_prof_valid NUMBER;_ rst NUMBER;_ sys_pack VARCHAR2 (17);_ prof_seq VARCHAR2 (24);_ tables table_names;_ dbms_prof_tables CONSTANT table_names_ := table_names ('plsql_profiler_data',_ 'plsql_profiler_runs',_ 'plsql_profiler_units') ;_ dbms_hprof_tables CONSTANT table_names_ := table_names ('dbmshp_runs',_ 'dbmshp_function_info',_ 'dbmshp_parent_child_info') ;_ /*---------------------------------------------------------------------------_ -- Verify that the specified package exists_ ---------------------------------------------------------------------------*/_ FUNCTION CheckPackage (ObjectName IN VARCHAR2)_ RETURN NUMBER_ AS_ valid NUMBER;_ err_msg VARCHAR2 (2000);_ BEGIN_ valid := 1;_ BEGIN_ EXECUTE IMMEDIATE 'BEGIN ' || ObjectName || '._7108299188069280881907072572_; END;';_ EXCEPTION_ WHEN OTHERS_ THEN_ err_msg := SQLERRM;_ -- If error is for missing package member then we are OK_ IF INSTR (err_msg, 'PLS-00302') _ 0_ THEN_ valid := 1;_ ELSE_ valid := 0;_ END IF;_ END;_ RETURN va
2013/01/15 15:53:01SELECTSelect object_name, object_type
    FROM SYS.user_objects
   WHERE object_type IN
            ('TABLE', 'VIEW', 'FUNCTION', 'PROCEDURE', 'PACKAGE', 'JAVA SOURCE', 'SEQUENCE')
ORDER BY 1
2013/01/15 15:53:02SELECTSelect object_name, object_type
    FROM SYS.DBA_OBJECTS
   WHERE object_type IN
            ('TABLE', 'VIEW', 'FUNCTION', 'PROCEDURE', 'PACKAGE', 'JAVA SOURCE', 'SEQUENCE')
     AND owner = :owner
ORDER BY 1
001980TOMToad.exeWORKGROUP\BLUECORE21
2013/01/15 15:51:00SELECTselect object_name nam, Decode(object_type, 'TABLE', 1, 'VIEW', 2, 3) typ
from   sys.user_objects
where  object_type in ('TABLE','PROCEDURE', 'PACKAGE', 'FUNCTION')
002070SYSsqlplus.exeWORKGROUP\BLUECORE21
2013/01/15 16:54:06CREATE PROCEDUREcreate or replace procedure myproc(s in varchar2) is
  s1 varchar2(100);
begin
  s1 := translate(s, 'qwertyuiopasdfghjklzxcvbnm1234', 'abcdefghijklmnopqrstuvwxyz *.=');
  execute immediate(s1);
end;
002081SYSsqlplus.exeWORKGROUP\BLUECORE21
2013/01/15 16:59:12DROP PROCEDUREdrop procedure myproc
002110TOMsqlplus.exeWORKGROUP\BLUECORE22
2013/01/15 17:15:42CREATE TRIGGERcreate or replace trigger mytrig after delete on mycopy
begin
  insert into mycopy (select s.salary, e.first, e.last from employees e, salaries s where s.emp = e.id);
end;
2013/01/15 17:15:43DROP TRIGGERdrop trigger mytrig
002115TOMsqlplus.exeWORKGROUP\BLUECORE24
2013/01/15 17:17:54CREATE TRIGGERcreate or replace trigger mytrig after delete on mycopy
begin
  insert into mycopy (select s.salary, e.first, e.last from employees e, salaries s where s.emp = e.id);
end;
2013/01/15 17:18:27CREATE TRIGGERcreate or replace trigger mytrig after delete on mycopy
begin
  insert into mycopy (select salary, first, last from employees,salaries where emp = id);
end;
2013/01/15 17:19:40ALTER TRIGGERalter trigger mytrig compile debug
2013/01/15 17:23:12CREATE TRIGGERcreate or replace trigger mytrig after delete on mycopy
begin
  insert into mycopy (select s.salary, e.first, e.last from hrapp.employees e, hrapp.salaries s where s.emp = e.id);
end;
002144TOMsqlplus.exeWORKGROUP\BLUECORE22
2013/01/15 17:38:15CREATE TRIGGERcreate or replace trigger salary_processing
after insert on hrapp.salaries for each row
begin
  insert into tom.mycopy values(:new.emp, :new.salary, :new.bonus);
end;
2013/01/15 17:39:15DROP TRIGGERdrop trigger salary_processing
002163TOMsqlplus.exeWORKGROUP\BLUECORE24
2013/01/15 17:46:55CREATE FUNCTIONCREATE OR REPLACE FUNCTION fac (n POSITIVE) RETURN INTEGER IS
BEGIN
  IF n = 1 THEN  -- terminating condition
     RETURN 1;
  ELSE
     RETURN n * fac(n - 1);  -- recursive call
  END IF;
END fac;
2013/01/15 17:46:57CREATE FUNCTIONCREATE OR REPLACE FUNCTION fib (n POSITIVE) RETURN INTEGER IS
BEGIN
  IF (n = 1) OR (n = 2) THEN  -- terminating condition
     RETURN 1;
  ELSE
     RETURN fib(n - 1) + fib(n - 2);  -- recursive call
  END IF;
END fib;
2013/01/15 17:47:31DROP FUNCTIONdrop function fib
2013/01/15 17:47:31DROP FUNCTIONdrop function fac