Buat tabel stuinfo1
(
kunci primer stuid int,
stuname varchar(10) bukan null,
stusex char(2) check(stusex='laki-laki' atau stusex='perempuan'),
Tanggal Stubir
);
sisipkan ke dalam nilai stuinfo ('001','Zhang San','laki-laki',to_date ('1999-1-1','yyyy-mm-dd'));
sisipkan ke dalam nilai stuinfo ('002','Reese','male',to_date ('1997-12-1','yyyy-mm-dd'));
masukkan ke dalam nilai stuinfo ('003', 'Wang Wu', 'perempuan', to_date ('1995-3-4', 'yyyy-mm-dd'));
masukkan ke dalam nilai stuinfo ('004','haha','male',to_date ('2000-7-5','yyyy-mm-dd'));
Masukkan ke dalam nilai Stuinfo ('005', 'haha', 'laki-laki', to_date ('1993-7-5', 'yyyy-mm-dd'));
--Pengecualian yang telah ditentukan sebelumnya sistem
menyatakan
v_name stuinfo.stuname%type;
mulai
Pilih Stuname ke v_name dari Stuinfo;
--pengecualian
-- ketika too_many_rows kemudian
-- dbms_output.put_line('Hasil kueri berlebihan, tidak dapat ditetapkan');
akhir;
--pengecualian yang ditentukan pengguna
menyatakan
money_error pengecualian;
uang1 int := 1000;
money2 int :=& jumlah transfer;
mulai
jika uang1-uang2 < 0 maka
raise_application_error (-20001, 'Saldo tidak mencukupi');
--menaikkan money_error;
yang lain
dbms_output.put_line('Transfer berhasil');
berakhir jika;
--pengecualian
-- ketika money_error kemudian
-- dbms_output.put_line('Saldo tidak mencukupi');
akhir;
--pengecualian yang tidak ditentukan sebelumnya
menyatakan
pengecualian myerror;
pragma exception_init(kesalahan saya,-1);
mulai
sisipkan ke dalam nilai stuinfo ('001','aa','female',to_date('1995-3-4','yyyy-mm-dd'));
pengecualian
ketika myerror maka
dbms_output.put_line('Pelanggaran batasan keunikan kunci primer');
akhir;
masukkan ke dalam nilai stuinfo1 (1,'sdf','male','');
Pilih * dari TB1;
Drop Table TB1;
--sql dinamis
mulai
Langsung jalankan 'Buat Tabel TB1(Tid Int)';
akhir;
menyatakan
sqlString varchar2(200);
tId int:=2;
mulai
sqlString:='masukkan ke dalam nilai tb1 (:1)';
eksekusi sqlString langsung menggunakan tId;
akhir;
pilih * dari stuinfo;
--Kursor implisit
mulai
DBMS_OUTPUT. PUT_LINE('Sebelum menyisipkan:'|| SQL%ROWCOUNT);
update stuinfo set stusex = 'laki-laki';
DBMS_OUTPUT. PUT_LINE('Setelah menyisipkan:'|| SQL%ROWCOUNT);
AKHIR;
|
Diposting pada 19/03/2015 09.28.41
|
|
|
