DECLARE TYPE num_tab IS TABLE OF NUMBER INDEX BY BINARY_INTEGER; v_example_tab1 num_tab; v_example_tab2 num_tab; v_num NUMBER :=13; BEGIN v_example_tab1(1):=1001; v_example_tab1(10):=1002; v_example_tab1(-10):=1003; v_example_tab1(v_num):=1004; v_ex
/*departments.location_id//部门地址编号*/ /*复制表的命令 create table emp2 as select * from emp where 1=1;*/ /*一、修改职员表中编号为120号职工的工资加1000并显示此职工的工资,名字 ,入职日期*/ declare type dd_rec is record( dd_sal number(8,2), dd_name varchar2(20), dd_hiredate date ); v_rec dd_re
游标 显式游标 1声明 cursor 名称 is 查询语句 2 打开游标 open 游标名 例: declare Cursor stu_cur is select * from student; begin open stu_cur; dbms_output.put_line(stu_cur%rowcount); end;
二、 注释说明 1. 本注释说明主要用于PL/SQL程序及其它SQL文件,其它可作参考; 2. SQLPLUS接受的注释有三种: ―― 这儿是注释 /* 这儿是注释 */ REM 这儿是注释 3. 开始注释,类似JAVAK中的开始注释,主要列出文件名,编写日期,版权说明,程序功能以及修改记录: REM REM $Header: filename, version, created date,auther REM REM Copyright REM RE
oracle求100和200之间素数方法 for方法: declare flag boolean := true; begin for n in 100..200 loop flag := true; for i in 2..n-1 loop if mod (n,i) = 0 then flag := false; end if; end loop; if(flag = true) then dbms_output.put_line(n); end if; end loop; end; whi
创建存储过程 create or replace procedure insert_userinfo --用户注册 (parm_username varchar2, parm_passwd varchar2, parm_ename varchar2, parm_logo varchar2, parm_result out number)--返回值 1:成功,0:失败 as n number; begin select count(*) into n from userinfo where us
-- 首先,以超级管理员的身份登录oracle sqlplus sys/bjsxt as sysdba --然后,解除对scott用户的锁 alter user scott account unlock; --那么这个用户名就能使用了。 --(默认全局数据库名orcl) 1、select ename, sal * 12 from emp; --计算年薪 2、select 2*3 from dual; --计算一个比较纯的数据用dual表 3、select sysdate from dual;
Oracle P/L SQL实现发送Email、浏览网页等网络操作功能 Oracle P/L SQL实现发送Email、浏览网页等网络操作功能,以下是此过程包的头部,包体经常打包处理plb,感兴趣用户可以下载下来。 --.使用聚合函数实现 多行合并 Drop Type Strcat_type; Drop Function f_StrCat; Drop Package UTL_INet; Variable ls_ObjectName VarChar2(128); Begin Select Seq
Oracle用三种循环方法输出乘法表,比如loop的用法: m := 1; loop n := 1; loop dbms_output.put(m||'*'||n||'='||m*n||' '); n := n + 1; exit when n > m; end loop; dbms_output.put_line(''); m := m + 1; exit when m>9; end loop;