Create Or Replace Procedure Abc(n Number) Is --输入参数
Type Cursortype Is Ref Cursor; --定义游标类型,好的使用方式 Resultset Cursortype; --定义游标变量
Deptstate Tb000000department%Rowtype; --定义行对象
Strsql Varchar2(500) := 'create or replace view aView as('; --变量初始化
Begin Open Resultset For --打开游标 --查询所有座席在某小时内的各状态的汇总时间 Select * From Tb000000department t; Loop --循环遍历游标 Fetch Resultset Into Deptstate; Exit When Resultset%Notfound; If n > 0 Then Dbms_Output.Put_Line(Strsql || '+' || Deptstate.Lid || '+' || n); End If; End Loop; --关闭游标 Close Resultset;Exception --捕获异常 When Others Then Begin If Resultset%Isopen Then Close Resultset; End If; End;End Abc;