[AccessD] Partition Function A97

Jim DeMarco Jdemarco at hshhp.org
Mon Feb 10 14:56:00 CST 2003


Lot's and that's the problem.  I don't know which might contain Partition.  At least I know I'm not crazy (well I still think I'm not).

If anyone's got a clue where it might be hiding drop a note.

Thanks,

Jim DeMarco


-----Original Message-----
From: Charlotte Foust [mailto:cfoust at infostatsystems.com]
Sent: Monday, February 10, 2003 3:46 PM
To: accessd at databaseadvisors.com
Subject: RE: [AccessD] Partition Function A97


You're right.  It's part of VBA, but I never used it in A97.  Do you
have any different references set in your CodeLib than in your new
database?

Charlotte Foust

-----Original Message-----
From: Jim DeMarco [mailto:Jdemarco at hshhp.org] 
Sent: Monday, February 10, 2003 12:30 PM
To: accessd at databaseadvisors.com
Subject: RE: [AccessD] Partition Function A97


I'm not so sure about that Charlotte.  I can use Partition in A97 as
follows:

Sub DoPartition()
'testing Partition function
Dim ans As Variant
Dim i As Integer

    For i = 11 To 110 Step 13
        ans = Partition(i, 1, 100, 10)
        Debug.Print "Value " & i & " falls in range: " & ans
    Next i
End Sub

Which returns:
Value 11 falls in range:  11: 20
Value 24 falls in range:  21: 30
Value 37 falls in range:  31: 40
Value 50 falls in range:  41: 50
Value 63 falls in range:  61: 70
Value 76 falls in range:  71: 80
Value 89 falls in range:  81: 90
Value 102 falls in range: 101: 

Is there a reference I need to add maybe?  The code above runs in my
code library mdb (A97) but not a new one I'm putting together for a demo
(also A97).

Thanks,

Jim DeMarco



-----Original Message-----
From: Charlotte Foust [mailto:cfoust at infostatsystems.com]
Sent: Monday, February 10, 2003 3:07 PM
To: accessd at databaseadvisors.com
Subject: RE: [AccessD] Partition Function A97


Sorry, but Partition came in with A2k.  You can't use it in 97, along
with Replace(), Split(), Join(), etc.

Charlotte Foust

-----Original Message-----
From: Jim DeMarco [mailto:Jdemarco at hshhp.org] 
Sent: Monday, February 10, 2003 11:40 AM
To: AccessD (E-mail)
Subject: [AccessD] Partition Function A97


Shouldn't the following SQL work in A97?  I can get the Partition
function working in a loop in a test module but not when I try to run it
against a table. I'm running this against the Northwind Orders table to
test and get "This expression is typed incorrectly or is too complex..."
error anytime I try to use Partition in a query.  Works fine in A2K
though.

<sql>
SELECT DISTINCTROW Partition([Freight],0,1000,50) AS Range,
Count(Orders.Freight) AS Count FROM Orders GROUP BY
Partition([Freight],0,1000,50); </sql>


TIA,

Jim DeMarco
Director of Product Development
HealthSource/Hudson Health Plan



************************************************************************
***********
"This electronic message is intended to be for the use only of the named
recipient, and may contain information from HealthSource/Hudson Health
Plan (HS/HHP) that is confidential or privileged.  If you are not the
intended recipient, you are hereby notified that any disclosure,
copying, distribution or use of the contents of this message is strictly
prohibited.  If you have received this message in error or are not the
named recipient, please notify us immediately, either by contacting the
sender at the electronic mail address noted above or calling HS/HHP at
(914) 631-1611. If you are not the intended recipient, please do not
forward this email to anyone, and delete and destroy all copies of this
message.  Thank You".
************************************************************************
***********

_______________________________________________
AccessD mailing list
AccessD at databaseadvisors.com
http://databaseadvisors.com/mailman/listinfo/accessd
Website: http://www.databaseadvisors.com
_______________________________________________
AccessD mailing list
AccessD at databaseadvisors.com
http://databaseadvisors.com/mailman/listinfo/accessd
Website: http://www.databaseadvisors.com


************************************************************************
***********
"This electronic message is intended to be for the use only of the named
recipient, and may contain information from HealthSource/Hudson Health
Plan (HS/HHP) that is confidential or privileged.  If you are not the
intended recipient, you are hereby notified that any disclosure,
copying, distribution or use of the contents of this message is strictly
prohibited.  If you have received this message in error or are not the
named recipient, please notify us immediately, either by contacting the
sender at the electronic mail address noted above or calling HS/HHP at
(914) 631-1611. If you are not the intended recipient, please do not
forward this email to anyone, and delete and destroy all copies of this
message.  Thank You".
************************************************************************
***********

_______________________________________________
AccessD mailing list
AccessD at databaseadvisors.com
http://databaseadvisors.com/mailman/listinfo/accessd
Website: http://www.databaseadvisors.com
_______________________________________________
AccessD mailing list
AccessD at databaseadvisors.com
http://databaseadvisors.com/mailman/listinfo/accessd
Website: http://www.databaseadvisors.com


***********************************************************************************
"This electronic message is intended to be for the use only of the named recipient, and may contain information from HealthSource/Hudson Health Plan (HS/HHP) that is confidential or privileged.  If you are not the intended recipient, you are hereby notified that any disclosure, copying, distribution or use of the contents of this message is strictly prohibited.  If you have received this message in error or are not the named recipient, please notify us immediately, either by contacting the sender at the electronic mail address noted above or calling HS/HHP at (914) 631-1611. If you are not the intended recipient, please do not forward this email to anyone, and delete and destroy all copies of this message.  Thank You".
***********************************************************************************




More information about the AccessD mailing list