oracle project 3

procedure fundtransfer(a number,a1 number,b number)
is
cursor c1 is select * from cust_det where cin=a;
cursor c2 is select * from cust_det where cin=a1;
begin
select balance into bal1 from cust_det where cin=a;
select minbal into mb1 from bank_master;
select count(*) into fw from transactions where cin=a and to_char(tdate)=to_char(sysdate) and txntype='w';

if(bal1>b) && (bal1>=mb1) then

for i in c1 loop
exit when c1%notfound;
dbms_output.put_line('previous balance is'||' '||i.balance);
update cust_det set bal=i.bal-b where cin=a;
select balance into z from cust_det where cin=a;
dbms_output.put_line('current balance is'||' '||z);
insert into transactions values(i.cin,i.transdate,i.txnbal);

for i in c2 loop
exit when c2%notfound;
dbms_output.put_line('previous balance is'||' '||i.bal);
update bank_details set bal=i.bal+b where cin=a1;
select bal into z from bank_details where cin=a1;
dbms_output.put_line('current balance is'||' '||z);
end loop;
end loop;
else
dbms_output.put('insufficient funds');
end fundtransfer;

end transactions;
/