Solve this and replay me i hunged here

[nazimsal]

Imports System.Data.SqlClient
Namespace Accounts
    Public Class NewAccount
        Dim cmd As New SqlCommand
        Dim c As New DatabaseConnection.DataBaseConnaction.ConnectionClass
        Function CreateAccount(ByVal BankID As String, ByVal Account_TypeID As String, ByVal First_Name As String, ByVal Last_Name As String, ByVal Date_Birth As DateTime, ByVal Citizenship As String, ByVal Civil_Id As Integer, ByVal address As String, ByVal Father_Name As String, ByVal Profession As String, ByVal Description As String, ByVal Date_creation As DateTime, ByVal phoneNo As String, ByVal emailid As String, ByVal ext As String, ByVal CreatedBy As String, ByVal UserID As String)
            Try
                cmd.Parameters.Add("@BankID", SqlDbType.VarChar)
                cmd.Parameters.Item("@BankID").Value = BankID
 
                cmd.Parameters.Add("@Account_TypeID", SqlDbType.VarChar)
                cmd.Parameters.Item("@Account_TypeID").Value = Account_TypeID
 
                cmd.Parameters.Add("@First_Name", SqlDbType.VarChar)
                cmd.Parameters.Item("@First_Name").Value = First_Name
 
                cmd.Parameters.Add("@Last_Name", SqlDbType.VarChar)
                cmd.Parameters.Item("@Last_Name").Value = Last_Name
 
                cmd.Parameters.Add("@Date_Birth", SqlDbType.DateTime)
                cmd.Parameters.Item("@Date_Birth").Value = Date_Birth
 
                cmd.Parameters.Add("@Citizenship", SqlDbType.VarChar)
                cmd.Parameters.Item("@Citizenship").Value = Citizenship
 
                cmd.Parameters.Add("@Civil_Id", SqlDbType.Int)
                cmd.Parameters.Item("@Civil_Id").Value = Civil_Id
 
                cmd.Parameters.Add("@Address", SqlDbType.VarChar)
                cmd.Parameters.Item("@Address").Value = address
 
                cmd.Parameters.Add("@Father_Name", SqlDbType.VarChar)
                cmd.Parameters.Item("@Father_Name").Value = Father_Name
 
                cmd.Parameters.Add("@Profession", SqlDbType.VarChar)
                cmd.Parameters.Item("@Profession").Value = Profession
 
                cmd.Parameters.Add("@phoneNo", SqlDbType.VarChar)
                cmd.Parameters.Item("@phoneNo").Value = phoneNo
 
                cmd.Parameters.Add("@emailid", SqlDbType.VarChar)
                cmd.Parameters.Item("@emailid").Value = emailid
 
                cmd.Parameters.Add("@Ext", SqlDbType.VarChar)
                cmd.Parameters.Item("@Ext").Value = ext
 
                cmd.Parameters.Add("@Description", SqlDbType.VarChar)
                cmd.Parameters.Item("@Description").Value = Description
 
                cmd.Parameters.Add("@Date_creation", SqlDbType.DateTime)
                cmd.Parameters.Item("@Date_creation").Value = Date.Now
 
                cmd.Parameters.Add("@CreatedBy", SqlDbType.VarChar)
                cmd.Parameters.Item("@CreatedBy").Value = CreatedBy
 
                cmd.Parameters.Add("@UserID", SqlDbType.VarChar)
                cmd.Parameters.Item("@UserID").Value = UserID
 
                cmd.CommandType = CommandType.StoredProcedure
                cmd.CommandText = "Execute_Account2"
 
                Dim QueryExecute As New DatabaseConnection.DataBaseConnaction.ConnectionClass
                QueryExecute.ExecuteNonquery(cmd)
                Return "New Account has been successully added"
            Catch ex As Exception
 
                Return "Error"
 
            End Try
        End Function
 
    End Class
 
End Namespace
 

I am geeting the Error pls any one sole this

[numberwhun]

Next time....

