Subversion Repositories wimsdev

Rev

Rev 7270 | Rev 7352 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 7270 Rev 7328
Line 1... Line -...
1
 
-
 
-
 
1
!!! input:url_to_analyse name_of_parameters_asked
-
 
2
!!! output: the variable contained in name_of_parameters_asked
2
!set parmtoread=!singlespace $wims_read_parm
3
!set parmtoread=!singlespace $wims_read_parm
3
!set parmtoread=!words2items $parmtoread
4
!set parmtoread=!words2items $parmtoread
4
!set parmtoread=!nonempty items $parmtoread
5
!set parmtoread=!nonempty items $parmtoread
5
!set url=$(parmtoread[1])
6
!set url=$(parmtoread[1])
6
!set parmtoread=$(parmtoread[2..-1])
7
!set parmtoread=$(parmtoread[2..-1])
Line 9... Line 10...
9
 
10
 
10
  !set testw=!replace internal & by $\
11
  !set testw=!replace internal & by $\
11
$ in $url
12
$ in $url
12
  !set testw=!replace internal = by , in $testw
13
  !set testw=!replace internal = by , in $testw
13
  !set testw=!select $testw where column 1=$p_
14
  !set testw=!select $testw where column 1=$p_
14
  !set $p_=!nospace $(testw[2])
15
  !set $p_=!nospace $(testw[;2])
15
!next
16
!next
16
 
17