Filter a report using a session protected variable

[reedallenbrown]

How can I filter a report using a session protected variable?
I have tried using the genie but I must be missing something.
I use the __Protected__Userid format and assign the user a client ID of say 44. Then when the user signs in I want them to print a report filtered to thier client ID of 44.

Please help !!!!

Thank you so much for your time.

[drgarytraub]

Re: Filter a report using a session protected variable

You need to use a global variable, something like:

dim global yourvar as c = what_ever_variable

and then use the what_ever_variable in the report.

Gary

[Pat Bremkamp]

Re: Filter a report using a session protected variable

If you are using the security framework to assign the __protected__UserId or are assigning it in a link, then it is probably being assigned as a type character. So, if the client id in the table is actually numeric, then you will have to convert the session variable from character to numeric to create the filter.

Pat

[reedallenbrown]

Re: Filter a report using a session protected variable

Thank you but being new to this I do not know where to put the dim statement. Do I put it in the after validate area? Do I use the __Protected__Userid as the variable?

[drgarytraub]

Re: Filter a report using a session protected variable

If you are doing this from a dialog, then put the code in the AfterValidate event, the sample place that you would put the code to run the report.

Gary

[reedallenbrown]

Re: Filter a report using a session protected variable

But then do you need to filter the report itself? I tried all of this and it does not work.

[drgarytraub]

Re: Filter a report using a session protected variable

Reed,

Here is an example. You would put something like this in the AfterValidate event:

Dim global starting_patient as C = patient1
Dim global ending_patient as C = patient2

dim filter as c
dim order as c
Filter = ".T."
Order = ""
Dim filename as c
filename = session.session_folder + "tempreport.pdf"
filename = report.saveas("Patient_List@[PathAlias.ADB_Path]\patients.ddd","pdf",filter,order,filename,.f.)
if file.exists(filename)
currentform.RedirectTarget = session.session_url + "tempreport.pdf?" + time("hms3")
end if

Then in the report itself, you would put something like this in the Reports Detail Properties, filter expression:

between(Patients->patient,starting_patient,ending_patient)

I hope this helps.

Gary

[reedallenbrown]

Re: Filter a report using a session protected variable

Thank you Gary but how does that relate to my question? I need to take the __Protected__Ulink and filter a report with it.

[NoeticCC]

Re: Filter a report using a session protected variable

How can I filter a report using a session protected variable?
I have tried using the genie but I must be missing something.
I use the __Protected__Userid format and assign the user a client ID of say 44. Then when the user signs in I want them to print a report filtered to thier client ID of 44.

Please help !!!!

Thank you so much for your time.

Just define an argument as using a session variable as the source, and ensure that in the page the user is redirected to after login, the session variable is set.

[reedallenbrown]

Re: Filter a report using a session protected variable

I do not have a problem with filtering a page, I need to filter a report.

[NoeticCC]

Re: Filter a report using a session protected variable

I do not have a problem with filtering a page, I need to filter a report.

Oops. Sorry! From where are you trying to run this report? Grid, Dialog, a5w page? You can always create a dummy dialog with a field of the same data type as your session variable. Then use the print report genie in the aftervalidate event to generate the xbasic code and copy it into wherever you need it. Just swap the Variable name for session.__protected_etc

[reedallenbrown]

Re: Filter a report using a session protected variable

Thank you but this is way over my head. I would need a lot more information in order to do this.

[NoeticCC]

Re: Filter a report using a session protected variable

Thank you but this is way over my head. I would need a lot more information in order to do this.

Just answer the question I asked as it makes a huge difference: where do you want to run this report from on your site?

[reedallenbrown]

Re: Filter a report using a session protected variable

Thank you everyone I got it to work. Here is my code:

contact = alltrim(CurrentForm.Controls.Contactlist)
report = alltrim(CurrentForm.Controls.Reportlist)
id = alltrim(CurrentForm.Controls.clientid)
if CurrentForm.Controls.Contacttype = "1" then

dim filter as c
dim order as c
id =session.__Protected__Userid

Filter = "userid = \""+id+"\""
'Filter = ".t."
Order = "First_Name+Last_Name"
Dim filename as c
Filename = session.session_folder + chr(92) + "tempreport.pdf"
filename = report.saveas(report,"pdf",filter,order,filename,.f.)
if file.exists(filename)
currentform.RedirectTarget = session.session_url + "tempreport.pdf?" + time("hms3")
end if

else

IF eval_valid("contact") = .f. Then
goto skipreport
end if
dim filter as c
dim order as c
Filter = "Mr_Number = \""+contact+"\""
Order = ""
Dim filename as c
filename = session.session_folder + chr(92) + "tempreport.pdf"
filename = report.saveas(report,"pdf",filter,order,filename,.f.)
if file.exists(filename)
currentform.RedirectTarget = session.session_url + "tempreport.pdf?" + time("hms3")
end if
skipreport:
end if