Still celebrating National IT Professionals Day with 3 months of free Premium Membership. Use Code ITDAY17



Posted on 2002-07-11
Medium Priority
Last Modified: 2011-04-14
Hi experts,

I discovered the Data Environement Object, and I can't really get it to work my way.

First what I want it to get the Max Value of a field, and I was hoping to accomplish this with a single call to the command like:

MySort = MyDE.MyCommand (MyParent)

MyTable (table name) has the following fields:

MyId, MyName, MyParent, MySort

I would like to get the maximum value of the MySort field grouped by MyParent. I would like to do this all in the Data Environement (Command object) and not in the database directly. I will tell you what I did, and you please tell me where I went wrong ...

1. I created a Command Object and used a SQL-statement like:

SELECT MyTable.* FROM MyTable ORDER BY MyParent, MySort

Resulting Recordset:

MyId     MyName             Parent     Sort
0     MyGroups     0     0
6     Main1             0     1
7     Main2               0     2
1     Main3             0     4
5     Main4             0     5
2     Main5             0     6
3     Sub1             1     1
4     Sub2         1     2

2. I grouped it by MyParent.

3. I put the aggregate to Max (field: MySort)

Now the result is:

My parent / My Sort
0  /  6
1  /  2

4. In order to get a parameter I change the SQL to:

SELECT tblGroups.* FROM tblGroups WHERE GrpParent = ? ORDER BY GrpParent, GrpSort

Now the code looks like:

MyDE.ByParent (MyParent)

MyDE = Data Environement Object name
ByParent = Command objects - grouping name
MyParent = Variable that contains a parameter value

That's what I want. Then I thought I need only 1 value to be returned, not a recordset. I was thinking of adding a output parameter, and uncheck the "recordset returning" checkbox on the advanced tab of the command object properties.

How can I put an output parameter at design-time?
How can I access this value now? In code I mean.
How can I set the default value to "1" in case there are no records that match the criteria?
How can I add the value "1" to the returned value in the command object itself?

The command name is MyCommand.
The Grouping name is ByParent
The Aggregate name is MaxSort

I hope you understand.

Thanks ...

Question by:beni_luedi
Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
  • 2
  • 2

Expert Comment

ID: 7149976
To return only one record per MyParent, you can write a SQL statement like this:-
sSQL =  " SELECT Max(MySort), MyParent" & _
          " FROM tblGroups" & _
         " WHERE GrpParent = ? " & _
      " GROUP BY MyParent"


Author Comment

ID: 7150927
How can I put an output parameter at design-time?
How can I access this value now? In code I mean.
How can I set the default value to "1" in case there are no records that match the criteria?
How can I add the value "1" to the returned value in the command object itself?

Expert Comment

ID: 7151486
Where do you want to put the output parameter?
Can you not use ADODB object model to accomplish your requirement?

Author Comment

ID: 7151538
I want to put the output parameter together with the input parameter into the command object of the data environement designer (at design time).

Do you mean writing code to create a ADO command object with it's properties and parameters?

I would like to know if I can accoplish the same directly in the data environment's command object at design time.

Is this possible? If yes, HOW?

Accepted Solution

AlonHirsch earned 300 total points
ID: 7153744

Typically OUTPUT parameters are used when you call a stored procedure in SQL Server (ORACEL etc.).
The stored procedure uses Parameters for the query and has the option of returning data in one or more of the parameters.

You can't use output parameters with a direct SQL query as you are trying.


Featured Post

Hire Technology Freelancers with Gigs

Work with freelancers specializing in everything from database administration to programming, who have proven themselves as experts in their field. Hire the best, collaborate easily, pay securely, and get projects done right.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

When trying to find the cause of a problem in VBA or VB6 it's often valuable to know what procedures were executed prior to the error. You can use the Call Stack for that but it is often inadequate because it may show procedures you aren't intereste…
This article describes some techniques which will make your VBA or Visual Basic Classic code easier to understand and maintain, whether by you, your replacement, or another Experts-Exchange expert.
Get people started with the process of using Access VBA to control Excel using automation, Microsoft Access can control other applications. An example is the ability to programmatically talk to Excel. Using automation, an Access application can laun…
Get people started with the utilization of class modules. Class modules can be a powerful tool in Microsoft Access. They allow you to create self-contained objects that encapsulate functionality. They can easily hide the complexity of a process from…
Suggested Courses

705 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question