Rev 7342 | Rev 12701 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed
| Rev 7342 | Rev 12387 | ||
|---|---|---|---|
| Line 4... | Line 4... | ||
| 4 | !if $sheet<1 or $sheet>$nbsh |
4 | !if $sheet<1 or $sheet>$nbsh |
| 5 | error=bad_sheet |
5 | error=bad_sheet |
| 6 | !exit |
6 | !exit |
| 7 | !endif |
7 | !endif |
| 8 | 8 | ||
| 9 | don=!record $sheet of wimshome/log/classes/$wims_class/sheets/.sheets |
9 | don=!record $sheet of wimshome/log/classes/$wims_class/sheets/.sheets |
| 10 | t=!line 1 of $don |
10 | t=!line 1 of $don |
| 11 | !if $t!=0 |
11 | !if $t!=0 |
| 12 | error=active_sheet |
12 | error=active_sheet |
| 13 | !exit |
13 | !exit |
| 14 | !endif |
14 | !endif |
| 15 | 15 | ||
| 16 | nbexo=!recordcnt wimshome/log/classes/$wims_class/sheets/.sheet$sheet |
16 | nbexo=!recordcnt wimshome/log/classes/$wims_class/sheets/.sheet$sheet |
| 17 | !if $exo<1 or $exo>$nbexo |
17 | !if $exo<1 or $exo>$nbexo |
| 18 | error=bad_series |
18 | error=bad_series |
| 19 | !exit |
19 | !exit |
| 20 | !endif |
20 | !endif |
| 21 | 21 | ||
| 22 | update_field=2 |
22 | update_field=2 |
| 23 | t=$ |
23 | t=$ |
| 24 | tmp=!replace internal & by $t in $iniparm |
24 | tmp=!replace internal & by $t in $iniparm |
| 25 | tmp2=!getopt scoredelay in $tmp |
25 | tmp2=!getopt scoredelay in $tmp |
| 26 | tmp3=!replace internal + by , in $tmp2 |
26 | tmp3=!replace internal + by , in $tmp2 |
| 27 | iniparm=!replace internal scoredelay=$tmp2 by scoredelay=$tmp3 in $iniparm |
27 | iniparm=!replace internal scoredelay=$tmp2 by scoredelay=$tmp3 in $iniparm |
| 28 | update_content=$iniparm |
28 | update_content=$iniparm |