a我考网

 找回密码
 立即注册

QQ登录

只需一步,快速开始

扫一扫,访问微社区

查看: 175|回复: 1

[考试辅导] Oracle技术:Oracle数据库操作存储方法

[复制链接]
发表于 2012-8-4 14:06:19 | 显示全部楼层 |阅读模式
 插入:   1 CREATE OR REPLACE Procedure p_insert_t_stu --存储过程名称
: s( L0 E. r" O) [( A" J  2  (
2 W3 P/ b1 ^# ^/ e8 [  3   p_stuid in Number,
6 o4 }# o' {3 V3 Z2 s6 D$ j! I  4   p_stuname in Nvarchar2,
0 x! c$ J" ]3 f  5   p_stusex in Nvarchar2,
6 L) @; o9 Y- y- m# _  6   p_stuadd in Nvarchar2% L4 ^) Y5 T+ o$ q' r
  7 )
6 N  v: ]. f4 Y" Y% k  8  as2 l% f/ f# g( T" y' B2 X
  9  BEGIN
/ ^1 p1 r- B0 f7 ^8 F2 q. K' J" c  10 insert into t_stu
& ~+ Z; C; p, Z# h  E0 K9 O  11 values4 d6 |7 y6 }# l5 E2 k4 s+ w/ o0 t
  12 (p_stuid,p_stuname,p_stusex,p_stuadd);
' h$ E6 f, k5 B- B' g7 Y  13 commit;
# k' s, n2 n9 ?; a* c+ ^( k. H  14 end;3 J, z+ w# x" |  O' i
  删除:  P7 r- D% C: S* [) k0 T3 q  h, G! O
  1 CREATE OR REPLACE Procedure p_delete_t_stu --存储过程名称
* ?1 R* S; K  o( Q6 N+ |7 ]2 Z7 A  2 (
1 q4 `" ^/ P" ?4 b. N$ F  3   p_stuid in Number,& q- m- H8 P. W9 v
  4   p_msg Out Nvarchar2
/ g/ |7 }: _0 _7 Y  5 )2 F" ^8 I0 @& T( A  p
  6 Is9 h- G  Z+ U0 A+ J
  7 flag Integer := 1;0 X! c1 P: y4 ]" E& ~/ r
  8 v_stuid Number;. d: U- e! [6 X" c! q+ r4 l; V

/ c1 p! H! S7 C8 k  9 Begin
回复

使用道具 举报

 楼主| 发表于 2012-8-4 14:06:20 | 显示全部楼层

Oracle技术:Oracle数据库操作存储方法

</p>  10 Select flag Into v_stuid From t_stu Where stuid=p_stuid;
3 ?1 @9 Q  |' N. ?$ |  11 Delete t_stu( D+ K, ]3 Z: H/ J9 U. J
  12 Where
: n8 p7 R' T0 {1 U6 t  13 stuid=p_stuid;- ^: W( R, b3 l, U: f4 \
  14 commit;5 e- \# C* S/ n7 U
  15 If flag=1 Then9 b1 m4 W8 h" u
  16  Begin
6 j& B+ s$ G% c  17    p_msg:='删除成功';  18  End;( p9 T. l( v) a
  19 End If;9 w9 _! J" V$ U- ^; m3 e- J7 i
  20 Exception  21  When Others Then
# q3 E9 N. A5 G  F. y  22    p_msg:=Sqlerrm || ',' || '删除失败';9 ]) W; W5 H4 p! k! V
  23 END;; I( M& t  s* W/ J7 |+ D
  修改:" A; t& l* f# B  Y/ F/ X
  1 CREATE OR REPLACE Procedure p_update_t_stu --存储过程名称
% T4 g7 p& B7 p# P6 j- y9 M  2 (" X! b, \7 B+ d: j3 b) r
  3   p_stuid in Number,. J, e: t. B1 |8 [* o; M
  4   p_stuname in Nvarchar2,
( K1 m: |6 l$ h; |! f- A4 `2 L  5   p_stusex in Nvarchar2,
' t  x) i, T% b& t% `9 `, `7 [3 E  6   p_stuadd in Nvarchar2
3 r+ f0 {3 x! S( `, H  7 )
0 V. E6 Z$ I7 f- {3 P1 I  8 as6 X: m4 t( i1 \9 }( v1 S! f
  9 BEGIN+ h: b/ h( d3 I, d1 l" M6 M
  10 Update t_stu Set stuname=p_stuname,stusex=p_stusex,stuadd=p_stuadd  ]( z" p1 j, `% }- d1 T# q" m
  11 Where- N5 L" z/ c  v& q2 `, c$ b  [+ q
  12 stuid=p_stuid;! r$ v  h1 ?; o7 v: m5 j1 K- b  s
  13 commit;
) v$ T) U1 G& I0 i& V9 E; K$ \  14 end;
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

Archiver|手机版|小黑屋|Woexam.Com ( 湘ICP备18023104号 )

GMT+8, 2024-9-28 04:48 , Processed in 2.748531 second(s), 24 queries .

Powered by Discuz! X3.4 Licensed

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表