Rev 18127 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed
Rev 18127 | Rev 18144 | ||
---|---|---|---|
Line 15... | Line 15... | ||
15 | !bound ss between integer 0 and 2 default $tmp_ss |
15 | !bound ss between integer 0 and 2 default $tmp_ss |
16 | !set f_$i=!item $s+1 of $formula_list |
16 | !set f_$i=!item $s+1 of $formula_list |
17 | !set f_$i=!replace internal I by I$ss in $(f_$i) |
17 | !set f_$i=!replace internal I by I$ss in $(f_$i) |
18 | !set a_=!line 1 of $(s_$i) |
18 | !set a_=!line 1 of $(s_$i) |
19 | !! ------test if sheet is hidden for this user |
19 | !! ------test if sheet is hidden for this user |
20 |
|
20 | !set h_=!line 9 of $(s_$i) |
21 |
|
21 | !if $h_!=$empty |
22 |
|
22 | !readproc adm/vfilter/ishiddensheet.proc $h_ |
23 |
|
23 | !endif |
24 | !! -----end test |
24 | !! -----end test |
25 | !set tmp_sheet_status=!getsheetstatus sheet=$i |
- | |
26 | !! ------ download techvarvalue for individual sheet |
25 | !! ------ download techvarvalue for individual sheet |
27 | !set h_=!line 10 of $(s_$i) |
26 | !set h_=!line 10 of $(s_$i) |
28 | !if $h_!=$empty |
27 | !if $h_!=$empty |
29 | !set indivtechval_$i=!defof user_techvar_$(h_) in $userdef |
28 | !set indivtechval_$i=!defof user_techvar_$(h_) in $userdef |
30 | !else |
29 | !else |
31 | !reset indivtechval_$i |
30 | !reset indivtechval_$i |
32 | !endif |
31 | !endif |
33 | !! ------ end individual sheet |
32 | !! ------ end individual sheet |
34 | !if $tmp_sheet_status iswordof 1 2 |
- | |
35 |
|
33 | !if $a_>=1 and $a_<=2 and $hidden_sheet!=1 |
36 | !set aclist=!append item $i to $aclist |
34 | !set aclist=!append item $i to $aclist |
37 | !endif |
35 | !endif |
38 |
|
36 | !reset hidden_sheet |
39 | !next i |
37 | !next i |
40 | !reset tmp tmp_s tmp_ss |
38 | !reset tmp tmp_s tmp_ss |
41 | !set n=!itemcnt $aclist |
39 | !set n=!itemcnt $aclist |