THANKS for letting us know that you are still ok.
-----Ursprungligt meddelande----- Från: [email protected] [mailto:[email protected]] För John Docherty Skickat: den 22 februari 2011 20:29 Till: RBASE-L Mailing List Ämne: [RBASE-L] - RE: NZ Christchurch Thanks Gunnar we are fine thankfully, but this time many people have not been so fortunate. They are saying the death toll could be in the hundreds with many people still trapped in collapsed buildings. The following link tells some of the story. http://www.stuff.co.nz/4688231/Large-quake-strikes-Christchurch Regards, John Docherty From: [email protected] [mailto:[email protected]] On Behalf Of Gunnar Ekblad Sent: Wednesday, 23 February 2011 6:14 a.m. To: RBASE-L Mailing List Subject: [RBASE-L] - NZ Christchurch Fellow R:Base user in NZ! Please let us know that all is OK! Gunnar Ekblad -----Ursprungligt meddelande----- Från: [email protected] [mailto:[email protected]] För Alastair Burr Skickat: den 22 februari 2011 17:03 Till: RBASE-L Mailing List Ämne: [RBASE-L] - Re: v9.1 on W9/64 - List Box query Thanks Mike & Jan. I had thought about a temp table but as this had been acceptably fast in the past I had held that back in case nothing else came up. The Load from file method was quick to implement and just needed some WIDTHS set to accommodate the NOTE field and was super quick. Regards, Alastair. If anyones interested, I ended up with this: -- All_Comments_Menu On After Start EEP ... Date of last amendment: 22/02/2011 SET HEADINGS OFF SET WIDTH 500 SET SELMARGIN 1 OUTPUT LISTBOX.FLE SELECT DISTINCT Long_Comments=500 + FROM All_Comments + WHERE Long_Comments NOT CONTAINS 'G:\' + ORDER BY Long_Comments ASC OUTPUT SCREEN PROPERTY IDLB_CommentsMenu Load_From_File 'LISTBOX.FLE' ERASE LISTBOX.FLE SET HEADINGS ON SET WIDTH 100 SET SELMARGIN 0 RETURN From: Mikeb <mailto:[email protected]> Sent: Monday, February 21, 2011 11:36 PM To: RBASE-L Mailing List <mailto:[email protected]> Subject: [RBASE-L] - Re: v9.1 on W9/64 - List Box query Alastair, Load your list box using the Load_From_File... Don't use the cursor, just do this: Set Headings Off Out Listbox.Dat SELECT DISTINCT Long_Comments + FROM All_Comments + WHERE Long_Comments NOT CONTAINS 'G:\' + ORDER BY Long_Comments ASC out scr Property YourListBoxCompID Load_From_File 'Listbox.Dat' The response will be less than moments... ----- Original Message ----- From: "Alastair Burr" <[email protected]> To: "RBASE-L Mailing List" <[email protected]> Sent: Monday, February 21, 2011 1:12 PM Subject: [RBASE-L] - v9.1 on W9/64 - List Box query I have a (rarely used) form that is a Variable User List List Box with two buttons that now takes approaching 5 minutes to prepare the data when v7.6 took only a few moments. This is the relevant code that prepares the list: DECLARE C1 CURSOR FOR SELECT DISTINCT Long_Comments + FROM All_Comments + WHERE Long_Comments NOT CONTAINS 'G:\' + ORDER BY Long_Comments ASC OPEN C1 FETCH C1 INTO vAddList WHILE SQLCODE = 0 THEN PROPERTY IDLB_CommentsMenu LISTITEMSADD ..vAddList FETCH C1 INTO vAddList ENDWHILE The selection command currently returns 3459 rows when using Browse almost instantly. I notice, too, that I can no longer use the mouses scrolling wheel to move the data up or down whether a row is selected or not. Has anything changed that means I need to revamp my code? Regards, Alastair.
