Hyperlink for report being published to Niku Clarity

[t16turbo]

Hi,

I am trying to use Hyperlinks in my report to fre up a second report when the Client Code is clicked on.

I've used a report that comes with clarity as an example, and adapted the code in my report.

Sub SetLinkTo( row As AcDataRow )

 me.LinkTo =  "/PRJ/Support1b.rox?Submit" & " &param_client = " & row.GetValue("customer_id") & "&param_proj_type= " & param_proj_type &
+            "&param_cost =" & param_cost & "&param_start_period=" & param_start_period & "&param_finish_period=" & param_finish_period
   
 Super::SetLinkTo( row )

End Sub

I've set the above code to reference the second report 'Support1b.rox'
When I try to run this in Clarity I get an error saying "Contact System Administrator"
Can anyone tell me what else I need to do to get this working?
I have not included a LinkExp (as the Clarity report i'm using as an example does not have this - it just has the code above)

any ideas about what I need to check to get this working?

 

[palisade14]

It is best if you don't override the code and then make a call to the superclass following your custom code.

Consider this instead:

Sub SetLinkTo( row As AcDataRow )

	LinkTo =          "/PRJ/Support1b.rox?Submit"
	LinkTo = LinKTo & " &param_client="		& row.GetValue("customer_id")
	LinkTo = LinKTo & "&param_proj_type="		& param_proj_type
	LinkTo = LinKTo & "&param_cost="		& param_cost
	LinkTo = LinKTo & "&param_start_period="	& param_start_period
	LinkTo = LinKTo & "&param_finish_period="	& param_finish_period


End Sub

I reformatted using my own brand of whitespace usage and removed the call to the superclass.

Douglas

 

[t16turbo]

hi, thanks for the suggestion.
I used your code instead of mine, but it's still returning the same error.

I just dont know what I am doing wrong (or right for that matter)
is there somewhere else in the report hat needs altering?
or the target report?

 

[t16turbo]

also, the canned reports code is as follows:

Sub SetLinkTo( row As AcDataRow )
    If IsNull(NikuSequential::ActuateLocale) or NikuSequential::ActuateLocale = "" Then
        LinkTo = ""
    Else
        LinkTo = "/" & NikuSequential::ActuateLocale
    End If
    LinkTo = LinkTo &
+            "/PRJ/snapshot.rox?Submit" &
+            getSublinkURL()&
+            "&param_project = " & row.GetValue("project_id") &
+            "&param_obs_unit = " & NikuSequential::param_obs_unit  &
+            "&param_plan_type = " & NewReportApp::param_plan_type
    Super::SetLinkTo( row )
    ' Insert your code here
End Sub

they uue getSublinkURL() (not sure what it is or where to find it in the canned report)
I have chopped that bit out of the code, and also chopped the if statement from it.