oracle for i in 1,sql FAQ for Oracle (一)

第一部分、SQL&PL/SQL

[Q]怎么样查询特殊字符,如通配符%与_

[A]select * from table where name like 'A\_%' escape '\'

[Q]如何插入单引号到数据库表中[A]可以用ASCII码处理,其它特殊字符如&也一样,如insert into t values('i'||chr(39)||'m'); -- chr(39)代表字符'或者用两个单引号表示一个or insert into t values('I''m'); --两个''可以表示一个'

[Q]怎样设置事务一致性[A]set transaction [isolation level] read committed;默认语句级一致性set transaction [isolation level] serializable;

read only;事务级一致性[Q]怎么样利用游标更新数据[A]cursor c1 is

select * from tablename

where name is null for update [of column]

……

update tablename set column = ……

where current of c1;

[Q]怎样自定义异常[A] pragma_exception_init(exception_name,error_number);如果立即抛出异常raise_application_error(error_number,error_msg,true|false);其中number从-20000到-20999,错误信息最大2048B异常变量SQLCODE错误代码SQLERRM错误信息[Q]十进制与十六进制的转换[A]8i以上版本:to_char(100,'XX')

to_number('4D','XX')

8i以下的进制之间的转换参考如下脚本create or replace function to_base( p_dec in number, p_base in number )

return varchar2

is

l_str varchar2(255) default NULL;

l_num number default p_dec;

l_hex varchar2(16) default '0123456789ABCDEF';

begin

if ( p_dec is null or p_base is null ) then

return null;

end if;

if ( trunc(p_dec) <> p_dec OR p_dec < 0 ) then

raise PROGRAM_ERROR;

end if;

loop

l_str := substr( l_hex, mod(l_num,p_base)+1, 1 ) || l_str;

l_num := trunc( l_num/p_base );

exit when ( l_num = 0 );

end loop;

return l_str;

end to_base;

/

create or replace function to_dec

( p_str in varchar2,

p_from_base in number default 16 ) return number

is

l_num number default 0;

l_hex varchar2(16) default '0123456789ABCDEF';

begin

if ( p_str is null or p_from_base is null ) then

return null;

end if;

for i in 1 .. length(p_str) loop

l_num := l_num * p_from_base + instr(l_hex,upper(substr(p_str,i,1)))-1;

end loop;

return l_num;

end to_dec;

/

[Q]能不能介绍SYS_CONTEXT的详细用法[A]利用以下的查询,你就明白了select

SYS_CONTEXT('USERENV','TERMINAL') terminal,

SYS_CONTEXT('USERENV','LANGUAGE') language,

SYS_CONTEXT('USERENV','SESSIONID') sessionid,

SYS_CONTEXT('USERENV','INSTANCE') instance,

SYS_CONTEXT('USERENV','ENTRYID') entryid,

SYS_CONTEXT('USERENV','ISDBA') isdba,

SYS_CONTEXT('USERENV','NLS_TERRITORY') nls_territory,

SYS_CONTEXT('USERENV','NLS_CURRENCY') nls_currency,

SYS_CONTEXT('USERENV','NLS_CALENDAR') nls_calendar,

SYS_CONTEXT('USERENV','NLS_DATE_formAT') nls_date_format,

SYS_CONTEXT('USERENV','NLS_DATE_LANGUAGE') nls_date_language,

SYS_CONTEXT('USERENV','NLS_SORT') nls_sort,

SYS_CONTEXT('USERENV','CURRENT_USER') current_user,

SYS_CONTEXT('USERENV','CURRENT_USERID') current_userid,

SYS_CONTEXT('USERENV','SESSION_USER') session_user,

SYS_CONTEXT('USERENV','SESSION_USERID') session_userid,

SYS_CONTEXT('USERENV','PROXY_USER') proxy_user,

SYS_CONTEXT('USERENV','PROXY_USERID') proxy_userid,

SYS_CONTEXT('USERENV','DB_DOMAIN') db_domain,

SYS_CONTEXT('USERENV','DB_NAME') db_name,

SYS_CONTEXT('USERENV','HOST') host,

