|
Posted by Ben on 06/05/07 23:50
This is the current scripts of the application:
Dim com As ADODB.Command
Dim MyItemNumber As String, MyTotalInStock As Long, MyTotalCost As
Currency
Set com = New ADODB.Command
MyItemNumber = ItemNum
MyTotalInStock = 0
MyTotalCost = 0
With com
.ActiveConnection = "DSN=YES2;DATABASE=YES100SQLC;"
.CommandText = "procRecalculate"
.CommandType = adCmdStoredProc
.Parameters.Append .CreateParameter("ItemNumber", adVarChar,
adParamInput, MyItemNumber)
.Parameters.Append .CreateParameter("TotalInStock", adInteger,
adParamOutput, MyTotalInStock)
.Parameters.Append .CreateParameter("TotalCost", adCurrency,
adParamOutput, MyTotalCost)
.Execute
End With
Set com = Nothing
If IsNull(MyTotalInStock) Then MyTotalInStock = 0
If IsNull(MyTotalCost) Then MyTotalCost = 0
TotalItems = MyTotalInStock
TotalCost = MyTotalCost
=============================================
CREATE PROCEDURE DBO.procRecalculate
@ItemNumber nvarchar(50),
@TotalInStock int = 0 OUTPUT,
@TotalCost money = 0 OUTPUT
AS
SET NOCOUNT ON
SELECT @TotalInStock = Sum(Cast([Quantity in Stock] As int)),
@TotalCost = Sum(Cast([Cost] * [Quantity in Stock] As money))
FROM [Inventory Products]
WHERE [Item Number] = @ItemNumber
SET NOCOUNT OFF
GO
Unfortunately, I still get the same error. But this time, I get it in a
second.
"Erland Sommarskog" <esquel@sommarskog.se> wrote in message
news:Xns9946E6B747AD9Yazorman@127.0.0.1...
> Ben (pillars4@sbcglobal.net) writes:
>> I made th necessary changes. Below are the current scripts for both the
>> calling method and the store procedure. Variable "ItemNum" is being
>> passed as a string parameter to the recalculate method.
>
> Do you still get the overflow error, or does it work alright now?
>
>
>
> --
> Erland Sommarskog, SQL Server MVP, esquel@sommarskog.se
>
> Books Online for SQL Server 2005 at
> http://www.microsoft.com/technet/prodtechnol/sql/2005/downloads/books.mspx
> Books Online for SQL Server 2000 at
> http://www.microsoft.com/sql/prodinfo/previousversions/books.mspx
[Back to original message]
|