[SOLVED] How does FindRecordItem work?
Printed From: Codejock Forums
Category: Codejock Products
Forum Name: Report Control
Forum Description: Topics Related to Codejock Report Control
URL: http://forum.codejock.com/forum_posts.asp?TID=12897
Printed Date: 14 May 2024 at 1:23am
Software Version: Web Wiz Forums 12.04 - http://www.webwizforums.com
Topic: [SOLVED] How does FindRecordItem work?
Posted By: Jebo
Subject: [SOLVED] How does FindRecordItem work?
Date Posted: 11 December 2008 at 12:54pm
|
There is no sample and no description in your help. I testet many ways but without any hit. SO PLEASE give me a little sample. forum_posts.asp?TID=14585 - |
Replies:
Posted By: Aaron
Date Posted: 15 December 2008 at 2:49pm
|
Hi,
Yes, would be nice to have an example. I tried a lot but without succes. Looks like the method is still under construction...
------------- Product: Xtreme SuitePro (ActiveX) version 15.0.2 Platform: Windows XP (32bit) - SP 2 Language: Visual Basic 6.0 Zero replies is not an option.... |
Posted By: Stilki
Date Posted: 20 December 2008 at 7:20pm
|
I can't get it working as well.
Not enough information in Help or any sample. |
Posted By: Aaron
Date Posted: 05 January 2009 at 4:22am
|
Hi,
Support member Mark gave me sample. It doesn't work for me but he said it should work. I tried with V12.1.0 and V12.1.1
Let someone else have a try with the code snippet and please let me know if it works for you.
Dim repRecItem As ReportRecordItem
Dim iCols, iRows Dim sArg As String sArg = "James HOWLETT" iCols = wndReportControl.Columns.Count iRows = wndReportControl.Rows.Count Set repRecItem = wndReportControl.Records.FindRecordItem(1, iRows, 1, iCols, 1, 1, sArg, xtpReportTextSearchExactPhrase) repRecItem.ForeColor = RGB(255, 0, 0) Thanks in advance
------------- Product: Xtreme SuitePro (ActiveX) version 15.0.2 Platform: Windows XP (32bit) - SP 2 Language: Visual Basic 6.0 Zero replies is not an option.... |
Posted By: Jebo
Date Posted: 05 January 2009 at 5:19am
|
Hi Aaron, this code can't work because the ReportControl has a bug and will be fixed in the next release...! Here you can read the comment from CJ-Support-Team: Notes: ------------------------------------------- ****Note by Doubson, Mark, 12 Dec 2008: You right - it was a buggy code. I fixed it and code will go to next release file:///I:%5CTemp%5Cmsohtmlclip1%5C01%5Cclip_colorschememapping.xml - |
Posted By: Aaron
Date Posted: 05 January 2009 at 5:48am
|
Hi Jebo,
Thanks for reply.
I'm glad it is a BUG because I thought it was me, I tried a lot (including simular code like Mark suggested) but it failed everytime.
------------- Product: Xtreme SuitePro (ActiveX) version 15.0.2 Platform: Windows XP (32bit) - SP 2 Language: Visual Basic 6.0 Zero replies is not an option.... |
Posted By: Stilki
Date Posted: 05 January 2009 at 6:00am
|
Hi All,
Just confirming the BUG that has been acknowledged.
I tried the above code and various other permutations to no avail.
|
Posted By: mdoubson
Date Posted: 09 January 2009 at 12:22am
| There is interm release version from 2008, Dec, 17 Report ActiveX with working FindRecordItem function. Ask Kirk or Mike to send it to you |
Posted By: Aaron
Date Posted: 09 January 2009 at 1:00am
Hi Mark,
Is there any chance of fixed issues (major issue post) in interm release
 Would be nice if you would reply on that post just just to know what the status is...Thanks