SYS_CONTEXT('USERENV','OS_USER') os_user,

SYS_CONTEXT('USERENV','EXTERNAL_NAME') external_name,

SYS_CONTEXT('USERENV','IP_ADDRESS') ip_address,

SYS_CONTEXT('USERENV','NETWORK_PROTOCOL') network_protocol,

SYS_CONTEXT('USERENV','BG_JOB_ID') bg_job_id,

SYS_CONTEXT('USERENV','FG_JOB_ID') fg_job_id,

SYS_CONTEXT('USERENV','AUTHENTICATION_TYPE') authentication_type,

SYS_CONTEXT('USERENV','AUTHENTICATION_DATA') authentication_data

from dual

[Q]怎么获得今天是星期几,还关于其它日期函数用法[A]可以用to_char来解决,如select to_char(to_date('2002-08-26','yyyy-mm-dd'),'day') from dual;在获取之前可以设置日期语言,如ALTER SESSION SET NLS_DATE_LANGUAGE='AMERICAN';还可以在函数中指定select to_char(to_date('2002-08-26','yyyy-mm-dd'),'day','NLS_DATE_LANGUAGE = American') from dual;其它更多用法,可以参考to_char与to_date函数如获得完整的时间格式select to_char(sysdate,'yyyy-mm-dd hh24:mi:ss') from dual;随便介绍几个其它函数的用法:本月的天数SELECT to_char(last_day(SYSDATE),'dd') days FROM dual今年的天数select add_months(trunc(sysdate,'year'), 12) - trunc(sysdate,'year') from dual下个星期一的日期SELECT Next_day(SYSDATE,'monday') FROM dual

[Q]随机抽取前N条记录的问题[A]8i以上版本select * from (select * from tablename order by sys_guid()) where rownum < N;

select * from (select * from tablename order by dbms_random.value) where rownum< N;注:dbms_random包需要手工安装,位于$ORACLE_HOME/rdbms/admin/dbmsrand.sql

dbms_random.value(100,200)可以产生100到200范围的随机数[Q]抽取从N行到M行的记录,如从20行到30行的记录[A]select * from (select rownum id,t.* from table where ……

and rownum <= 30) where id > 20;

[Q]怎么样抽取重复记录[A]select * from table t1 where where t1.rowed !=

(select max(rowed) from table t2

where t1.id=t2.id and t1.name=t2.name)或者select count(*), t.col_a,t.col_b from table t

group by col_a,col_b

having count(*)>1如果想删除重复记录,可以把第一个语句的select替换为delete

[Q]怎么样设置自治事务[A]8i以上版本,不影响主事务pragma autonomous_transaction;

……

commit|rollback;

[Q]怎么样在过程中暂停指定时间[A]DBMS_LOCK包的sleep过程如:dbms_lock.sleep(5);表示暂停5秒。[Q]怎么样快速计算事务的时间与日志量[A]可以采用类似如下的脚本DECLARE

start_time NUMBER;

end_time NUMBER;

start_redo_size NUMBER;

end_redo_size NUMBER;

BEGIN

start_time := dbms_utility.get_time;

SELECT value INTO start_redo_size FROM v$mystat m,v$statname s

WHERE m.STATISTIC#=s.STATISTIC#

AND s.NAME='redo size';

--transaction start

INSERT INTO t1

SELECT * FROM All_Objects;

--other dml statement

COMMIT;

end_time := dbms_utility.get_time;

SELECT value INTO end_redo_size FROM v$mystat m,v$statname s

WHERE m.STATISTIC#=s.STATISTIC#

AND s.NAME='redo size';

dbms_output.put_line('Escape Time:'||to_char(end_time-start_time)||' centiseconds');

dbms_output.put_line('Redo Size:'||to_char(end_redo_size-start_redo_size)||' bytes');

END;

[Q]怎样创建临时表[A]8i以上版本create global temporary tablename(column list)

on commit preserve rows; --提交保留数据会话临时表on commit delete rows; --提交删除数据事务临时表临时表是相对于会话的,别的会话看不到该会话的数据。[Q]怎么样在PL/SQL中执行DDL语句[A]1、8i以下版本dbms_sql包2、8i以上版本还可以用execute immediate sql;