1. Please use code tags.
2. Please post questions in their appropriate forum, and not the introductions forum.

Regards,

Jeff
Moderator

[nazimsal]

ALTER PROCEDURE [dbo].[InsertAccount]

@BankID AS VARCHAR(500) ,
@Account_TypeID AS VARCHAR(500) ,
@First_Name AS VARCHAR(500) ,
@Last_Name AS VARCHAR(500) ,
@Date_Birth AS DATETIME ,
@Citizenship AS VARCHAR(500) ,
@Civil_Id AS BIGINT ,
@Address AS VARCHAR(500) ,
@Father_Name AS VARCHAR(500) ,
@Profession AS VARCHAR(500) ,
@phoneNo varchar(500) ,
@emailid varchar(500) ,
@Ext varchar(50) ,
@Description AS VARCHAR(500) ,
@Date_creation AS DATETIME ,
@CreatedBy AS VARCHAR(500) ,
@UserID AS VARCHAR(500)


AS
BEGIN

------------Account Number genaration-----------
DECLARE @Account_Number AS VARCHAR(500) ;
-- DECLARE @AccountTypeID AS VARCHAR(500) ;
---- SELECT @Location=BankL ocation FROM Bank WHERE BankID=@BankID
---- SELECT @AccountTypeID= AccountTypeID FROM AccountTypes WHERE AccountTypeID=@ Account_TypeID
IF @Account_TypeID ='SB'
BEGIN
IF @BankID='NBKFAR 01'
BEGIN
SELECT @Account_Number =MAX(Account_Nu mber) FROM AccountDetails WHERE Account_Number BETWEEN '101' AND '75000'
IF @Account_Number IS NULL
BEGIN
SELECT @Account_Number =101
END
ELSE
BEGIN
SELECT @Account_Number =@Account_Numbe r+1
END
END
ELSE IF @BankID='NBKMIR 01'
BEGIN
SELECT @Account_Number =MAX(Account_Nu mber) FROM AccountDetails WHERE Account_Number BETWEEN '75001' AND '150000'
IF @Account_Number IS NULL
BEGIN
SELECT @Account_Number =75001
END
ELSE
BEGIN
SELECT @Account_Number =@Account_Numbe r+1
END
END
ELSE IF @BankID='NBKSRK 01'
BEGIN
SELECT @Account_Number =MAX(Account_Nu mber) FROM AccountDetails WHERE Account_Number BETWEEN '150001' AND '225000'
IF @Account_Number IS NULL
BEGIN
SELECT @Account_Number =150001
END
ELSE
BEGIN
SELECT @Account_Number =@Account_Numbe r+1
END
END
ELSE IF @BankID='NBKSRK 02'
BEGIN
SELECT @Account_Number =MAX(Account_Nu mber) FROM AccountDetails WHERE Account_Number BETWEEN '225001' AND '300000'
IF @Account_Number IS NULL
BEGIN
SELECT @Account_Number =225001
END
ELSE
BEGIN
SELECT @Account_Number =@Account_Numbe r+1
END
END
ELSE
BEGIN
RAISERROR('Inva lid Information',18 ,3)
END
END
ELSE IF @Account_TypeID ='AC'
BEGIN
IF @BankID='NBKFAR 01'
BEGIN
SELECT @Account_Number =MAX(Account_Nu mber) FROM AccountDetails WHERE Account_Number BETWEEN '2000001' AND '2075000'
IF @Account_Number IS NULL
BEGIN
SELECT @Account_Number =2000001
END
ELSE
BEGIN
SELECT @Account_Number =@Account_Numbe r+1
END
END
ELSE IF @BankID='NBKMIR 01'
BEGIN
SELECT @Account_Number =MAX(Account_Nu mber) FROM AccountDetails WHERE Account_Number BETWEEN '2075001' AND '2150000'
IF @Account_Number IS NULL
BEGIN
SELECT @Account_Number =2075001
END
ELSE
BEGIN
SELECT @Account_Number =@Account_Numbe r+1
END
END
ELSE IF @BankID='NBKSRK 01'
BEGIN
SELECT @Account_Number =MAX(Account_Nu mber) FROM AccountDetails WHERE Account_Number BETWEEN '2150001' AND '2225000'
IF @Account_Number IS NULL
BEGIN
SELECT @Account_Number =2150001
END
ELSE
BEGIN
SELECT @Account_Number =@Account_Numbe r+1
END
END
ELSE IF @BankID='NBKSRK 02'
BEGIN
SELECT @Account_Number =MAX(Account_Nu mber) FROM AccountDetails WHERE Account_Number BETWEEN '2225001' AND '2300000'
IF @Account_Number IS NULL
BEGIN
SELECT @Account_Number =2225001
END
ELSE
BEGIN
SELECT @Account_Number =@Account_Numbe r+1
END
END
ELSE
BEGIN
RAISERROR('Inva lid Information',18 ,3)
END
END
ELSE IF @Account_TypeID ='FIX'
BEGIN
IF @BankID='NBKFAR 01'
BEGIN
SELECT @Account_Number =MAX(Account_Nu mber) FROM AccountDetails WHERE Account_Number BETWEEN '5000001' AND '5075000'
IF @Account_Number IS NULL
BEGIN
SELECT @Account_Number =5000001
END
ELSE
BEGIN
SELECT @Account_Number =@Account_Numbe r+1
END
END
ELSE IF @BankID='NBKMIR 01'
BEGIN
SELECT @Account_Number =MAX(Account_Nu mber) FROM AccountDetails WHERE Account_Number BETWEEN '5075001' AND '5150000'
IF @Account_Number IS NULL
BEGIN
SELECT @Account_Number =5075001
END
ELSE
BEGIN
SELECT @Account_Number =@Account_Numbe r+1
END
END
ELSE IF @BankID='NBKSRK 01'
BEGIN
SELECT @Account_Number =MAX(Account_Nu mber) FROM AccountDetails WHERE Account_Number BETWEEN '5150001' AND '5225000'
IF @Account_Number IS NULL
BEGIN
SELECT @Account_Number =5150001
END
ELSE
BEGIN
SELECT @Account_Number =@Account_Numbe r+1
END
END
ELSE IF @BankID='NBKSRK 02'
BEGIN
SELECT @Account_Number =MAX(Account_Nu mber) FROM AccountDetails WHERE Account_Number BETWEEN '5225001' AND '5300000'
IF @Account_Number IS NULL
BEGIN
SELECT @Account_Number =5225001
END
ELSE
BEGIN
SELECT @Account_Number =@Account_Numbe r+1
END
END
ELSE
BEGIN
RAISERROR('Inva lid Information',18 ,3)
END
END