------------- Product: Xtreme SuitePro (ActiveX) version 15.0.2 Platform: Windows XP (32bit) - SP 2 Language: Visual Basic 6.0 Zero replies is not an option.... |
mdoubson wrote:Posted By: mdoubson
Date Posted: 09 January 2009 at 1:07am
| Well I will but you can browse the MFC discussion - which is very usefull as ActiveX is always depends from ToolkitPro code |
Posted By: Aaron
Date Posted: 10 February 2009 at 2:18pm
|
Hi Mark,
I tested the method in V13.0.0 and still get an error: "Object variable or With block not set"
I used same code snippet as you wrote in previous reply.
------------- Product: Xtreme SuitePro (ActiveX) version 15.0.2 Platform: Windows XP (32bit) - SP 2 Language: Visual Basic 6.0 Zero replies is not an option.... |
Posted By: mdoubson
Date Posted: 10 February 2009 at 2:33pm
 to test using VB ReportSample code - in frmMain modify function:
Private Sub mnuFieldChooser_Click()
' FieldChooser is used to add or remove fields (i.e. columns) using drag-and-drop. ' FieldChooser is an analogue of a pool with column headers of non-used columns 'Displays a form with a FieldChooser control 'frmFieldChooser.Show 0, Me 'Associates a FieldChooser control with a ReportControl on another form as a result of call you will see red as in snapshot I run right now
|
Posted By: mdoubson
Date Posted: 10 February 2009 at 4:47pm
| btw - are you sure that you use release 13 activex? |
Posted By: Aaron
Date Posted: 11 February 2009 at 12:57am
|
Hi Mark,
OK, I got it to work and maybe this was same problem in V12.1.1
If you try to find an item and searchtext would be exactly the same as a reportitem and you use 'xtpReportTextSearchExactPhrase' you will get the error I mentioned.
I will do some testing and I will let you know.
------------- Product: Xtreme SuitePro (ActiveX) version 15.0.2 Platform: Windows XP (32bit) - SP 2 Language: Visual Basic 6.0 Zero replies is not an option.... |
Posted By: mdoubson
Date Posted: 11 February 2009 at 1:12am
|
No - it does not work in Release 12. ------------- Mark Doubson, Ph.D. |
Posted By: Jebo
Date Posted: 11 February 2009 at 4:03am
|
mmmh, there is something strange... if I search for "JamEs hoWleTt" with xtpReportTextSearchExactPhrase there will be find the record. BUT if I search for "James Howlett" (this is the realy exactly Name!) with xtpReportTextSearchExactPhrase there will DON'T find the record!  WHY? Here is the sample (it seems like the same bug since before - v12.x): Dim repRecItem As ReportRecordItem, iRows As Long, sArg As String iRows = wndReportControl.Rows.Count sArg = "James Howlett" Set repRecItem = wndReportControl.Records.FindRecordItem(1, iRows, 3, 3, 1, 1, sArg, xtpReportTextSearchExactPhrase) If repRecItem Is Nothing Then Beep Else wndReportControl.SetFocus wndReportControl.FocusedRow = wndReportControl.Rows.FindRow(repRecItem.Record) wndReportControl.FocusedRow.EnsureVisible End If |
Posted By: Aaron
Date Posted: 13 February 2009 at 5:16am
|
Hi @Jebo
Is it possible to test this in V12.1.1 ?
I also mentioned that this could be same problem in previous version. Another thing: Can you make this post a sticky one? Do not let this post slide down
Thanks a lot
------------- Product: Xtreme SuitePro (ActiveX) version 15.0.2 Platform: Windows XP (32bit) - SP 2 Language: Visual Basic 6.0 Zero replies is not an option.... |
Posted By: Aaron
Date Posted: 13 February 2009 at 6:21am
|
Hi,
I did a test myself with V12.1.0 and it does work the same as in V13.0.0
You will get an error when using xtpReportTextSearchExactPhrase. So this is definitely a bug!
@Jebo: Please change your topic description and change the topic into a sticky one
Thanks a lot
------------- Product: Xtreme SuitePro (ActiveX) version 15.0.2 Platform: Windows XP (32bit) - SP 2 Language: Visual Basic 6.0 Zero replies is not an option.... |
Posted By: Jebo
Date Posted: 13 February 2009 at 6:28am
| done! |
Posted By: Aaron
Date Posted: 13 February 2009 at 6:38am
|
Hi @Jebo,
Thanks for that
I just wanted to say that I forgot to unregister V13.0.0 ocx so that's why I said it works the same as in V12.1
 It looks like the method isn't working at all (V12.1) as Mark already replied.
