create or replace procedure tran(outname varchar2,inname varchar2,tranval int)
is
tran_no number;
tran_name varchar2(10);
begin
select ename,sal into tran_name,tran_no from emp where ename=outname;
update emp set sal = sal + tranval where ename=inname;
update emp set sal = tran_no - tranval where ename=outname;
dbms_output.put_line('已经转帐成功');
end;
/
is
tran_no number;
tran_name varchar2(10);
begin
select ename,sal into tran_name,tran_no from emp where ename=outname;
update emp set sal = sal + tranval where ename=inname;
update emp set sal = tran_no - tranval where ename=outname;
dbms_output.put_line('已经转帐成功');
end;
/
解决方案 »
- oracle安装的问题,请各位大侠帮忙,急~~~
- 数据库查询语句,怎么查询那个null值啊,在线等,急!!
- ORA-12514 监听程序当前无法识别连接描述符中的服务
- 【求助】在plsql中如何界定这样的日期格式(2008-12-23 15:20:50)来统计当天数据???
- 关于触发器(触发器中不能使用本表吗)
- 问的问题怎么就没人知道呢?在线急帮忙啊(*************)
- 下载?
- 大家谁有ORACLE Developer/2000 的开发指南或者教学之类的电子书?200分
- oracle9i数据库里多余空格的问题
- 一个简单问题:关于删除列
- 这个UPDATE语句如何写?
- 谁有 redhat linux 下安装 oracle 9i 的文档
is
begin
update emp set sal = sal + tranval where ename=inname;
update emp set sal = sal - tranval where ename=outname;
dbms_output.put_line('已经转帐成功');
end;
/这样也就够了。
is
begin
update emp set sal = sal + tranval where ename=inname;
update emp set sal = sal - tranval where ename=outname;
commit;
dbms_output.put_line('已经转帐成功');
exception
when others then
rollback;
dbms_output.put_line('转帐失败');
end;
/这样更好点。