Subversion Repositories wimsdev

Rev

Rev 7680 | Go to most recent revision | Details | Last modification | View Log | RSS feed

Rev Author Line No. Line
20 reyssat 1
!nocache
2
 
3
!if $status=waiting
4
 !exit
5
!endif
6
 
7
df_data=!record 0 of Dataindex
8
df_names=!column 1 of $df_data
9
df_titles=!column 2 of $df_data
10
 
11
df_ask=!listintersect $(confparm$wims_read_parm) and $df_names
12
!default df_ask=$df_names
13
df_ask=!randitem $df_ask
14
oefenv_datafile=src/data/$df_ask.data
15
df_namecnt=!positionof item $df_ask in $df_names
16
df_title=!item $df_namecnt of $df_titles
17