dbms_utility.exec_ddl_statement('sql');

[Q]怎么样获取IP地址[A]服务器(817以上):utl_inaddr.get_host_address客户端:sys_context('userenv','ip_address')

[Q]怎么样加密存储过程[A]用wrap命令,如(假定你的存储过程保存为a.sql)wrap iname=a.sql

PL/SQL Wrapper: Release 8.1.7.0.0 - Production on Tue Nov 27 22:26:48 2001

Copyright (c) Oracle Corporation 1993, 2000. All Rights Reserved.

Processing a.sql to a.plb提示a.sql转换为a.plb,这就是加密了的脚本,执行a.plb即可生成加密了的存储过程[Q]怎么样在ORACLE中定时运行存储过程[A]可以利用dbms_job包来定时运行作业,如执行存储过程,一个简单的例子,提交一个作业:VARIABLE jobno number;

BEGIN

DBMS_JOB.SUBMIT(:jobno, 'ur_procedure;',SYSDATE,'SYSDATE + 1');

commit;

END;之后,就可以用以下语句查询已经提交的作业select * from user_jobs;

[Q]怎么样从数据库中获得毫秒[A]9i以上版本,有一个timestamp类型获得毫秒,如SQL>select to_char(systimestamp,'yyyy-mm-dd hh24:mi:ssxff') time1,

to_char(current_timestamp) time2 from dual;

TIME1 TIME2

----------------------------- ----------------------------------------------------------------

2003-10-24 10:48:45.656000 24-OCT-03 10.48.45.656000 AM +08:00可以看到,毫秒在to_char中对应的是FF。8i以上版本可以创建一个如下的java函数SQL>create or replace and compile

java source

named "MyTimestamp"

as

import java.lang.String;

import java.sql.Timestamp;

public class MyTimestamp

{

public static String getTimestamp()

{

return(new Timestamp(System.currentTimeMillis())).toString();

}

};

SQL>java created.注:注意java的语法,注意大小写SQL>create or replace function my_timestamp return varchar2

as language java

name 'MyTimestamp.getTimestamp() return java.lang.String';

/

SQL>function created.

SQL>select my_timestamp,to_char(sysdate,'yyyy-mm-dd hh24:mi:ss') ORACLE_TIME from dual;

MY_TIMESTAMP ORACLE_TIME

------------------------ -------------------

2003-03-17 19:15:59.688 2003-03-17 19:15:59如果只想获得1/100秒(hsecs),还可以利用dbms_utility.get_time

[Q]如果存在就更新,不存在就插入可以用一个语句实现吗[A]9i已经支持了,是Merge,但是只支持select子查询,如果是单条数据记录,可以写作select …… from dual的子查询。语法为:MERGE INTO table

USING data_source

ON (condition)

WHEN MATCHED THEN update_clause

WHEN NOT MATCHED THEN insert_clause;如MERGE INTO course c

USING (SELECT course_name, period,

course_hours

FROM course_updates) cu

ON (c.course_name = cu.course_name

AND c.period = cu.period)

WHEN MATCHED THEN

UPDATE

SET c.course_hours = cu.course_hours

WHEN NOT MATCHED THEN

INSERT (c.course_name, c.period,

c.course_hours)

valueS (cu.course_name, cu.period,

cu.course_hours);

[Q]怎么实现左联,右联与外联[A]在9i以前可以这么写:左联:select a.id,a.name,b.address from a,b

where a.id=b.id(+)右联:

select a.id,a.name,b.address from a,b

where a.id(+)=b.id外联SELECT a.id,a.name,b.address

FROM a,b

WHERE a.id = b.id(+)

UNION

SELECT b.id,'' name,b.address

FROM b

WHERE NOT EXISTS (

SELECT * FROM a

WHERE a.id = b.id);在9i以上,已经开始支持SQL99标准,所以,以上语句可以写成:默认内部联结:select a.id,a.name,b.address,c.subject

from (a inner join b on a.id=b.id)

inner join c on b.name = c.name

where other_clause左联select a.id,a.name,b.address

