先创建表:
CREATE TABLE TB_USER
(
ID INTEGER PRIMARY KEY,
USER_NAME VARCHAR2(20) NOT NULL,
USER_AGE INTEGER NOT NULL
);
CREATE SEQUENCE SEQ_USER
INCREMENT BY 1
START WITH 1
NOMAXVALUE
NOCYCLE
CACHE 10;
CREATE OR REPLACE TRIGGER TR_USER BEFORE INSERT ON TB_USER FOR EACH ROW
BEGIN
SELECT SEQ_USER.NEXTVAL INTO :NEW.ID FROM DUAL;
END;
插入一些数据。
然后创建游标来循环输出表里面的数据:
DECLARE
TYPE SP_USER_CURSOR IS REF CURSOR;
V_USER_CURSOR SP_USER_CURSOR;
V_NAME TB_USER.USER_NAME%TYPE;
V_AGE TB_USER.USER_AGE%TYPE;
BEGIN
OPEN V_USER_CURSOR FOR SELECT USER_NAME, USER_AGE FROM TB_USER;
LOOP
FETCH V_USER_CURSOR INTO V_NAME, V_AGE;
EXIT WHEN V_USER_CURSOR%NOTFOUND;
DBMS_OUTPUT.put_line(V_NAME || ', ' || V_AGE);
END LOOP;
CLOSE V_USER_CURSOR;
END;