But the fact remains that this is a bug in new version, so leave the description as is...
Thank you
------------- Product: Xtreme SuitePro (ActiveX) version 15.0.2 Platform: Windows XP (32bit) - SP 2 Language: Visual Basic 6.0 Zero replies is not an option.... |
Posted By: mdoubson
Date Posted: 13 February 2009 at 12:07pm
|
YOU RIGHT - code SKIP pure xtpReportTextSearchExactPhrase case!
While case xtpReportTextSearchExactPhrase AND xtpReportTextSearchMatchCase properly covered.
I will fix it - you can use also code 0 - it works properly. P.S. Case fixed and next beta-release will have proper code for ToolkitPro and ActiveXs ------------- Mark Doubson, Ph.D. |
Posted By: Aaron
Date Posted: 21 February 2009 at 10:26am
|
Hi Mark
With new OCX this is solved but now it will give error on xtpReportTextSearchMatchCase
Thanks
------------- Product: Xtreme SuitePro (ActiveX) version 15.0.2 Platform: Windows XP (32bit) - SP 2 Language: Visual Basic 6.0 Zero replies is not an option.... |
Posted By: mdoubson
Date Posted: 21 February 2009 at 11:57am
|
You right - it was wrong internal function (Left instead of Mid!) call - "Search case-non-sensetive item Which STARTED with given pattern".
It also make sense - but with special flag (may be in future?). For now I fix it to cover general case - "Search case-non-sensetive item Which HAS given pattern as substring" ------------- Mark Doubson, Ph.D. |
Posted By: mdoubson
Date Posted: 05 May 2009 at 5:41pm
|
We have now new flag for FindRecordItem function (xtpReportTextSearchExactStart) which means only string starting with pattern return (not pattern inside case) and new function FindRecordItemByRows which use same flag set but operate with Rows instead of Records - same way you can sort your report and call this function after e.g. providing top 10 rows as search positions ------------- Mark Doubson, Ph.D. |
Posted By: Aaron
Date Posted: 24 June 2009 at 2:17pm
|
Hi,
This issues has been solved in V13.1
 Including extra member xtpReportTextSearchExactStartThanks
------------- Product: Xtreme SuitePro (ActiveX) version 15.0.2 Platform: Windows XP (32bit) - SP 2 Language: Visual Basic 6.0 Zero replies is not an option.... |
Posted By: Jebo
Date Posted: 24 June 2009 at 3:59pm
Oh, that sounds great! 
|
Posted By: mdoubson
Date Posted: 24 June 2009 at 4:07pm
|
there is also another function for search:
IReportRecordItem* FindRecordItemByRows(long StartIndex, long EndIndex, long StartColumn, long EndColumn, long Record, long Item, BSTR Text, XTPReportTextSearchParms Flags); it is good for already sorted case ------------- Mark Doubson, Ph.D. |
Posted By: Aaron
Date Posted: 27 June 2009 at 3:41am
Hi @Jebo,
Would be best you would remove "the sticky part" of your post and add SOLVED to description. Now it looks like it's still a BUG and we don't want that, right?
Thanks
------------- Product: Xtreme SuitePro (ActiveX) version 15.0.2 Platform: Windows XP (32bit) - SP 2 Language: Visual Basic 6.0 Zero replies is not an option.... |
Posted By: Jebo
Date Posted: 27 June 2009 at 4:26am
| Done. |