怎样同时对两个数据表进行插入?----用存储过程实现

我需要在一个函数中同时对两个数据表进行插入,当有一个插入不成功时就需要回滚,这个函数该怎么写呢?这个功能在sql server中的我会做，但在oracle中还不会，由于很急，请能解决的高人给出示例代码，在线急等！！！ 我需要在一个函数中同时对两个数据表进行插入,当有一个插入不成功时就需要回滚,这个函数该怎么写呢