CodeCharge Studio
search Register Login  

Web Reporting

Visually create Web Reports in PHP, ASP, .NET, Java, Perl and ColdFusion.
CodeCharge.com

YesSoftware Forums -> Archive -> CodeChargeStudio.Discussion

 Help required on output parameters and returnvalue parameters.

Print topic Send  topic

Author Message
Jay
Posted: 11/25/2003, 8:05 PM

May be I was not clear before what I asked for.

Look at this scenario
@RETURN_VALUE and @OrdYear

Can some one help me how to access the values after the procedure is
executed.


Scenario.
---------

Public Function GetResultSet(ByRef PagesCount As Integer) As
EmployeesItem()
'End Grid Employees Data Provider Class GetResultSet Method


CType(Select_,SpCommand).ClearParams

===>CType(Select_,SpCommand).AddParameter("@RETURN_VALUE",Nothing,ParameterT
ype._Int,ParameterDirection.ReturnValue,0,0,10)
If IsNothing(UrlCategoryName) Then

CType(Select_,SpCommand).AddParameter("@CategoryName",Nothing,ParameterType.
_NChar,ParameterDirection.Input,15,0,10)
Else

CType(Select_,SpCommand).AddParameter("@CategoryName",CType(UrlCategoryName.
Value,Object),ParameterType._NChar,ParameterDirection.Input,15,0,10)
End If
===>
CType(Select_,SpCommand).AddParameter("@OrdYear",Nothing,ParameterType._NCha
r,ParameterDirection.Output,4,0,10)
If SortDir = SortDirections._Asc Then
Select_.OrderBy=SortFieldsNames(CInt(SortField)).Trim()
Else
Select_.OrderBy=SortFieldsNamesDesc(CInt(SortField)).Trim()
End If
'End Before build Select

'Execute Select @3-57931F85
Dim ds As DataSet = Nothing, E as Exception = Nothing
PagesCount=0
Try
If RecordsPerPage>0

ds=ExecuteSelect((PageNumber-1)*RecordsPerPage,RecordsPerPage + 1)
----------------------------------------------------------------------------
---------------
====> After this statement is executed how can I get the values of the
outputparameters
@OrdYear
@RETURN_VALUE
----------------------------------------------------------------------------
----------------
If ds.Tables(0).Rows.Count > RecordsPerPage Then
PagesCount = PageNumber + 1
ds.Tables(0).Rows.RemoveAt(ds.Tables(0).Rows.Count - 1)
Else
PagesCount = PageNumber
End If
m_recordCount = -1
Else
ds=ExecuteSelect()
If ds.Tables(0).Rows.Count<>0 Then
PagesCount=1
End If
End If
Catch ee as Exception
E=ee
Finally
'End Execute Select


   


These are Community Forums for users to exchange information.
If you would like to obtain technical product help please visit http://support.yessoftware.com.

MS Access to Web

Convert MS Access to Web.
Join thousands of Web developers who build Web applications with minimal coding.

CodeCharge.com

Home   |    Search   |    Members   |    Register   |    Login


Powered by UltraApps Forum created with CodeCharge Studio
Copyright © 2003-2004 by UltraApps.com  and YesSoftware, Inc.