| 目次 |
|---|
|
・RECORD型 ・実行 ・実行結果 ・テーブル定義を利用したRECORD型 ・実行結果 |
CREATE OR REPLACE PROCEDURE TEST
IS
TYPE REC IS RECORD(
NUM NUMBER,
ITEM VARCHAR(20));
A REC;
BEGIN
A.NUM := 1;
A.ITEM := 'TV';
DBMS_OUTPUT.PUT_LINE('A.NUM = ' || A.NUM);
DBMS_OUTPUT.PUT_LINE('A.ITEM = ' || A.ITEM);
END;
/
A.NUM = 1 A.ITEM = TV
CREATE OR REPLACE PROCEDURE TESTTTTT
IS
REC ITEM_TABLE%ROWTYPE;
BEGIN
REC.ITEM := 'TEST';
DBMS_OUTPUT.PUT_LINE(TEST.ITM_NO);
END;
/
A.NUM = 1 A.ITEM = TV