I am trying to write PL/SQL CODE FOR ATM Machine
789305Aug 16 2010 — edited Aug 17 2010I am trying to write PL/SQL CODE FOR ATM Machine
declare
vaccno kcb_acc.accno%type:=&accno;
vamt kcb_trans.amt%type:=&amount;
vbal kcb_acc.bal%type;
vatype kcb_acc.atype%type;
begin
select atype,bal into vatype,vbal from kcb_acc where accno=vaccno;
vbal:=vbal-vamt;
if (vatype ='S' and vbal<5000) or (vatype='C' and vbal<10000) then
raise_application_error(-20345,'insufficient funds');
else
update kcb_acc set bal=vbal where accno=vaccno;
insert into kcb_trans values (s1.nextval,vaccno,vatype,sysdate,vamt);
end if;
end;
something like pls helpme
Edited by: nataraj kesana on Aug 16, 2010 10:06 PM