oracle第五章上课代码

admin

1. create table tab1
   
2. (
   
3.        tid number primary key,
   
4.        tname varchar(10)
   
5. );
   
6. insert into tab1 values (1,'aaa');
   
7. insert into tab1 values (2,'ddd');
   
8. insert into tab1 values (3,'cccc');
   
9. 
   
10. select * from tab1;
    
11. 
    
12. --pl/sql
    
13. begin
    
14. dbms_output.put_line('my first pl/sql');
    
15. end;
    
16. --变量
    
17. declare
    
18.     --声明并初始化
    
19.     a number := 1;
    
20.     b number default 2;
    
21.     c number;
    
22.     d varchar(10);
    
23. begin
    
24.     dbms_output.put_line('a='||a);
    
25.     dbms_output.put_line('b='||b);
    
26.     --赋值1
    
27.     c := 3;
    
28.     dbms_output.put_line('c='||c);
    
29.     --赋值2
    
30.     select tname into d from tab1 where tid = 1;
    
31.     dbms_output.put_line('d='||d);
    
32. end;
    
33. 
    
34. declare
    
35.     --设置a的类型与tab1表中tid字段的类型一样
    
36.     a tab1.tid%type;
    
37.     b tab1.tname%type;
    
38. begin
    
39.     a := 123;
    
40.     b := 'name';
    
41.     dbms_output.put_line('a='||a);
    
42.     dbms_output.put_line('b='||b);
    
43. end;
    
44. 
    
45. --循环4要素
    
46. --1.loop
    
47. declare
    
48.     i int := 1;--1
    
49. begin
    
50.     loop
    
51.         exit when i > 10;--2
    
52.         dbms_output.put_line(i);--4
    
53.         i := i + 1;--3
    
54.     end loop;
    
55. end;
    
56. --2. while
    
57. declare
    
58.     i int := 1;--1
    
59. begin
    
60.     while i <= 10--2
    
61.     loop
    
62.         dbms_output.put_line(i);--4
    
63.         i := i + 1;--3
    
64.     end loop;
    
65. end;
    
66. --3. for
    
67. begin
    
68.     for i in 1..20--1,2,3
    
69.     loop
    
70.         dbms_output.put_line(i);--4
    
71.     end loop;
    
72. end;
    

复制代码