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 |