资源描述:
《oracle数据库游标在包中的使用》由会员上传分享,免费在线阅读,更多相关内容在教育资源-天天文库。
1、--创建学员信息表createtablestuInfo( stuIdvarchar2(15)notnull, --学员Id,主键 stuNamevarchar2(10)notnull, --学员姓名 stuNovarchar2(10)notnull, --学号,外键应用stuMarks的stuNo stuAgeintnotnull, --年龄 stuAddressvarchar2(100)default('中国')notnull,--家庭住址 stuEmailvarc
2、har2(100)notnull --电子邮箱);altertablestuInfoaddconstraintPK_stuIdprimarykey(stuId);altertablestuInfoaddconstraintCK_stuAgecheck(stuAgebetween18and40);altertablestuInfoaddconstraintCK_stuEmailcheck(stuEmaillike'%@%');--创建序列createsequenceSQ_IDincrementby1st
3、artwith10000;--为学员信息表创建触发器TG_STUIDcreateorreplacetriggerTG_STUIDbeforeinsertonstuInfoforeachrowbegin select'SID'
4、
5、SQ_ID.Nextvalinto:new.stuIdfromdual;end;--向学员信息表中添加数据insertintostuInfo(stuName,stuNo,stuAge,stuAddress,stuEmail)values('张飞','s1t0102',30,'
6、三国','zhangfei@sina.com');insertintostuInfo(stuName,stuNo,stuAge,stuAddress,stuEmail)values('关羽','s1t0830',35,'蜀国','guanyu@google.com');insertintostuInfo(stuName,stuNo,stuAge,stuAddress,stuEmail)values('马超','s2t1326',25,'三国','machao@sohu.com');insertinto
7、stuInfo(stuName,stuNo,stuAge,stuAddress,stuEmail)values('刘备','s3t0403',40,'蜀国','liubei@163.com');insertintostuInfo(stuName,stuNo,stuAge,stuAddress,stuEmail)values('诸葛亮','s2t1521',21,'蜀国','zhugeliang@yahoo.com');insertintostuInfo(stuName,stuNo,stuAge,stu
8、Address,stuEmail)values('刘翔','s3t0706',29,'上海','liuxiang@Gmail.com');insertintostuInfo(stuName,stuNo,stuAge,stuAddress,stuEmail)values('曹操','s3t0915',34,'魏国','caocao@TOM.com');insertintostuInfo(stuName,stuNo,stuAge,stuAddress,stuEmail)values('孙权','s1t11
9、23',32,'东吴','sunquan@126.com');insertintostuInfo(stuName,stuNo,stuAge,stuAddress,stuEmail)values('董卓','s2t0507',35,'三国','dongzhuo@cctv.com');insertintostuInfo(stuName,stuNo,stuAge,stuAddress,stuEmail)values3('朱军','s2t1127',39,'北京','zhujun@cctv.com');***
10、*********************************--在包中使用游标(无参游标)--定义包头createorreplacepackagePKG_STUis cursorgetStuInforeturnstuInfo;endPKG_STU;--创建包体createorreplacepackagebodyPKG_STUas cursorgetStuInforeturnstuInfois select*fromstuInfo;endPK