--按照部门编号查询部门信息
Create Or Replace Procedure findDeptByDeptno(p_dno In dept.deptno%Type)
Is
v_deptrec dept%Rowtype;
Begin
Select * Into v_deptrec From dept Where deptno=p_dno;
dbms_output.put_line('------------------------ ');
dbms_output.put_line('部门编号: '||v_deptrec.deptno);
dbms_output.put_line('部门名称: '||v_deptrec.dname);
dbms_output.put_line('部门位置: '||v_deptrec.loc);
dbms_output.put_line('------------------------ ');
Exception When no_data_found Then
dbms_output.put_line('该部门不存在...');
End;
------解决方案--------------------