INSERT INTO AccountDetails
(
Account_Number ,
BankID ,
Account_TypeID ,
First_Name ,
Last_Name ,
Date_Birth ,
Citizenship ,
Civil_Id ,
Address ,
Father_Name ,
Profession ,
Date_creation ,
phoneNo ,
emailid ,
Ext ,
Description ,
CreatedBy ,
UserID

)
VALUES
(
@Account_Number ,
@BankID ,
@Account_TypeID ,
@First_Name ,
@Last_Name ,
@Date_Birth ,
@Citizenship ,
@Civil_Id ,
@Address ,
@Father_Name ,
@Profession ,
@Date_creation ,
@phoneNo ,
@emailid ,
@Ext ,
@Description ,
@CreatedBy ,
@UserID
)


END

Dear All
i'm using this code to insert a record, but wen i'm using wrong data that time i'm not able to retrivew Error msg please replay me.
nazim

[nazimsal]

1. ALTER PROCEDURE [dbo].[InsertAccount]
   
   @BankID AS VARCHAR(500) ,
   @Account_TypeID AS VARCHAR(500) ,
   @First_Name AS VARCHAR(500) ,
   @Last_Name AS VARCHAR(500) ,
   @Date_Birth AS DATETIME ,
   @Citizenship AS VARCHAR(500) ,
   @Civil_Id AS BIGINT ,
   @Address AS VARCHAR(500) ,
   @Father_Name AS VARCHAR(500) ,
   @Profession AS VARCHAR(500) ,
   @phoneNo varchar(500) ,
   @emailid varchar(500) ,
   @Ext varchar(50) ,
   @Description AS VARCHAR(500) ,
   @Date_creation AS DATETIME ,
   @CreatedBy AS VARCHAR(500) ,
   @UserID AS VARCHAR(500)
   
   
   AS
   BEGIN
   
   ------------Account Number genaration-----------
   DECLARE @Account_Number AS VARCHAR(500) ;
   -- DECLARE @AccountTypeID AS VARCHAR(500) ;
   ---- SELECT @Location=BankL ocation FROM Bank WHERE BankID=@BankID
   ---- SELECT @AccountTypeID= AccountTypeID FROM AccountTypes WHERE AccountTypeID=@ Account_TypeID
   IF @Account_TypeID ='SB'
   BEGIN
   IF @BankID='NBKFAR 01'
   BEGIN
   SELECT @Account_Number =MAX(Account_Nu mber) FROM AccountDetails WHERE Account_Number BETWEEN '101' AND '75000'
   IF @Account_Number IS NULL
   BEGIN
   SELECT @Account_Number =101
   END
   ELSE
   BEGIN
   SELECT @Account_Number =@Account_Numbe r+1
   END
   END
   ELSE IF @BankID='NBKMIR 01'
   BEGIN
   SELECT @Account_Number =MAX(Account_Nu mber) FROM AccountDetails WHERE Account_Number BETWEEN '75001' AND '150000'
   IF @Account_Number IS NULL
   BEGIN
   SELECT @Account_Number =75001
   END
   ELSE
   BEGIN
   SELECT @Account_Number =@Account_Numbe r+1
   END
   END
   ELSE IF @BankID='NBKSRK 01'
   BEGIN
   SELECT @Account_Number =MAX(Account_Nu mber) FROM AccountDetails WHERE Account_Number BETWEEN '150001' AND '225000'
   IF @Account_Number IS NULL
   BEGIN
   SELECT @Account_Number =150001
   END
   ELSE
   BEGIN
   SELECT @Account_Number =@Account_Numbe r+1
   END
   END
   ELSE IF @BankID='NBKSRK 02'
   BEGIN
   SELECT @Account_Number =MAX(Account_Nu mber) FROM AccountDetails WHERE Account_Number BETWEEN '225001' AND '300000'
   IF @Account_Number IS NULL
   BEGIN
   SELECT @Account_Number =225001
   END
   ELSE
   BEGIN
   SELECT @Account_Number =@Account_Numbe r+1
   END
   END
   ELSE
   BEGIN
   RAISERROR('Inva lid Information',18 ,3)
   END
   END
   ELSE IF @Account_TypeID ='AC'
   BEGIN
   IF @BankID='NBKFAR 01'
   BEGIN
   SELECT @Account_Number =MAX(Account_Nu mber) FROM AccountDetails WHERE Account_Number BETWEEN '2000001' AND '2075000'
   IF @Account_Number IS NULL
   BEGIN
   SELECT @Account_Number =2000001
   END
   ELSE
   BEGIN
   SELECT @Account_Number =@Account_Numbe r+1
   END
   END
   ELSE IF @BankID='NBKMIR 01'
   BEGIN
   SELECT @Account_Number =MAX(Account_Nu mber) FROM AccountDetails WHERE Account_Number BETWEEN '2075001' AND '2150000'
   IF @Account_Number IS NULL
   BEGIN
   SELECT @Account_Number =2075001
   END
   ELSE
   BEGIN
   SELECT @Account_Number =@Account_Numbe r+1
   END
   END
   ELSE IF @BankID='NBKSRK 01'
   BEGIN
   SELECT @Account_Number =MAX(Account_Nu mber) FROM AccountDetails WHERE Account_Number BETWEEN '2150001' AND '2225000'
   IF @Account_Number IS NULL
   BEGIN
   SELECT @Account_Number =2150001
   END
   ELSE
   BEGIN
   SELECT @Account_Number =@Account_Numbe r+1
   END
   END
   ELSE IF @BankID='NBKSRK 02'
   BEGIN
   SELECT @Account_Number =MAX(Account_Nu mber) FROM AccountDetails WHERE Account_Number BETWEEN '2225001' AND '2300000'
   IF @Account_Number IS NULL
   BEGIN
   SELECT @Account_Number =2225001
   END
   ELSE
   BEGIN
   SELECT @Account_Number =@Account_Numbe r+1
   END
   END
   ELSE
   BEGIN
   RAISERROR('Inva lid Information',18 ,3)
   END
   END
   ELSE IF @Account_TypeID ='FIX'
   BEGIN
   IF @BankID='NBKFAR 01'
   BEGIN
   SELECT @Account_Number =MAX(Account_Nu mber) FROM AccountDetails WHERE Account_Number BETWEEN '5000001' AND '5075000'
   IF @Account_Number IS NULL
   BEGIN
   SELECT @Account_Number =5000001
   END
   ELSE
   BEGIN
   SELECT @Account_Number =@Account_Numbe r+1
   END
   END
   ELSE IF @BankID='NBKMIR 01'
   BEGIN
   SELECT @Account_Number =MAX(Account_Nu mber) FROM AccountDetails WHERE Account_Number BETWEEN '5075001' AND '5150000'
   IF @Account_Number IS NULL
   BEGIN
   SELECT @Account_Number =5075001
   END
   ELSE
   BEGIN
   SELECT @Account_Number =@Account_Numbe r+1
   END
   END
   ELSE IF @BankID='NBKSRK 01'
   BEGIN
   SELECT @Account_Number =MAX(Account_Nu mber) FROM AccountDetails WHERE Account_Number BETWEEN '5150001' AND '5225000'
   IF @Account_Number IS NULL
   BEGIN
   SELECT @Account_Number =5150001
   END
   ELSE
   BEGIN
   SELECT @Account_Number =@Account_Numbe r+1
   END
   END
   ELSE IF @BankID='NBKSRK 02'
   BEGIN
   SELECT @Account_Number =MAX(Account_Nu mber) FROM AccountDetails WHERE Account_Number BETWEEN '5225001' AND '5300000'
   IF @Account_Number IS NULL
   BEGIN
   SELECT @Account_Number =5225001
   END
   ELSE
   BEGIN
   SELECT @Account_Number =@Account_Numbe r+1
   END
   END
   ELSE
   BEGIN
   RAISERROR('Inva lid Information',18 ,3)
   END
   END
   
   
   INSERT INTO AccountDetails
   (
   Account_Number ,
   BankID ,
   Account_TypeID ,
   First_Name ,
   Last_Name ,
   Date_Birth ,
   Citizenship ,
   Civil_Id ,
   Address ,
   Father_Name ,
   Profession ,
   Date_creation ,
   phoneNo ,
   emailid ,
   Ext ,
   Description ,
   CreatedBy ,
   UserID
   
   )
   VALUES
   (
   @Account_Number ,
   @BankID ,
   @Account_TypeID ,
   @First_Name ,
   @Last_Name ,
   @Date_Birth ,
   @Citizenship ,
   @Civil_Id ,
   @Address ,
   @Father_Name ,
   @Profession ,
   @Date_creation ,
   @phoneNo ,
   @emailid ,
   @Ext ,
   @Description ,
   @CreatedBy ,
   @UserID
   )
   
   
   END
   
   Dear All
   i'm using this code to insert a record, but wen i'm using wrong data that time i'm not able to retrivew Error msg please replay me.
   nazim[/quote]

[nazimsal]

i'm not able to retriew Error mg
@nazimsal