[[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]]


==== INET_RLIST passing rlistscript vs report_id (OpenInsight Specific) ====
=== At 15 JUL 2000 07:37:14PM Gene Sorbo wrote: ===
 
{{tag>"OpenInsight Specific"}}
 
<QUOTE>
Hi again.



Obvious follow up question to the first round of questions I posted on passing a report id to INET_RLIST. 



I have read all of the documentation and searched through the works code that I have, and cannot find an example of passing free form RLIST syntax via the second paramater of the INET_RLIST function.



If I am understanding this, the reason the following works:



http://oemcomputer/scripts/oicgi.exe/INET_RLIST?REPORT_ID=TESTB



is that I have published a form with a list box control named REPORT_ID, and in the SUBMIT event of the OI form, am passing the REPORT_ID variable to the INET_RLIST function via the first paramater of the function ('request'). 



Two questions: first, what type of OI control should I use when publishing to the web to allow a user to enter free form RLIST syntax in a web page? 



Secondly and more importantly, how do I take that syntax entered and pass it back to INET_RLIST via the second function parameter, rlistscript so that the ad hoc report will be processed?



Any help provided here would be much appreciated.



Again, thanks in advance.



Gene
</QUOTE>
----

=== At 17 JUL 2000 11:47AM Bob Carten - WinWin Solutions wrote:  ===

<QUOTE>You need to write your own function as a wrapper around INET_RLIST



Function INET_RLIST_DYN(request)



$insert inet_equates

declare function Inet_QueryParam, Inet_Rlist,Inet_Msg







*---

* Did We get a command?

*---

rtext=Inet_QueryParam(request, 'RLIST')

report_id=Inet_QueryParam(request, 'REPORT_ID')

Convert @lower.case to @upper.case in rtext

Convert @lower.case to @upper.case in report_id







varHtml="

Begin Case

	Case len(rtext)

		* Custom Rlist

		varHtml=Inet_rlist(request,rtext)

	Case len(report_id)

		* Canned Report

		varHtml=Inet_Rlist(request)

	Case 1

		* Error

		varHtml=Inet_Msg(request,"Attention: You did not enter an RLIST Command!")

End Case

Return varHtml

</QUOTE>


[[https://www.revelation.com/revweb/oecgi4p.php/O4W_HANDOFF?DESTN=O4W_RUN_FORM&INQID=NONWORKS_READ&SUMMARY=1&KEY=357B1B9841DA71448525691D0081C09B|View this thread on the  forum...]]