from a left outer join b on a.id=b.id

where other_clause右联select a.id,a.name,b.address

from a right outer join b on a.id=b.id

where other_clause外联select a.id,a.name,b.address

from a full outer join b on a.id=b.id

where other_clause

or

select a.id,a.name,b.address

from a full outer join b using (id)

where other_clause

[Q]怎么实现一条记录根据条件多表插入[A]9i以上可以通过Insert all语句完成,仅仅是一个语句,如:INSERT ALL

WHEN (id=1) THEN

INTO table_1 (id, name)

values(id,name)

WHEN (id=2) THEN

INTO table_2 (id, name)

values(id,name)

ELSE

INTO table_other (id, name)

values(id, name)

SELECT id,name

FROM a;如果没有条件的话,则完成每个表的插入,如INSERT ALL

INTO table_1 (id, name)

values(id,name)

INTO table_2 (id, name)

values(id,name)

INTO table_other (id, name)

values(id, name)

SELECT id,name

FROM a;

[Q]如何实现行列转换[A]1、固定列数的行列转换如student subject grade

---------------------------

student1语文80

student1数学70

student1英语60

student2语文90

student2数学80

student2英语100

……转换为语文数学英语student1 80 70 60

student2 90 80 100

……语句如下:select student,sum(decode(subject,'语文', grade,null)) "语文",

sum(decode(subject,'数学', grade,null)) "数学",

sum(decode(subject,'英语', grade,null)) "英语"

from table

group by student

2、不定列行列转换如c1 c2

--------------

1我1是1谁2知2道3不……转换为1我是谁2知道3不这一类型的转换必须借助于PL/SQL来完成,这里给一个例子CREATE OR REPLACE FUNCTION get_c2(tmp_c1 NUMBER)

RETURN VARCHAR2

IS

Col_c2 VARCHAR2(4000);

BEGIN

FOR cur IN (SELECT c2 FROM t WHERE c1=tmp_c1) LOOP

Col_c2 := Col_c2||cur.c2;

END LOOP;

Col_c2 := rtrim(Col_c2,1);

RETURN Col_c2;

END;

/

SQL> select distinct c1 ,get_c2(c1) cc2 from table;即可[Q]怎么样实现分组取前N条记录[A]8i以上版本,利用分析函数如获取每个部门薪水前三名的员工或每个班成绩前三名的学生。Select * from

(select depno,ename,sal,row_number() over (partition by depno

order by sal desc) rn

from emp)

where rn<=3

[Q]怎么样把相邻记录合并到一条记录[A]8i以上版本,分析函数lag与lead可以提取后一条或前一天记录到本记录。Select deptno,ename,hiredate,lag(hiredate,1,null) over

(partition by deptno order by hiredate,ename) last_hire

from emp

order by depno,hiredate

[Q]如何取得一列中第N大的值?[A]select * from

(select t.*,dense_rank() over (order by t2 desc) rank from t)

where rank = &N;

[Q]怎么样把查询内容输出到文本[A]用spool如如sqlplus –s " / as sysdba" <

set heading off

set feedback off

spool temp.txtselect * from tab;

dbms_output.put_line(‘test’);

spool off

exit

EOF

[Q]如何在SQL*PLUS环境中执行OS命令?[A]比如进入了SQLPLUS,启动了数据库,忽然想起监听还没有启动,此时不用退出SQLPLUS,也不用另外起一个命令行窗口,直接输入:SQL> host lsntctl start或者unix/linux平台下SQL>!

windows平台下SQL>$总结:HOST 可以直接执行OS命令。备注:cd命令无法正确执行。[Q]怎么设置存储过程的调用者权限[A]普通存储过程都是所有者权限,如果想设置调用者权限,请参考如下语句create or replace

procedure ……()

AUTHID CURRENT_USER

As

begin

……

end;

[Q]怎么快速获得用户下每个表或表分区的记录数[A]可以分析该用户,然后查询user_tables字典,或者采用如下脚本即可SET SERVEROUTPUT ON SIZE 20000

DECLARE

miCount INTEGER;

BEGIN

