Oracle 复合变量之 RECORD

<!--<br /> <br /> Code highlighting produced by Actipro CodeHighlighter (freeware)<br /> http://www.CodeHighlighter.com/<br /> <br /> --> CREATE   OR   REPLACE
PROCEDURE    TEST_RECORD 
AS
  TYPE user_record_type  IS  RECORD(
    id users.id % TYPE,
    login_id users.login_id % TYPE,
    name users.name % TYPE);
  u_r_t user_record_type;
BEGIN
   FOR  recd  IN  ( SELECT   *   FROM  users) LOOP
     SELECT  id,login_id,name  INTO  u_r_t  FROM  users  WHERE  id = recd.id;
    dbms_output.put_line( ' ID:  ' || u_r_t.id  || ' ,    LOGIN_ID:  ' || u_r_t.login_id || ' ,    NAME:  ' || u_r_t.name);
   END  LOOP;
   NULL ;
END ;