How to open link through redirect page and keep filter

[cptutrecht]

I can open from a link in a grid another a5w page while setting a filter on that target page with:

4tas_relations.a5w?_4tas_relations_filter=Relaties_nummer = {relation_id}

However, i need to go to an intermediate page. I can do that with:

4tas_relations_start.a5w?Var_relation_id={relation_id}

From that intermediate page i want to redirect, but get stuck on syntax how to convert a character variable to ant interger variable i guess . Relation_id is an integer in an mysql database. I defined in the intermediate page:

Dim FilterRelId as N
FilterRelId = Var_relation_id

response.redirect("4tas_relations.a5w?_4tas_relations_filter=Relaties_nummer=FilterRelId")

And lots of variants with ' '' {} etc. But no luck at all.

Can this be done?

Thanks in advance

[cptutrecht]

Re: How to open link through redirect page and keep filter

Solved the riddle, my solution:

The intermediate page 4vastgoed_relations_start.a5w is called by this url:

4vastgoed_relations_start.a5w?Var_relation_id={relation_id}

The code for the intermediate page (with thanks to help of Glen Schild for some of it) i use is:

dim fullid as C
dim rid as C
dim pid as C
dim eid as C
dim eidpos as N
dim goto_var as C
dim RelationIdFilter as C



fullid = session.__protected__ulinkuserid

rid = extract_string(fullid,"rid","pid")
pid = extract_string(fullid,"pid","eid")
eidpos=atc("eid",fullid)
eidpos=eidpos +3
eid = substr(fullid,eidpos)



session.__protected__rid = rid
session.__protected__pid = pid
session.__protected__eid = eid

'collect all license and connectionstring information

a5w_include("system__start.a5w")



'Send user to correct language flavour of his first page after login

'Var_relation_id is only sometimes present with a variable: ONLY if the page is called from a link at a specific relation from another grid
'NOT if called from the menu. Thus it may not referred without testing its existence in the FIRST case statement below.

if 1=1
select
case eval_valid("Var_relation_id + var_relation_id")
RelationIdFilter = Var_relation_id

if 1=1
select
case session.__protected__activeLanguage="default"

goto_var = "4vastgoed_relations.a5w?_4vastgoed_relat_filter=Relaties_nummer="+RelationIdFilter
response.redirect(goto_var)

case session.__protected__activeLanguage="english"

goto_var = "4vastgoed_relations_english.a5w?_4vastgoed_relat_filter=Relaties_nummer="+RelationIdFilter
response.redirect(goto_var)

case session.__protected__activeLanguage="german"

goto_var = "4vastgoed_relations_german.a5w?_4vastgoed_relat_filter=Relaties_nummer="+RelationIdFilter
response.redirect(goto_var)


end select

else

end if


case session.__protected__activeLanguage="default"

goto_var = "4vastgoed_relations.a5w"
response.redirect(goto_var)

case session.__protected__activeLanguage="english"

goto_var = "4vastgoed_relations_english.a5w"
response.redirect(goto_var)

case session.__protected__activeLanguage="german"

goto_var = "4vastgoed_relations_german.a5w"
response.redirect(goto_var)


end select

else

end if