[[https://www.revelation.com/|Sign up on the Revelation Software website to have access to the most current content, and to be able to ask questions and get answers from the Revelation community]]
==== Searching files with Rlist and loading the results into a cursor (OpenInsight Specific) ====
=== At 12 APR 1999 10:43:28AM Geoff gullick wrote: ===
{{tag>"OpenInsight Specific"}}
I would like to use RList to select records and then be able to
"Readnext..By" through them.
I assume that this is possible??? but I cant seem to find any code that works (see below). Anybody got any ideas ?
******************
Cursor_No = 0
SelText = "SELECT FLEX_DO BY DOCUMENT_DATE USING ":Cursor_no:" WITH DI ":QUOTE("FARB127")
Rn_mode = 2
Call Rlist(SelText,5,"","",0)
EOF=0
Loop
Readnext @ID Using Cursor_no by Rn_Mode Else EOF=1
Until EOF=1 Repeat
----
=== At 12 APR 1999 11:33AM Greg James, ISIS, Inc. wrote: ===
Recently, I was trying to do this myself. Try something like this:
Equ TARGET_ACTIVELIST$ To 5
RLIST("LIST SOME_TABLE WITH SOME_COLUMN EQ 'SOME_VALUE'",TARGET_ACTIVELIST$,"","","")
Done=FALSE$
Loop
ReadNext ID Then
Locate ID In Keys Using @FM Setting Pos Else
Keys = ID
End
End Else
Done = TRUE$
End
Until Done Repeat
This worked for me.
----
=== At 12 APR 1999 01:33PM akaplan@sprezzatura.com - [url=http://www.sprezzatura.com]Sprezzatura Group[/url] wrote: ===
The cursor for RLIST( SELECT...) commands is cursor 0. To use any other cursor, you must use the reduce/select syntax.
You can find out about reduce and select in the on-line help. You might also want to see[url=http://www.sprezzatura.com/v1i10.htm]SENL Volume 1 Issue 10[/url] and [url=http://www.sprezzatura.com/v2i1.html]SENL Volume 2, Issue 1[/url] for an extremely interesting, fascinating and just plain fun to read set of articles about reduce, select and various filtering options in Advanced Revelation and OpenInsight.
akaplan@sprezzatura.com
[url=http://www.sprezzatura.com]Sprezzatura Group[/url]
[img]http://www.sprezzatura.com/zz.jpg[/img]
[[https://www.revelation.com/revweb/oecgi4p.php/O4W_HANDOFF?DESTN=O4W_RUN_FORM&INQID=NONWORKS_READ&SUMMARY=1&KEY=0659E89086C40D2E852567510050E275|View this thread on the forum...]]