A Simple Package Specification Without a Body
CREATE PACKAGE trans_data
AS -- bodiless package
TYPE timerec IS RECORD(minutes SMALLINT,
hours SMALLINT);
TYPE transrec IS RECORD(category VARCHAR2(10),
account INT,
amount REAL,
time_of TIMEREC);
minimum_balance CONSTANT REAL := 10.00;
number_processed INT;
insufficient_funds EXCEPTION;
END trans_data;
/
Package created.
0 comments:
Post a Comment