求助，哪位好心的GG帮我把下面的这个SQL Server的存储过程变成Oracle的？谢谢先！！！！！！！！

Question

CREATE PROCEDURE UserInfo_Insert1
@UserName char(16),
@FullName varchar(32),
@Password varchar(50),
@Level smallint,
@AreaCode char(12),
@Status bit,
@OrgName varchar(50),
@OfficeTel char(20),
@Fax char(20),
@MobileTel char(12),
@Email varchar(50),
@Address varchar(100),
@Postalcode char(10),
@Re varchar(200),
@BuildTime datetime,
@LastLogTime datetime,
@LastLogIP char(20)
AS
DECLARE @UserID VARCHAR(50)
SET @UserID = RTRIM(LTRIM(@UserName))
BEGIN TRANSACTION
INSERT INTO UserInfo([UserName], [FullName], [Password],[Level],[AreaCode],[Status], [OrgName], [OfficeTel], [Fax], [MobileTel], [Email], [Address], [Postalcode],[Re], [BuildTime], [LastLogTime], [LastLogIP]) VALUES(@UserName, @FullName, @Password, @Level,@AreaCode, @Status,@OrgName, @OfficeTel, @Fax, @MobileTel, @Email, @Address, @Postalcode, @Re, @BuildTime, @LastLogTime, @LastLogIP)
INSERT INTO SysGroupMembership(GroupID,UserName) VALUES(1,@Username)
IF @@ERROR <> 0
ROLLBACK TRAN
ELSE
COMMIT TRANGO

Answer 1

CREATE or replace PROCEDURE UserInfo_Insert1 (  
UserName char,                                
FullName varchar2,                            
Password varchar2,                            
Level smallint,                               
AreaCode char,                                
Status number,                                
OrgName varchar2,                             
OfficeTel char,                               
Fax char,                                     
MobileTel char,                               
Email varchar2,                               
Address varchar2,                             
Postalcode char,                              
Re varchar2,                              
BuildTime date,                               
LastLogTime date,                             
LastLogIP char  )                             
AS                                             
UserID varchar22(50) ;                        
begin                                               
UserID := RTRIM(LTRIM(UserName))  ;               
                                                    
INSERT INTO UserInfo(UserName,                  
FullName,                                       
Password,Level,                                 
AreaCode,Status,                                
OrgName, OfficeTel,                             
Fax,                                            
MobileTel,                                      
Email,                                          
Address,                                        
Postalcode,                                     
Re,                                         
BuildTime,                                      
LastLogTime, LastLogIP)                         
VALUES(UserName,                                
FullName,                                       
Password,                                       
Level,AreaCode,                                 
Status,                                         
OrgName,                                        
OfficeTel,                                      
Fax,                                            
MobileTel,                                      
Email, Address,                                 
Postalcode,                                     
Re,                                         
BuildTime,                                      
LastLogTime,                                    
LastLogIP);                                     
INSERT INTO SysGroupMembership(GroupID,UserName)
VALUES(1,Username)  ;                           
IF SQL%ROWCOUNT = 0 then                          
ROLLBACK  ;                                     
ELSE                                              
COMMIT  ;                                       
  end if                                            
 END;                                               
  
      

Answer 2

兄弟，你的IF SQL%ROWCOUNT = 0 then                          
ROLLBACK  ;                                     
ELSE                                              
COMMIT  ;                                       
  end if                                         这一块有问题，去掉就OK了，能不能再帮忙修改一下？

Answer 3

谢谢， anglequhongmei(蛐蛐) 兄弟！！！！！！！！！！！！
我已经弄好了