1.2

Write a PL/SQL block to print account statement of any bank of your choice. The output must display minimum 3 transaction entries.







































-----------------------------------------

create table acount (ac_no number(14) primary key , billl_date date , bill_name
char(20) );
create table ditails (ac_no number (14) , tra_d date , am number(20),
tr_typ varchar2(20) );
alter table add ditails foreign key (ac_no) references acount(ac_no);

insert into acount values ( 321 , '10-oct-2010', 'barg alsahwa branch ' );

insert into ditails values ( 321, '13-jan-2010', 15 , 'credit');
insert into ditails values (321 , '11-dec-2010', 25 , 'Debit');
insert into ditails values (321 , '12-dec-2010', 17 , 'credit');


DECLARE
v number(14);
q date;
w varchar2(20);
CURSOR w3 IS
SELECT tra_d, am , tr_typ FROM ditails;
w3_rec w3%rowtype;
begin
select ac_no , billl_date, bill_name into v,q,w from acount ;

dbms_output.put_line(w);
dbms_output.put_line(q);
dbms_output.put_line('Account number ' || v);
open w3;
dbms_output.put_line('trans_date '||'amt '||'Trans Type ');
loop
fetch w3 into w3_rec;
exit when w3%notfound;
dbms_output.put_line( w3_rec.tra_d ||' '|| w3_rec.am ||' '|| w3_rec.tr_typ);
end loop;
close w3;
dbms_output.put_line(' Thank you for using Bank Muscat service ');
end;
/<BR style="mso-special-character: line-break"><BR style="mso-special-character: line-break">

تصحيح الكود فى جملة alter

الجملة الصحيحة

alter table  ditails add  foreign key (ac_no) references acount(ac_no);

الجملة الخاطئة

alter table  add ditails  foreign key (ac_no) references acount(ac_no);

ام الباقى الجمل سليم ومفيش فيه اخطاء والنتيجة هتكون كالإتــى

barg alsahwa branch 
10-OCT-10
Account number 321
trans_date amt Trans Type 
13-JAN-10 15 credit
11-DEC-10 25 Debit
12-DEC-10 17 credit
Thank you for using Bank Muscat service 

ألف شكرا أخي الله يعطيك العافيه