は、Oracleの11gのDEPTNO 10は

Question

ユーザーからのDEPTNO番号を取得し、全従業員を印刷することができますどのように

は、Oracle 11gのDEPTNO 10属する所属

**Answer is 
    declare 
     cursor a(T number) is 
     Select *from EMp where Deptno = T; 
     Em a%rowtype; 
    begin 
     open a(&b); 
      loop 
      Fetch a into Em; 
      exit when a%notfound; 
      dbms_output.put_line(Em.EName); 
      end loop; 
    END; 
    /** 

Answer 1

declare 

    cursor a(T number) is 
    Select *from EMp where Deptno = T; 
    Em a%rowtype; 
begin 
    open a(&b); 
     loop 
     Fetch a into Em; 
     exit when a%notfound; 
     dbms_output.put_line(Em.EName); 
     end loop; 
END; 
/

Answer 2

暗黙のカーソルを使ってコードを簡素化することができます（Tはもちろん以下のコードブロックに提供する必要があります）。

BEGIN 
    FOR i IN (
     SELECT * 
      FROM emp 
     WHERE deptno = T 
    ) LOOP 
     dbms_output.put_line(i.EName); 
    END LOOP; 
END;