Oracle Database Discussions

could any one help me to conver following script in to oracle script




Create Procedure Insert_profilebasicdetail
(
@isubprofileid as int,
@Copyisubprofileid as int,
@itranno as int,
)
As
Begin

Declare @IncKeyId as int
Declare @tempkeyId as int
set @IncKeyId=(select isNull(Max(ikeyId),0)as MaxKeyId from profilebasicdetail)

Declare TempInsert cursor for select ikeyId--,iprofileid,iquestionid,vquestionans,cstatusindi,dmodifyon,imodifyby,iyear
from profilebasicdetail where isubprofileid=@Copyisubprofileid and itranno=@itranno
open TempInsert
fetch from TempInsert into @tempkeyId
while @@fetch_Status=0
Begin

set @IncKeyId = @IncKeyId + 1

Insert into profilebasicdetail
(ikeyid,iprofileid,iquestionid,vquestionans,cstatusindi,dmodifyon,imodifyby,itranno,iyear,isubprofileid)
values(select @IncKeyId,iprofileid,iquestionid,vquestionans,cstatusindi,dmodifyon,imodifyby,'1',
iyear,@isubprofileid from profilebasicdetail where ikeyId=@tempkeyId)

fetch next from TempInsert into @tempkeyId
End

End





Regards,
Ajay