FOR c_tab IN (SELECT table_name FROM user_tables) LOOP

EXECUTE IMMEDIATE 'select count(*) from "' || c_tab.table_name || '"' into miCount;

dbms_output.put_line(rpad(c_tab.table_name,30,'.') || lpad(miCount,10,'.'));

--if it is partition table

SELECT COUNT(*) INTO miCount FROM User_Part_Tables WHERE table_name = c_tab.table_name;

IF miCount >0 THEN

FOR c_part IN (SELECT partition_name FROM user_tab_partitions WHERE table_name = c_tab.table_name) LOOP

EXECUTE IMMEDIATE 'select count(*) from ' || c_tab.table_name || ' partition (' || c_part.partition_name || ')'

INTO miCount;

dbms_output.put_line(' '||rpad(c_part.partition_name,30,'.') || lpad(miCount, 10,'.'));

END LOOP;

END IF;

END LOOP;

END;

[A]怎么在Oracle中发邮件[Q]可以利用utl_smtp包发邮件,以下是一个发送简单邮件的例子程序/****************************************************************************

parameter: Rcpter in varchar2接收者邮箱Mail_Content in Varchar2邮件内容desc: ·发送邮件到指定邮箱·只能指定一个邮箱,如果需要发送到多个邮箱,需要另外的辅助程序****************************************************************************/

CREATE OR REPLACE PROCEDURE sp_send_mail( rcpter IN VARCHAR2,

mail_content IN VARCHAR2)

IS

conn utl_smtp.connection;

--write title

PROCEDURE send_header(NAME IN VARCHAR2, HEADER IN VARCHAR2) AS

BEGIN

utl_smtp.write_data(conn, NAME||': '|| HEADER||utl_tcp.CRLF);

END;

BEGIN

--opne connect

conn := utl_smtp.open_connection('smtp.com');

utl_smtp.helo(conn, 'oracle');

utl_smtp.mail(conn, 'oracle info');

utl_smtp.rcpt(conn, Rcpter);

utl_smtp.open_data(conn);

--write title

send_header('From', 'Oracle Database');

send_header('To', '"Recipient" ');

send_header('Subject', 'DB Info');

--write mail content

utl_smtp.write_data(conn, utl_tcp.crlf || mail_content);

--close connect

utl_smtp.close_data(conn);

utl_smtp.quit(conn);

EXCEPTION

WHEN utl_smtp.transient_error OR utl_smtp.permanent_error THEN

BEGIN

utl_smtp.quit(conn);

EXCEPTION

WHEN OTHERS THEN

NULL;

END;

WHEN OTHERS THEN

NULL;

END sp_send_mail;

[A]怎么样在Oracle中写操作系统文件,如写日志[Q]可以利用utl_file包,但是,在此之前,要注意设置好Utl_file_dir初始化参数/**************************************************************************

parameter:textContext in varchar2日志内容desc: ·写日志,把内容记到服务器指定目录下·必须配置Utl_file_dir初始化参数,并保证日志路径与Utl_file_dir路径一致或者是其中一个****************************************************************************/

CREATE OR REPLACE PROCEDURE sp_Write_log(text_context VARCHAR2)

IS

file_handle utl_file.file_type;

Write_content VARCHAR2(1024);

Write_file_name VARCHAR2(50);

BEGIN

--open file

write_file_name := 'db_alert.log';

file_handle := utl_file.fopen('/u01/logs',write_file_name,'a');

write_content := to_char(SYSDATE,'yyyy-mm-dd hh24:mi:ss')||'||'||text_context;

--write file

IF utl_file.is_open(file_handle) THEN

utl_file.put_line(file_handle,write_content);

END IF;

--close file

utl_file.fclose(file_handle);

EXCEPTION

WHEN OTHERS THEN

BEGIN

IF utl_file.is_open(file_handle) THEN

utl_file.fclose(file_handle);

END IF;

EXCEPTION

WHEN OTHERS THEN

NULL;

END;

END sp_Write_log;

  • 0
    点赞
  • 0
    收藏
    觉得还不错? 一键收藏
  • 0
    评论

“相关推荐”对你有帮助么?

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值