StrataFrame Forum » StrataFrame Application Framework - V1 » Issues » SeekToPrimaryKey

SeekToPrimaryKey

Larry Caylor — Fri, 12 May 2006 14:31:43 GMT

SeekToPrimaryKey and NavigateToPrimaryKey do not appear to be working properly for compound primary keys. Looking at the source code I believe there is a bug in Private Function GetIndexOfPrimaryKey.

Private Function GetIndexOfPrimaryKey(ByVal ParamArray PrimaryKeyValues As Object()) As Integer

'-- Establish locals

Dim lnReturn As Integer = -1

Dim lnCnt As Integer

Dim loRow As DataRow

Dim lcSelect As String = String.Empty

'-- Make sure the length of the primary key values and the length of the fields matches

If Me.PrimaryKeyFields.Length <> PrimaryKeyValues.Length Then

Throw New ArgumentException("The number of PrimaryKeyValues passed must match the number of PrimaryKeyFields on the business object.")

End If

'-- Find the row

Try

'-- Create the primary key string

For lnCnt = 0 To Me.PrimaryKeyFields.Length - 1

'-- Add the "AND" if necessary

If lnCnt > 0 Then

lcSelect &= " AND "

End If

'-- Add the select value

lcSelect = Me.PrimaryKeyFields(lnCnt) & "='" & PrimaryKeyValues(lnCnt).ToString() & "'"

When there is more than 1 primary key field, the previous value of lcSelect gets over written. Changing the statement under “‘—Add the select value” to the following should fix the problem.

lcSelect = lcSelect & Me.PrimaryKeyFields(lnCnt) & "='" & PrimaryKeyValues(lnCnt).ToString() & "'"

-Larry

RE: SeekToPrimaryKey

StrataFrame Team — Fri, 12 May 2006 14:31:43 GMT

No problem. We distribute that file so if you want/need to make source code changes, you don't have to worry about registering your new DLLs in the GAC every time.

RE: SeekToPrimaryKey

Larry Caylor — Fri, 12 May 2006 14:26:58 GMT

Ben,

Thanks for the tip. I found the afterbuild.bat file in "Program Files\MicroFour\StrataFrame Source Code\"

-Larry

RE: SeekToPrimaryKey

StrataFrame Team — Thu, 11 May 2006 16:37:54 GMT

Yes, you can even change your source code and then recompile it, if you need to. There's a batch file that will automatically register the recompiled DLLs in the GAC and copy them to the Program Files\Common Files\MicroFour\StrataFrame\ folder.

RE: SeekToPrimaryKey

Larry Caylor — Thu, 11 May 2006 16:36:39 GMT

Ben,

That's great. I can work around the issue till then.

Thanks,

-Larry

RE: SeekToPrimaryKey

StrataFrame Team — Thu, 11 May 2006 15:50:32 GMT

It's been fixed... and will be in the release with the DevExpress wrapper probably next week.

RE: SeekToPrimaryKey

StrataFrame Team — Thu, 11 May 2006 13:51:47 GMT

Right you are, Larry :D

I'll get the "=" changed to "&="

Thanks for the heads up.